annotate tests/cancel2.ur @ 1724:125f9b01fbf1
Another test for cancelation in error messages
| author |
Adam Chlipala <adam@chlipala.net> |
| date |
Sun, 22 Apr 2012 09:18:21 -0400 |
| parents |
|
| children |
|
| rev |
line source |
|
adam@1724
|
1 fun f [r] [[Id, Foo] ~ r] (x : $(map (fn ts => $ts) r ++ [Id = int, Foo = string]))
|
|
adam@1724
|
2 : $(map (fn ts => $ts) r ++ [Foo = string]) = x
|
|
adam@1724
|
3
|
|
adam@1724
|
4 val r = {}
|
|
adam@1724
|
5 val x : $(map (fn ts => $ts) _ ++ [Foo = string]) = f r
|
