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

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 )