X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypecheck%2FInst.lhs;h=cc91be8239ac9322d83bf40f7034fa736e5b1e19;hb=44ba24dc84d271ca9bd5ab5060cb63ed87f585e3;hp=98fe3e9872d191370c582d0e3452e34bfaad886d;hpb=c94408e522e5af3b79a5beadc7e6d15cee553ee7;p=ghc-hetmet.git

diff --git a/compiler/typecheck/Inst.lhs b/compiler/typecheck/Inst.lhs
index 98fe3e9..cc91be8 100644
--- a/compiler/typecheck/Inst.lhs
+++ b/compiler/typecheck/Inst.lhs
@@ -76,7 +76,7 @@ import HscTypes	( ExternalPackageState(..), HscEnv(..) )
 import CoreFVs	( idFreeTyVars )
 import DataCon	( DataCon, dataConStupidTheta, dataConName, 
                   dataConWrapId, dataConUnivTyVars )
-import Id	( Id, idName, idType, mkUserLocal, mkLocalId )
+import Id	( Id, idName, idType, mkUserLocal, mkLocalId, isId )
 import Name	( Name, mkMethodOcc, getOccName, getSrcLoc, nameModule,
 		  isInternalName, setNameUnique )
 import NameSet	( addOneToNameSet )