[project @ 2003-03-04 11:12:11 by simonmar]

Make it compile again with 5.04.x

diff --git a/ghc/compiler/main/DriverUtil.hs b/ghc/compiler/main/DriverUtil.hs
index d9f095d..2f10d12 100644 (file)
--- a/ghc/compiler/main/DriverUtil.hs
+++ b/ghc/compiler/main/DriverUtil.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: DriverUtil.hs,v 1.36 2003/03/04 10:39:58 simonmar Exp $
+-- $Id: DriverUtil.hs,v 1.37 2003/03/04 11:12:11 simonmar Exp $
 --
 -- Utils for the driver
 --
@@ -16,7 +16,7 @@ import Util
 import Panic
 import Config          ( cLeadingUnderscore )
 
-import EXCEPTION       ( Exception, finally, throwDyn, catchDyn )
+import EXCEPTION       ( Exception(..), finally, throwDyn, catchDyn, throw )
 import qualified EXCEPTION as Exception
 import DYNAMIC
 import DATA_IOREF      ( IORef, readIORef, writeIORef )