[project @ 2000-04-10 12:12:27 by simonpj]
[ghc-hetmet.git] / ghc / compiler / coreSyn / CoreSyn.lhs
index febe178..ebe3177 100644 (file)
@@ -52,7 +52,7 @@ import Type           ( Type, UsageAnn, mkTyVarTy, isUnLiftedType, seqType )
 import Literal         ( Literal(MachStr), mkMachInt )
 import PrimOp          ( PrimOp )
 import DataCon         ( DataCon, dataConId )
-import ThinAir         ( unpackCStringId, unpackCString2Id, addr2IntegerId )
+import ThinAir         ( unpackCStringId, unpackCString2Id )
 import VarSet
 import Outputable
 \end{code}