[project @ 1996-07-19 18:36:04 by partain]

[ghc-hetmet.git] / ghc / compiler / basicTypes / IdUtils.lhs

diff --git a/ghc/compiler/basicTypes/IdUtils.lhs b/ghc/compiler/basicTypes/IdUtils.lhs
index 12c8d34..94703c3 100644 (file)
--- a/ghc/compiler/basicTypes/IdUtils.lhs
+++ b/ghc/compiler/basicTypes/IdUtils.lhs
@@ -10,12 +10,12 @@ module IdUtils ( primOpNameInfo, primOpId ) where
 
 IMP_Ubiq()
 IMPORT_DELOOPER(PrelLoop)              -- here for paranoia checking
+IMPORT_DELOOPER(IdLoop) (SpecEnv)
 
 import CoreSyn
 import CoreUnfold      ( UnfoldingGuidance(..), Unfolding )
 import Id              ( mkImported, mkTemplateLocals )
 import IdInfo          -- quite a few things
-import SpecEnv         ( SpecEnv )
 import Name            ( mkPrimitiveName, OrigName(..) )
 import PrelMods                ( gHC_BUILTINS )
 import PrimOp          ( primOpInfo, tagOf_PrimOp, primOp_str,