diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2012-04-22 09:18:21 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2012-04-22 09:18:21 -0400 |
| commit | b523ce2af72efd86ad976ea518ab18818bef4541 (patch) | |
| tree | 6173672d1ba5fececb06d1500eaaafa6b61a0ec3 /tests/cancel2.ur | |
| parent | 210ec59c8cc28038d18edd14022af5726dbaf93e (diff) | |
Another test for cancelation in error messages
Diffstat (limited to 'tests/cancel2.ur')
| -rw-r--r-- | tests/cancel2.ur | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/cancel2.ur b/tests/cancel2.ur new file mode 100644 index 00000000..30bea655 --- /dev/null +++ b/tests/cancel2.ur @@ -0,0 +1,5 @@ +fun f [r] [[Id, Foo] ~ r] (x : $(map (fn ts => $ts) r ++ [Id = int, Foo = string])) + : $(map (fn ts => $ts) r ++ [Foo = string]) = x + +val r = {} +val x : $(map (fn ts => $ts) _ ++ [Foo = string]) = f r |