aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests/monadTest.ur
diff options
context:
space:
mode:
Diffstat (limited to 'tests/monadTest.ur')
-rw-r--r--tests/monadTest.ur3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/monadTest.ur b/tests/monadTest.ur
new file mode 100644
index 00000000..16a10f74
--- /dev/null
+++ b/tests/monadTest.ur
@@ -0,0 +1,3 @@
+val x : transaction int = Monad.liftM2 plus (return 1) (return 2)
+
+val x : transaction xbody = List.mapXiM (fn i x => return <xml><li>{[i]} = {[x]}</li></xml>) (1 :: 2 :: [])