X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypes%2FTypeRep.lhs-boot;h=b7205a137f8864348a5ba44a5ea6308be8d398f4;hb=ac704fcac946590eef0ec91ae19f3b47d779a75f;hp=b259005823c595f82803aa67aa9e82daec284329;hpb=712a6f8a506402b887efda3a2db70a1e5907ff13;p=ghc-hetmet.git diff --git a/compiler/types/TypeRep.lhs-boot b/compiler/types/TypeRep.lhs-boot index b259005..b7205a1 100644 --- a/compiler/types/TypeRep.lhs-boot +++ b/compiler/types/TypeRep.lhs-boot @@ -1,14 +1,10 @@ \begin{code} module TypeRep where -import {-# SOURCE #-} TyCon ( TyCon ) - data Type data PredType data TyThing -type Coercion = Type - type Kind = Type type SuperKind = Type @@ -16,6 +12,8 @@ type SuperKind = Type tySuperKind :: SuperKind coSuperKind :: SuperKind +isCoercionKind :: Kind -> Bool + isCoSuperKind :: SuperKind -> Bool \end{code}