[project @ 1998-03-19 23:54:49 by simonpj]
[ghc-hetmet.git] / ghc / compiler / simplCore / SATMonad.lhs
index ac39df4..f7f67fa 100644 (file)
@@ -35,7 +35,8 @@ import Type           ( mkTyVarTy, mkSigmaTy, TyVarTemplate,
                          Class, ThetaType, SigmaType,
                          InstTyEnv(..)
                        )
-import Id              ( mkSysLocal, idType )
+import MkId            ( mkSysLocal )
+import Id              ( idType )
 import SrcLoc          ( SrcLoc, noSrcLoc )
 import UniqSupply
 import Util