summaryrefslogtreecommitdiff
path: root/tests/pathmap.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-05-14 09:11:58 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-05-14 09:11:58 -0400
commit9e6bd5dd1394c99f0a9b29369a4957c958e0830c (patch)
tree40c991c6a8032bc73433e5d3f9c1db78a98674ef /tests/pathmap.ur
parent22b407de7cf9ee5cc5947369372d9ca8373134a6 (diff)
Fix a nasty binding bug in CoreUtil
Diffstat (limited to 'tests/pathmap.ur')
-rw-r--r--tests/pathmap.ur3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/pathmap.ur b/tests/pathmap.ur
index 2ce1f5f0..98eaad7e 100644
--- a/tests/pathmap.ur
+++ b/tests/pathmap.ur
@@ -4,5 +4,6 @@ val y = List.mp (plus 2) x
fun main () : transaction page = return <xml><body>
{[x]}<br/>
{[y]}<br/>
- {[Aux.hello]}
+ {[Aux.hello]}<br/>
+ {List.mapX (fn n => <xml>{[n]}!</xml>) x}
</body></xml>