X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypes%2FTypeRep.lhs-boot;h=fe8fd59d1b91c99b9d1b12ca27fcf30fb379588b;hb=cbebca1c9164a5e5ae9b117d0dcf5ad217defc6d;hp=2acd5a01d228c90a7b685732a52ce00f30ec872a;hpb=f37e239fb5e81fc493e0ea1af98178bf1f7ceaba;p=ghc-hetmet.git diff --git a/compiler/types/TypeRep.lhs-boot b/compiler/types/TypeRep.lhs-boot index 2acd5a0..fe8fd59 100644 --- a/compiler/types/TypeRep.lhs-boot +++ b/compiler/types/TypeRep.lhs-boot @@ -2,16 +2,12 @@ module TypeRep where data Type -data PredType +data Pred a data TyThing +type PredType = Pred Type type Kind = Type -type SuperKind = Type - -tySuperKind :: SuperKind -coSuperKind :: SuperKind - -isCoSuperKind :: SuperKind -> Bool +isCoercionKind :: Kind -> Bool \end{code}