diff options
author | Péter Diviánszky <divipp@gmail.com> | 2016-02-01 09:25:10 +0100 |
---|---|---|
committer | Péter Diviánszky <divipp@gmail.com> | 2016-02-01 09:25:10 +0100 |
commit | 6a246f8c2553e76d70c2374ff68522c0357a7a9b (patch) | |
tree | 7731a93887dd86f957487a8551845fe0f2fe4ff1 /testdata | |
parent | 91df95d9ac2f07d418a7973ad5ecb4bdb8c2468d (diff) |
erease CaseFun's type parameters
Diffstat (limited to 'testdata')
-rw-r--r-- | testdata/Prelude.out | 20 | ||||
-rw-r--r-- | testdata/language-features/adt/adt05.out | 2 |
2 files changed, 11 insertions, 11 deletions
diff --git a/testdata/Prelude.out b/testdata/Prelude.out index 0920bc2d..1ce1896f 100644 --- a/testdata/Prelude.out +++ b/testdata/Prelude.out | |||
@@ -329,7 +329,7 @@ testdata/Prelude.lc 102:6-103:40 Type | |||
329 | testdata/Prelude.lc 102:22-102:36 Type | 329 | testdata/Prelude.lc 102:22-102:36 Type |
330 | testdata/Prelude.lc 102:23-102:29 Type | 330 | testdata/Prelude.lc 102:23-102:29 Type |
331 | testdata/Prelude.lc 102:31-102:35 Type | 331 | testdata/Prelude.lc 102:31-102:35 Type |
332 | testdata/Prelude.lc 103:7-103:17 RecordC V2 | Type | {a : List (Tuple2 String Type)} -> 'tuptype ('map (Tuple2 String Type) Type (\b:Type -> 'snd String Type b) a) -> RecordC a | 332 | testdata/Prelude.lc 103:7-103:17 RecordC V2 | Type | {a : List (Tuple2 String Type)} -> 'tuptype ('map (Tuple2 String Type) Type ('snd String Type) a) -> RecordC a |
333 | testdata/Prelude.lc 103:18-103:40 Type | 333 | testdata/Prelude.lc 103:18-103:40 Type |
334 | testdata/Prelude.lc 103:19-103:26 List Type -> Type | 334 | testdata/Prelude.lc 103:19-103:26 List Type -> Type |
335 | testdata/Prelude.lc 103:27-103:39 List Type | 335 | testdata/Prelude.lc 103:27-103:39 List Type |
@@ -434,16 +434,16 @@ testdata/Prelude.lc 169:45-170:164 List V2 -> V2 | V1 -> List V2 -> V2 | V10 | | |||
434 | testdata/Prelude.lc 169:51-169:52 String | 434 | testdata/Prelude.lc 169:51-169:52 String |
435 | testdata/Prelude.lc 169:51-169:56 String->Bool | 435 | testdata/Prelude.lc 169:51-169:56 String->Bool |
436 | testdata/Prelude.lc 169:51-169:59 Bool | 436 | testdata/Prelude.lc 169:51-169:59 Bool |
437 | testdata/Prelude.lc 169:51-170:164 'tuptype ('map (Tuple2 String Type) Type (\a:Type -> 'snd String Type a) V1) -> V1 | V13 | 437 | testdata/Prelude.lc 169:51-170:164 'tuptype ('map (Tuple2 String Type) Type ('snd String Type) V1) -> V1 | V13 |
438 | testdata/Prelude.lc 169:53-169:56 {a} -> {b : Eq a} -> a -> a->Bool | 438 | testdata/Prelude.lc 169:53-169:56 {a} -> {b : Eq a} -> a -> a->Bool |
439 | testdata/Prelude.lc 169:57-169:59 V6 | 439 | testdata/Prelude.lc 169:57-169:59 V6 |
440 | testdata/Prelude.lc 169:62-169:65 {a} -> {b} -> Tuple2 a b -> a | 440 | testdata/Prelude.lc 169:62-169:65 {a} -> {b} -> Tuple2 a b -> a |
441 | testdata/Prelude.lc 169:62-169:113 V15 | 441 | testdata/Prelude.lc 169:62-169:113 V15 |
442 | testdata/Prelude.lc 169:62-170:164 Bool->V16 | 442 | testdata/Prelude.lc 169:62-170:164 Bool->V16 |
443 | testdata/Prelude.lc 169:66-169:113 Tuple2 V15 ('tuptype ('map (Tuple2 String Type) Type (\a:Type -> 'snd String Type a) V8)) | 443 | testdata/Prelude.lc 169:66-169:113 Tuple2 V15 ('tuptype ('map (Tuple2 String Type) Type ('snd String Type) V8)) |
444 | testdata/Prelude.lc 169:67-169:79 {a} -> {b} -> a->b | 444 | testdata/Prelude.lc 169:67-169:79 {a} -> {b} -> a->b |
445 | testdata/Prelude.lc 169:67-169:82 {a} -> V1->a | 445 | testdata/Prelude.lc 169:67-169:82 {a} -> V1->a |
446 | testdata/Prelude.lc 169:67-169:109 V0 -> Tuple2 V19 ('tuptype ('map (Tuple2 String Type) Type (\b:Type -> 'snd String Type b) V12)) | 446 | testdata/Prelude.lc 169:67-169:109 V0 -> Tuple2 V19 ('tuptype ('map (Tuple2 String Type) Type ('snd String Type) V12)) |
447 | testdata/Prelude.lc 169:84-169:109 Type | 447 | testdata/Prelude.lc 169:84-169:109 Type |
448 | testdata/Prelude.lc 169:85-169:86 Type | 448 | testdata/Prelude.lc 169:85-169:86 Type |
449 | testdata/Prelude.lc 169:88-169:95 List Type -> Type | 449 | testdata/Prelude.lc 169:88-169:95 List Type -> Type |
@@ -453,7 +453,7 @@ testdata/Prelude.lc 169:97-169:100 {a} -> {b} -> a->b -> List a -> List b | |||
453 | testdata/Prelude.lc 169:97-169:104 List (Tuple2 V0 V1) -> List V2 | 453 | testdata/Prelude.lc 169:97-169:104 List (Tuple2 V0 V1) -> List V2 |
454 | testdata/Prelude.lc 169:101-169:104 {a} -> {b} -> Tuple2 a b -> b | 454 | testdata/Prelude.lc 169:101-169:104 {a} -> {b} -> Tuple2 a b -> b |
455 | testdata/Prelude.lc 169:105-169:107 List (Tuple2 String Type) | 455 | testdata/Prelude.lc 169:105-169:107 List (Tuple2 String Type) |
456 | testdata/Prelude.lc 169:110-169:112 'tuptype ('map (Tuple2 String Type) Type (\a:Type -> 'snd String Type a) V3) | 456 | testdata/Prelude.lc 169:110-169:112 'tuptype ('map (Tuple2 String Type) Type ('snd String Type) V3) |
457 | testdata/Prelude.lc 170:51-170:58 {a} -> {b : List (Tuple2 String Type)} -> c:String -> {d : 'isKeyC String 'TT c a b} -> RecordC b -> a | 457 | testdata/Prelude.lc 170:51-170:58 {a} -> {b : List (Tuple2 String Type)} -> c:String -> {d : 'isKeyC String 'TT c a b} -> RecordC b -> a |
458 | testdata/Prelude.lc 170:51-170:61 {a : List (Tuple2 String Type)} -> b:String -> {c : 'isKeyC String 'TT b V19 a} -> RecordC a -> V21 | 458 | testdata/Prelude.lc 170:51-170:61 {a : List (Tuple2 String Type)} -> b:String -> {c : 'isKeyC String 'TT b V19 a} -> RecordC a -> V21 |
459 | testdata/Prelude.lc 170:51-170:65 a:String -> {b : 'isKeyC String 'TT a V17 V10} -> RecordC V11 -> V19 | 459 | testdata/Prelude.lc 170:51-170:65 a:String -> {b : 'isKeyC String 'TT a V17 V10} -> RecordC V11 -> V19 |
@@ -473,13 +473,13 @@ testdata/Prelude.lc 170:89-170:90 String | |||
473 | testdata/Prelude.lc 170:91-170:92 Type | 473 | testdata/Prelude.lc 170:91-170:92 Type |
474 | testdata/Prelude.lc 170:93-170:95 List (Tuple2 String Type) | 474 | testdata/Prelude.lc 170:93-170:95 List (Tuple2 String Type) |
475 | testdata/Prelude.lc 170:98-170:164 RecordC V1 | 475 | testdata/Prelude.lc 170:98-170:164 RecordC V1 |
476 | testdata/Prelude.lc 170:99-170:109 {a : List (Tuple2 String Type)} -> 'tuptype ('map (Tuple2 String Type) Type (\b:Type -> 'snd String Type b) a) -> RecordC a | 476 | testdata/Prelude.lc 170:99-170:109 {a : List (Tuple2 String Type)} -> 'tuptype ('map (Tuple2 String Type) Type ('snd String Type) a) -> RecordC a |
477 | testdata/Prelude.lc 170:110-170:163 'tuptype ('map (Tuple2 String Type) Type (\a:Type -> 'snd String Type a) V9) | 477 | testdata/Prelude.lc 170:110-170:163 'tuptype ('map (Tuple2 String Type) Type ('snd String Type) V9) |
478 | testdata/Prelude.lc 170:111-170:114 {a} -> {b} -> Tuple2 a b -> b | 478 | testdata/Prelude.lc 170:111-170:114 {a} -> {b} -> Tuple2 a b -> b |
479 | testdata/Prelude.lc 170:115-170:162 Tuple2 V16 ('tuptype ('map (Tuple2 String Type) Type (\a:Type -> 'snd String Type a) V9)) | 479 | testdata/Prelude.lc 170:115-170:162 Tuple2 V16 ('tuptype ('map (Tuple2 String Type) Type ('snd String Type) V9)) |
480 | testdata/Prelude.lc 170:116-170:128 {a} -> {b} -> a->b | 480 | testdata/Prelude.lc 170:116-170:128 {a} -> {b} -> a->b |
481 | testdata/Prelude.lc 170:116-170:131 {a} -> V1->a | 481 | testdata/Prelude.lc 170:116-170:131 {a} -> V1->a |
482 | testdata/Prelude.lc 170:116-170:158 V0 -> Tuple2 V20 ('tuptype ('map (Tuple2 String Type) Type (\b:Type -> 'snd String Type b) V13)) | 482 | testdata/Prelude.lc 170:116-170:158 V0 -> Tuple2 V20 ('tuptype ('map (Tuple2 String Type) Type ('snd String Type) V13)) |
483 | testdata/Prelude.lc 170:133-170:158 Type | 483 | testdata/Prelude.lc 170:133-170:158 Type |
484 | testdata/Prelude.lc 170:134-170:135 Type | 484 | testdata/Prelude.lc 170:134-170:135 Type |
485 | testdata/Prelude.lc 170:137-170:144 List Type -> Type | 485 | testdata/Prelude.lc 170:137-170:144 List Type -> Type |
@@ -489,7 +489,7 @@ testdata/Prelude.lc 170:146-170:149 {a} -> {b} -> a->b -> List a -> List b | |||
489 | testdata/Prelude.lc 170:146-170:153 List (Tuple2 V0 V1) -> List V2 | 489 | testdata/Prelude.lc 170:146-170:153 List (Tuple2 V0 V1) -> List V2 |
490 | testdata/Prelude.lc 170:150-170:153 {a} -> {b} -> Tuple2 a b -> b | 490 | testdata/Prelude.lc 170:150-170:153 {a} -> {b} -> Tuple2 a b -> b |
491 | testdata/Prelude.lc 170:154-170:156 List (Tuple2 String Type) | 491 | testdata/Prelude.lc 170:154-170:156 List (Tuple2 String Type) |
492 | testdata/Prelude.lc 170:159-170:161 'tuptype ('map (Tuple2 String Type) Type (\a:Type -> 'snd String Type a) V4) | 492 | testdata/Prelude.lc 170:159-170:161 'tuptype ('map (Tuple2 String Type) Type ('snd String Type) V4) |
493 | testdata/Prelude.lc 174:1-174:4 Float -> Float -> Float -> VecS Float 4 | 493 | testdata/Prelude.lc 174:1-174:4 Float -> Float -> Float -> VecS Float 4 |
494 | testdata/Prelude.lc 174:13-174:15 {a} -> a -> a -> a -> a -> VecS a 4 | 494 | testdata/Prelude.lc 174:13-174:15 {a} -> a -> a -> a -> a -> VecS a 4 |
495 | testdata/Prelude.lc 174:13-174:17 V5 -> V6 -> V7 -> VecS V8 4 | 495 | testdata/Prelude.lc 174:13-174:17 V5 -> V6 -> V7 -> VecS V8 4 |
diff --git a/testdata/language-features/adt/adt05.out b/testdata/language-features/adt/adt05.out index 29167f4f..97b40b5c 100644 --- a/testdata/language-features/adt/adt05.out +++ b/testdata/language-features/adt/adt05.out | |||
@@ -1 +1 @@ | |||
[32m[32m[32m[32mmain[m[m[m[m \ No newline at end of file | [32m[32mmain[m[m \ No newline at end of file | ||