* TypeRep.lhs and TypeRep.lhs-boot didn't agree on their signatures (SuperKind vs...

diff --git a/compiler/types/TypeRep.lhs b/compiler/types/TypeRep.lhs
index 7705650..b89d170 100644 (file)
--- a/compiler/types/TypeRep.lhs
+++ b/compiler/types/TypeRep.lhs
@@ -397,6 +397,7 @@ isTySuperKind (NoteTy _ ty)    = isTySuperKind ty
 isTySuperKind (TyConApp kc []) = kc `hasKey` tySuperKindTyConKey
 isTySuperKind other            = False
 
+isCoSuperKind :: SuperKind -> Bool
 isCoSuperKind (NoteTy _ ty)    = isCoSuperKind ty
 isCoSuperKind (TyConApp kc []) = kc `hasKey` coSuperKindTyConKey
 isCoSuperKind other            = False

diff --git a/compiler/types/TypeRep.lhs-boot b/compiler/types/TypeRep.lhs-boot
index 376aa68..b259005 100644 (file)
--- a/compiler/types/TypeRep.lhs-boot
+++ b/compiler/types/TypeRep.lhs-boot
@@ -11,9 +11,11 @@ type Coercion = Type
 
 type Kind = Type
 
-tySuperKind :: Kind
-coSuperKind :: Kind
+type SuperKind = Type
 
-isCoSuperKind :: Kind -> Bool
+tySuperKind :: SuperKind
+coSuperKind :: SuperKind
+
+isCoSuperKind :: SuperKind -> Bool
 \end{code}