X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FTcIfaceSig.lhs;fp=ghc%2Fcompiler%2Ftypecheck%2FTcIfaceSig.lhs;h=4956bdbf99368e40c5d000ef08c5f954d2ebeb21;hb=84ed91abfe3f9df43d5b33e404138e43a574beb8;hp=fe27324724c5c61d2afe3bfff65da4e81b94a8d0;hpb=dfc75488f4cd1d4f6bf9896f5a901996c77bbc77;p=ghc-hetmet.git

diff --git a/ghc/compiler/typecheck/TcIfaceSig.lhs b/ghc/compiler/typecheck/TcIfaceSig.lhs
index fe27324..4956bdb 100644
--- a/ghc/compiler/typecheck/TcIfaceSig.lhs
+++ b/ghc/compiler/typecheck/TcIfaceSig.lhs
@@ -28,7 +28,7 @@ import CoreUnfold
 import CoreLint		( lintUnfolding )
 import WorkWrap		( mkWrapper )
 
-import Id		( Id, mkVanillaGlobal, mkLocalId, isDataConWorkId_maybe )
+import Id		( Id, mkVanillaGlobal, mkLocalId )
 import MkId		( mkFCallId )
 import IdInfo
 import TyCon		( tyConDataCons, tyConTyVars )
@@ -40,7 +40,7 @@ import Name		( Name )
 import UniqSupply	( initUs_ )
 import Outputable	
 import Util		( zipWithEqual, dropList, equalLength )
-import HscTypes		( TyThing(..), typeEnvIds )
+import HscTypes		( typeEnvIds )
 import CmdLineOpts	( DynFlag(..) )
 \end{code}