diff options
Diffstat (limited to 'testdata/language-features/adt/gadt04.reject.out')
-rw-r--r-- | testdata/language-features/adt/gadt04.reject.out | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testdata/language-features/adt/gadt04.reject.out b/testdata/language-features/adt/gadt04.reject.out index fc2b7c30..4efb2a15 100644 --- a/testdata/language-features/adt/gadt04.reject.out +++ b/testdata/language-features/adt/gadt04.reject.out | |||
@@ -7,8 +7,8 @@ and at testdata/language-features/adt/gadt04.reject.lc:3:3: | |||
7 | ------------ trace | 7 | ------------ trace |
8 | 'M :: [32mType -> 'String -> Type[0m | 8 | 'M :: [32mType -> 'String -> Type[0m |
9 | Value :: [32mforall a . [32ma[0;32m -> forall (b :: 'String) . 'M [32ma[0;32m [32mb[0;32m[0m | 9 | Value :: [32mforall a . [32ma[0;32m -> forall (b :: 'String) . 'M [32ma[0;32m [32mb[0;32m[0m |
10 | 'MCase :: [32m([32ma[0;32m :: ([32mb[0;32m :: Type) -> ([32mc[0;32m :: 'String) -> 'M [32mb[0;32m [32mc[0;32m -> Type) -> (forall d . ([32me[0;32m :: [32md[0;32m) -> forall (f :: 'String) . [32m[32m[32m[32ma[0;32m [32m[32md[0;32m[0;32m[0;32m [32m[32mf[0;32m[0;32m[0;32m [32m(Value [32md[0;32m [32me[0;32m [32mf[0;32m)[0;32m[0;32m) -> forall g (h :: 'String) . ([32mi[0;32m :: 'M [32mg[0;32m [32mh[0;32m) -> [32m[32m[32m[32ma[0;32m [32m[32mg[0;32m[0;32m[0;32m [32m[32mh[0;32m[0;32m[0;32m [32m[32mi[0;32m[0;32m[0;32m[0m | 10 | 'MCase :: [32mforall (a :: forall b (c :: 'String) -> 'M [32mb[0;32m [32mc[0;32m -> Type) -> (forall d . forall (e :: [32md[0;32m) -> forall (f :: 'String) . [32m[32m[32m[32ma[0;32m [32m[32md[0;32m[0;32m[0;32m [32m[32mf[0;32m[0;32m[0;32m [32m(Value [32md[0;32m [32me[0;32m [32mf[0;32m)[0;32m[0;32m) -> forall g (h :: 'String) . forall (i :: 'M [32mg[0;32m [32mh[0;32m) -> [32m[32m[32m[32ma[0;32m [32m[32mg[0;32m[0;32m[0;32m [32m[32mh[0;32m[0;32m[0;32m [32m[32mi[0;32m[0;32m[0;32m[0m |
11 | match'M :: [32m([32ma[0;32m :: Type -> Type) -> (([32mb[0;32m :: Type) -> ([32mc[0;32m :: 'String) -> [32m[32ma[0;32m [32m('M [32mb[0;32m [32mc[0;32m)[0;32m[0;32m) -> ([32md[0;32m :: Type) -> [32m[32ma[0;32m [32m[32md[0;32m[0;32m[0;32m -> [32m[32ma[0;32m [32m[32md[0;32m[0;32m[0;32m[0m | 11 | match'M :: [32mforall (a :: Type -> Type) -> (forall b (c :: 'String) -> [32m[32ma[0;32m [32m('M [32mb[0;32m [32mc[0;32m)[0;32m[0;32m) -> forall d -> [32m[32ma[0;32m [32m[32md[0;32m[0;32m[0;32m -> [32m[32ma[0;32m [32m[32md[0;32m[0;32m[0;32m[0m |
12 | 'M2 :: [32mType -> 'String -> Type[0m | 12 | 'M2 :: [32mType -> 'String -> Type[0m |
13 | Value :: [32mforall a . [32ma[0;32m -> forall (b :: 'String) . 'M2 [32ma[0;32m [32mb[0;32m[0m | 13 | Value :: [32mforall a . [32ma[0;32m -> forall (b :: 'String) . 'M2 [32ma[0;32m [32mb[0;32m[0m |
14 | !already defined Value at testdata/language-features/adt/gadt04.reject.lc:6:3: | 14 | !already defined Value at testdata/language-features/adt/gadt04.reject.lc:6:3: |