X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FTcBinds.lhs;h=533058fa093b8dd941a29395219b76198402a5f1;hb=4161ba13916463f8e67259498eacf22744160e1f;hp=0b9bc201f7a5c44570e87e9f57783e6eb4732726;hpb=db95d6e8d319b0c5cee1ccc23751e8190152ade3;p=ghc-hetmet.git

diff --git a/ghc/compiler/typecheck/TcBinds.lhs b/ghc/compiler/typecheck/TcBinds.lhs
index 0b9bc20..533058f 100644
--- a/ghc/compiler/typecheck/TcBinds.lhs
+++ b/ghc/compiler/typecheck/TcBinds.lhs
@@ -40,7 +40,8 @@ import TcType		( TcThetaType, newTyVarTy, newTyVar,
 			)
 import TcUnify		( unifyTauTy, unifyTauTyLists )
 
-import Id		( mkVanillaId, setInlinePragma, idFreeTyVars )
+import CoreFVs		( idFreeTyVars )
+import Id		( mkVanillaId, setInlinePragma )
 import Var		( idType, idName )
 import IdInfo		( InlinePragInfo(..) )
 import Name		( Name, getOccName, getSrcLoc )