X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fprelude%2FTysWiredIn.lhs;h=ca4f9509a92652f1340a0f6415e85ff74cd9f371;hb=f6cd95ff9a2bddbd78682dcd9287aec7d152cc13;hp=a76d6508dd05c3052dcd9743058da3a580ae041f;hpb=d069cec2bd92d4156aeab80f7eb1f222a82e4103;p=ghc-hetmet.git

diff --git a/ghc/compiler/prelude/TysWiredIn.lhs b/ghc/compiler/prelude/TysWiredIn.lhs
index a76d650..ca4f950 100644
--- a/ghc/compiler/prelude/TysWiredIn.lhs
+++ b/ghc/compiler/prelude/TysWiredIn.lhs
@@ -98,13 +98,12 @@ import Name		( Name, nameRdrName, nameUnique, nameOccName,
 import OccName		( mkOccFS, tcName, dataName, mkWorkerOcc, mkGenOcc1, mkGenOcc2 )
 import RdrName		( rdrNameOcc )
 import DataCon		( DataCon, mkDataCon, dataConId )
-import Demand		( StrictnessMark(..) )
 import Var		( TyVar, tyVarKind )
 import TyCon		( TyCon, AlgTyConFlavour(..), tyConDataCons,
 			  mkTupleTyCon, isUnLiftedTyCon, mkAlgTyCon
 			)
 
-import BasicTypes	( Arity, RecFlag(..), Boxity(..), isBoxed )
+import BasicTypes	( Arity, RecFlag(..), Boxity(..), isBoxed, StrictnessMark(..) )
 
 import Type		( Type, mkTyConTy, mkTyConApp, mkTyVarTys, 
 			  mkArrowKinds, liftedTypeKind, unliftedTypeKind,