(F)SLIT -> (f)sLit in InstEnv
[ghc-hetmet.git] / compiler / types / FunDeps.lhs
index ac5c0a0..8f529a4 100644 (file)
@@ -20,13 +20,15 @@ module FunDeps (
 import Name
 import Var
 import Class
-import TcGadt
 import TcType
+import Unify
 import InstEnv
 import VarSet
 import VarEnv
 import Outputable
 import Util
+import FastString
+
 import Data.Maybe      ( isJust )
 \end{code}