[project @ 1998-03-19 23:54:49 by simonpj]
[ghc-hetmet.git] / ghc / compiler / deSugar / DsMonad.lhs
index bf18761..19a4c33 100644 (file)
@@ -28,11 +28,10 @@ import Bag          ( emptyBag, snocBag, bagToList, Bag )
 import BasicTypes       ( Module )
 import ErrUtils        ( WarnMsg )
 import HsSyn           ( OutPat )
-import Id              ( mkSysLocal, mkIdWithNewUniq,
-                         lookupIdEnv, growIdEnvList, GenId, IdEnv,
-                         Id
+import MkId            ( mkSysLocal )
+import Id              ( mkIdWithNewUniq,
+                         lookupIdEnv, growIdEnvList, IdEnv, Id
                        )
-import PprType         ( GenType, GenTyVar )
 import Outputable
 import SrcLoc          ( noSrcLoc, SrcLoc )
 import TcHsSyn         ( TypecheckedPat )