X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypes%2FTypeRep.lhs-boot;fp=compiler%2Ftypes%2FTypeRep.lhs-boot;h=fe8fd59d1b91c99b9d1b12ca27fcf30fb379588b;hp=d519f62d2da1e045943d525a8d6403d5685eba58;hb=b2524b3960999fffdb3767900f58825903f6560f;hpb=841e81e28f8cc711f624fdca122219a5bbde2fae

diff --git a/compiler/types/TypeRep.lhs-boot b/compiler/types/TypeRep.lhs-boot
index d519f62..fe8fd59 100644
--- a/compiler/types/TypeRep.lhs-boot
+++ b/compiler/types/TypeRep.lhs-boot
@@ -2,9 +2,10 @@
 module TypeRep where
 
 data Type
-data PredType
+data Pred a
 data TyThing
 
+type PredType = Pred Type
 type Kind = Type
 
 isCoercionKind :: Kind -> Bool