summaryrefslogtreecommitdiff
path: root/tests/pathmap.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-05-14 08:13:54 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-05-14 08:13:54 -0400
commitae8c16af976173ab73c63dd0ca7b9dc2183b3d6b (patch)
treecd83a1670f329d23e70b5b1017d2ead58829009c /tests/pathmap.ur
parent90d8c8cb498fd7aacd19682d2979186e76805808 (diff)
Improving/reordering Unpoly and Especialize; pathmaps
Diffstat (limited to 'tests/pathmap.ur')
-rw-r--r--tests/pathmap.ur7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/pathmap.ur b/tests/pathmap.ur
new file mode 100644
index 00000000..44699048
--- /dev/null
+++ b/tests/pathmap.ur
@@ -0,0 +1,7 @@
+val x = List.rev (List.Cons (1, List.Cons (0, List.Nil)))
+val y = List.mp (plus 2) x
+
+fun main () : transaction page = return <xml><body>
+ {[x]}<br/>
+ {[y]}
+</body></xml>