X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcHsType.lhs;h=6a43e2396cbc026172eda1e81a40af240b5a809c;hb=67ee8a93fc96a38c3f73468cb86d8421a11d2911;hp=8411631d8a6ca56536757572d70a61dc35f04846;hpb=f8171baf9ad2158d214945ffa4d38fc4616b2296;p=ghc-hetmet.git

diff --git a/compiler/typecheck/TcHsType.lhs b/compiler/typecheck/TcHsType.lhs
index 8411631..6a43e23 100644
--- a/compiler/typecheck/TcHsType.lhs
+++ b/compiler/typecheck/TcHsType.lhs
@@ -45,7 +45,7 @@ import TcType		( Type, PredType(..), ThetaType, BoxySigmaType,
 			  substTyWith, mkTyVarTys, tcEqType,
 		 	  tcIsTyVarTy, mkFunTy, mkSigmaTy, mkPredTy, 
 			  mkTyConApp, mkAppTys, typeKind )
-import Kind 		( Kind, isLiftedTypeKind, liftedTypeKind, ubxTupleKind, 
+import {- Kind parts of -} Type 		( Kind, isLiftedTypeKind, liftedTypeKind, ubxTupleKind, 
 			  openTypeKind, argTypeKind, splitKindFunTys )
 import Var		( TyVar, mkTyVar, tyVarName )
 import TyCon		( TyCon, tyConKind )