X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypes%2FTypeRep.lhs-boot;h=fe8fd59d1b91c99b9d1b12ca27fcf30fb379588b;hp=b259005823c595f82803aa67aa9e82daec284329;hb=c648345e3d82c0c40333bfd8ddea2633e21b08dc;hpb=712a6f8a506402b887efda3a2db70a1e5907ff13 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}