[project @ 2000-07-11 16:24:57 by simonmar]

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

diff --git a/ghc/compiler/typecheck/TcTyClsDecls.lhs b/ghc/compiler/typecheck/TcTyClsDecls.lhs
index bf8baad..030e710 100644 (file)
--- a/ghc/compiler/typecheck/TcTyClsDecls.lhs
+++ b/ghc/compiler/typecheck/TcTyClsDecls.lhs
@@ -30,11 +30,8 @@ import TcType                ( TcKind, newKindVar, newKindVars, kindToTcKind, zonkTcKindToKind
 
 import Type            ( mkArrowKind, boxedTypeKind )
 
-import Class           ( Class )
-import Var             ( TyVar, tyVarKind )
 import FiniteMap
 import Bag     
-import VarSet
 import Digraph         ( stronglyConnComp, SCC(..) )
 import Name            ( Name, NamedThing(..), getSrcLoc, isTvOcc, nameOccName )
 import Outputable
@@ -43,7 +40,6 @@ import UniqSet                ( UniqSet, emptyUniqSet,
                          unitUniqSet, unionUniqSets, 
                          unionManyUniqSets, uniqSetToList ) 
 import ErrUtils                ( Message )
-import SrcLoc          ( SrcLoc )
 import TyCon           ( TyCon, ArgVrcs )
 import Variance         ( calcTyConArgVrcs )
 import Unique          ( Unique, Uniquable(..) )