[project @ 2001-08-02 08:29:42 by simonmar]

oops, only import Exception.block when compiling GHCi (and we know
we're bootstrapping)

diff --git a/ghc/compiler/compMan/CmLink.lhs b/ghc/compiler/compMan/CmLink.lhs
index 7c69ebe..e2bac19 100644 (file)
--- a/ghc/compiler/compMan/CmLink.lhs
+++ b/ghc/compiler/compMan/CmLink.lhs
@@ -37,7 +37,10 @@ import ErrUtils              ( showPass )
 import CmdLineOpts     ( DynFlags(..) )
 import Util
 
+#ifdef GHCI
 import Exception       ( block )
+#endif
+
 import IOExts
 import List
 import Monad