[project @ 1997-06-05 20:29:14 by sof]

[ghc-hetmet.git] / ghc / compiler / rename / RnBinds.lhs

diff --git a/ghc/compiler/rename/RnBinds.lhs b/ghc/compiler/rename/RnBinds.lhs
index 4f1ca25..089d8e1 100644 (file)
--- a/ghc/compiler/rename/RnBinds.lhs
+++ b/ghc/compiler/rename/RnBinds.lhs
@@ -18,7 +18,11 @@ module RnBinds (
    ) where
 
 IMP_Ubiq()
+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ <= 201
 IMPORT_DELOOPER(RnLoop)                -- break the RnPass/RnExpr/RnBinds loops
+#else
+import {-# SOURCE #-} RnSource ( rnHsSigType )
+#endif
 
 import HsSyn
 import HsPragmas       ( isNoGenPragmas, noGenPragmas )