From: sof <unknown>
Date: Mon, 26 May 1997 01:23:57 +0000 (+0000)
Subject: [project @ 1997-05-26 01:23:57 by sof]
X-Git-Tag: Approximately_1000_patches_recorded~571
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=56dcd91ab40acb69cf56acf43cc9577b5129bbf4;p=ghc-hetmet.git

[project @ 1997-05-26 01:23:57 by sof]
Import lists tightened up
---

diff --git a/ghc/compiler/types/Class.lhs b/ghc/compiler/types/Class.lhs
index ee2f22f..e123309 100644
--- a/ghc/compiler/types/Class.lhs
+++ b/ghc/compiler/types/Class.lhs
@@ -27,19 +27,14 @@ module Class (
 CHK_Ubiq() -- debugging consistency check
 
 IMPORT_DELOOPER(TyLoop)
---IMPORT_DELOOPER(IdLoop)
 
-
---import TyVar
---import Id
---import Type
 #if __GLASGOW_HASKELL__ >= 202
 import Name
 #endif
 
-import TyCon		--( TyCon )
-import TyVar		--( SYN_IE(TyVar), GenTyVar )
-import Usage		--( GenUsage, SYN_IE(Usage), SYN_IE(UVar) )
+import TyCon		( TyCon )
+import TyVar		( SYN_IE(TyVar), GenTyVar )
+import Usage		( GenUsage, SYN_IE(Usage), SYN_IE(UVar) )
 
 import MatchEnv		( MatchEnv )
 import Maybes		( assocMaybe )
@@ -48,7 +43,6 @@ import Outputable
 import Unique		-- Keys for built-in classes
 import UniqFM           ( SYN_IE(Uniquable))
 import Pretty		( Doc, hsep, ptext )
-import PprStyle		( PprStyle(..) )
 import SrcLoc		( SrcLoc )
 import Util
 \end{code}