summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2013-11-03 19:27:30 -0500
committerGravatar Adam Chlipala <adam@chlipala.net>2013-11-03 19:27:30 -0500
commitd2196dbd5c4379bdbc307d2035c8a07ef09b592d (patch)
tree03de0d970495a013a2e126010600137ebb5746dd /tests
parent65b818146effe2f74192a3b1d65b4ec792a8a350 (diff)
ListPair.map2, based on code by escalier@riseup.net
Diffstat (limited to 'tests')
-rw-r--r--tests/listpair.ur6
-rw-r--r--tests/listpair.urp5
2 files changed, 11 insertions, 0 deletions
diff --git a/tests/listpair.ur b/tests/listpair.ur
new file mode 100644
index 00000000..4ecacfd3
--- /dev/null
+++ b/tests/listpair.ur
@@ -0,0 +1,6 @@
+val x = 1 :: 2 :: []
+val y = 3 :: 4 :: []
+
+fun main () : transaction page = return <xml>
+ {[ListPair.map2 plus x y]}
+</xml>
diff --git a/tests/listpair.urp b/tests/listpair.urp
new file mode 100644
index 00000000..1b447ed6
--- /dev/null
+++ b/tests/listpair.urp
@@ -0,0 +1,5 @@
+rewrite all Listpair/*
+
+$/list
+$/listPair
+listpair