[project @ 2001-05-19 20:20:56 by qrczak]

[ghc-hetmet.git] / ghc / compiler / utils / FastString.lhs

diff --git a/ghc/compiler/utils/FastString.lhs b/ghc/compiler/utils/FastString.lhs
index bb0a02f..6913539 100644 (file)
--- a/ghc/compiler/utils/FastString.lhs
+++ b/ghc/compiler/utils/FastString.lhs
@@ -78,10 +78,9 @@ import PrelIOBase    ( Handle__(..), IOError, IOErrorType(..),
                          IOResult(..), 
 #endif
                          IO(..),
-#if __GLASGOW_HASKELL__ >= 303
-                         Handle__Type(..),
-#endif
+#if __GLASGOW_HASKELL__ >= 301 && __GLASGOW_HASKELL__ <= 302
                          constructError
+#endif
                        )
 #endif