diff options
author | 2008-06-08 16:02:26 -0400 | |
---|---|---|
committer | 2008-06-08 16:02:26 -0400 | |
commit | 813e9aa4d196962f47c784aeedeaf1cddf54dc4f (patch) | |
tree | ad51ff72c12a5e8287bee29501a6c7953879fdd9 /tests/reduce.lac | |
parent | e18863bcabc5d185b7fe1fc750bdf0bbdb5a4f78 (diff) |
Beta reductions for expressions
Diffstat (limited to 'tests/reduce.lac')
-rw-r--r-- | tests/reduce.lac | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/reduce.lac b/tests/reduce.lac index a6fa1e94..2585862d 100644 --- a/tests/reduce.lac +++ b/tests/reduce.lac @@ -17,3 +17,4 @@ con c7 = apply (fst int) string val grab = fn n :: Name => fn t :: Type => fn fs :: {Type} => fn x : $([n = t] ++ fs) => x val grabA = grab[#A][int][[B = string]] +val test_grabA = grabA {A = 6, B = "13"} |