X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypes%2FTypeRep.lhs-boot;h=fe8fd59d1b91c99b9d1b12ca27fcf30fb379588b;hb=86add45dbfb6f962b65e371143dd467ae783f9e7;hp=b259005823c595f82803aa67aa9e82daec284329;hpb=712a6f8a506402b887efda3a2db70a1e5907ff13;p=ghc-hetmet.git

diff --git a/compiler/types/TypeRep.lhs-boot b/compiler/types/TypeRep.lhs-boot
index b259005..fe8fd59 100644
--- a/compiler/types/TypeRep.lhs-boot
+++ b/compiler/types/TypeRep.lhs-boot
@@ -1,21 +1,13 @@
 \begin{code}
 module TypeRep where
 
-import {-# SOURCE #-} TyCon ( TyCon )
-
 data Type
-data PredType
+data Pred a
 data TyThing
 
-type Coercion = Type
-
+type PredType = Pred Type
 type Kind = Type
 
-type SuperKind = Type
-
-tySuperKind :: SuperKind
-coSuperKind :: SuperKind
-
-isCoSuperKind :: SuperKind -> Bool
+isCoercionKind :: Kind -> Bool
 \end{code}