(F)SLIT -> (f)sLit in TcType

[ghc-hetmet.git] / compiler / typecheck / TcMatches.lhs

diff --git a/compiler/typecheck/TcMatches.lhs b/compiler/typecheck/TcMatches.lhs
index caab44a..5826eb9 100644 (file)
--- a/compiler/typecheck/TcMatches.lhs
+++ b/compiler/typecheck/TcMatches.lhs
@@ -25,7 +25,6 @@ import {-# SOURCE #-} TcExpr( tcSyntaxOp, tcInferRho, tcMonoExpr, tcPolyExpr )
 
 import HsSyn
 import TcRnMonad
-import TcGadt
 import Inst
 import TcEnv
 import TcPat
@@ -43,6 +42,7 @@ import TysPrim
 import Outputable
 import Util
 import SrcLoc
+import FastString
 
 import Control.Monad
 \end{code}