X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypes%2FTypeRep.lhs-boot;h=fe8fd59d1b91c99b9d1b12ca27fcf30fb379588b;hb=86add45dbfb6f962b65e371143dd467ae783f9e7;hp=376aa684dd8ff098961d711e9af3895ae69545e7;hpb=c76c69c5b62f1ca4fa52d75b0dfbd37b7eddbb09;p=ghc-hetmet.git diff --git a/compiler/types/TypeRep.lhs-boot b/compiler/types/TypeRep.lhs-boot index 376aa68..fe8fd59 100644 --- a/compiler/types/TypeRep.lhs-boot +++ b/compiler/types/TypeRep.lhs-boot @@ -1,19 +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 -tySuperKind :: Kind -coSuperKind :: Kind - -isCoSuperKind :: Kind -> Bool +isCoercionKind :: Kind -> Bool \end{code}