Mercurial > urweb

diff tests/reduce.lac @ 21:067029c748e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Beta reductions for expressions
author Adam Chlipala <adamc@hcoop.net>
date Sun, 08 Jun 2008 16:02:26 -0400
parents 1ab48e37d0ef
children d8850cc06d24
line wrap: on
line diff
--- a/tests/reduce.lac	Sun Jun 08 15:47:44 2008 -0400
+++ b/tests/reduce.lac	Sun Jun 08 16:02:26 2008 -0400
@@ -17,3 +17,4 @@
 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"}