diff options
| -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 |