X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FcodeGen%2FCodeGen.lhs;h=48c0cbfbb9ecada36ba23a9b07cdd01cd80e417f;hp=e8d83a5a43bf51e1fadb2414a3bb962a28ec012b;hb=6bca92c3f75df35fcb2ec23d56107783373da7e6;hpb=e1231b2bcb1c9294c2ecdf150e9aad72a0caa253

diff --git a/compiler/codeGen/CodeGen.lhs b/compiler/codeGen/CodeGen.lhs
index e8d83a5..48c0cbf 100644
--- a/compiler/codeGen/CodeGen.lhs
+++ b/compiler/codeGen/CodeGen.lhs
@@ -35,21 +35,21 @@ import CLabel
 import Cmm
 import CmmUtils		( zeroCLit, mkIntCLit, mkLblExpr )
 import PprCmm		( pprCmms )
-import MachOp		( wordRep, MachHint(..) )
+import MachOp		( wordRep )
 
 import StgSyn
-import PrelNames	( gHC_PRIM, rOOT_MAIN, mAIN, pREL_TOP_HANDLER )
+import PrelNames	( gHC_PRIM, rOOT_MAIN, pREL_TOP_HANDLER )
 import Packages		( HomeModules )
 import DynFlags		( DynFlags(..), DynFlag(..), dopt )
 import StaticFlags	( opt_SccProfilingOn )
 
-import HscTypes		( ForeignStubs(..), TypeEnv, typeEnvTyCons )
+import HscTypes		( ForeignStubs(..) )
 import CostCentre       ( CollectedCCs )
 import Id               ( Id, idName, setIdName )
 import Name		( nameSrcLoc, nameOccName, nameUnique, isInternalName, mkExternalName )
 import OccName		( mkLocalOcc )
 import TyCon            ( TyCon )
-import Module		( Module, mkModule )
+import Module		( Module )
 import ErrUtils		( dumpIfSet_dyn, showPass )
 import Panic		( assertPanic )