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

[project @ 1997-05-26 02:33:57 by sof]
Imports tidied up
---

diff --git a/ghc/compiler/stgSyn/CoreToStg.lhs b/ghc/compiler/stgSyn/CoreToStg.lhs
index 1042d3c..fa8dcd3 100644
--- a/ghc/compiler/stgSyn/CoreToStg.lhs
+++ b/ghc/compiler/stgSyn/CoreToStg.lhs
@@ -37,16 +37,11 @@ import PrimOp		( PrimOp(..) )
 import SpecUtils	( mkSpecialisedCon )
 import SrcLoc		( noSrcLoc )
 import TyCon		( TyCon{-instance Uniquable-} )
-import Type		( maybeAppDataTyCon, getAppDataTyConExpandingDicts, SYN_IE(Type) )
+import Type		( getAppDataTyConExpandingDicts, SYN_IE(Type) )
 import TysWiredIn	( stringTy )
 import Unique		( integerTyConKey, ratioTyConKey, Unique{-instance Eq-} )
 import UniqSupply	-- all of it, really
 import Util		( zipLazy, panic, assertPanic{-, pprTrace ToDo:rm-} )
---import Pretty--ToDo:rm
---import PprStyle--ToDo:rm
---import PprType  --ToDo:rm
---import Outputable--ToDo:rm
---import PprEnv--ToDo:rm
 
 isLeakFreeType x y = False -- safe option; ToDo
 \end{code}