aboutsummaryrefslogtreecommitdiffhomepage
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
commitfdc4582e7fbfaecebaa2d27660a0184d9949b232 (patch)
treecd83a1670f329d23e70b5b1017d2ead58829009c /tests/pathmap.ur
parent8c48972ebbb4fa43af6dee99b79648fe1546d867 (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>