diff options
Diffstat (limited to 'testsuite/tests/polykinds/T7347.hs')
| -rw-r--r-- | testsuite/tests/polykinds/T7347.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/testsuite/tests/polykinds/T7347.hs b/testsuite/tests/polykinds/T7347.hs index dbc52f0e4e..2baab317b7 100644 --- a/testsuite/tests/polykinds/T7347.hs +++ b/testsuite/tests/polykinds/T7347.hs @@ -5,7 +5,9 @@ module T7347 where +import Data.Kind (Type) + data K = forall a. T a -- Existential: promotion gives 'T :: forall k. k -> K -data G :: K -> * where +data G :: K -> Type where D :: G (T []) -- Uses existential |