From 8dfa24e2d8174289ac5d68f4e4371c1a23d57096 Mon Sep 17 00:00:00 2001 From: simonmar Date: Thu, 17 Aug 2000 16:01:34 +0000 Subject: [PATCH] [project @ 2000-08-17 16:01:34 by simonmar] remove unused imports. --- ghc/compiler/typecheck/TcClassDcl.lhs | 5 ----- 1 file changed, 5 deletions(-) diff --git a/ghc/compiler/typecheck/TcClassDcl.lhs b/ghc/compiler/typecheck/TcClassDcl.lhs index d0e5379..6b206bb 100644 --- a/ghc/compiler/typecheck/TcClassDcl.lhs +++ b/ghc/compiler/typecheck/TcClassDcl.lhs @@ -30,11 +30,9 @@ import TcEnv ( TcId, ValueEnv, TyThing(..), TyThingDetails(..), tcAddImportedId tcExtendLocalValEnv, tcExtendTyVarEnv, newDefaultMethodName ) import TcBinds ( tcBindWithSigs, tcSpecSigs ) -import TcTyDecls ( mkNewTyConRep ) import TcMonoType ( tcHsSigType, tcClassContext, checkSigTyVars, sigCtxt, mkTcSig ) import TcSimplify ( tcSimplifyAndCheck, bindInstsOfLocalFuns ) import TcType ( TcType, TcTyVar, tcInstTyVars, tcGetTyVar, zonkTcSigTyVars ) -import TcInstUtil ( classDataCon ) import TcMonad import PrelInfo ( nO_METHOD_BINDING_ERROR_ID ) import Bag ( unionManyBags, bagToList ) @@ -53,10 +51,7 @@ import Type ( Type, ThetaType, ClassContext, ) import Var ( tyVarKind, TyVar ) import VarSet ( mkVarSet, emptyVarSet ) -import TyCon ( AlgTyConFlavour(..), mkClassTyCon ) import Maybes ( seqMaybe ) -import SrcLoc ( SrcLoc ) -import FiniteMap ( lookupWithDefaultFM ) \end{code} -- 1.7.10.4