summaryrefslogtreecommitdiff
path: root/tests/longConst.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2012-07-18 17:29:13 -0400
committerGravatar Adam Chlipala <adam@chlipala.net>2012-07-18 17:29:13 -0400
commita1c7ace0c228aeac6c8fc9219505d13006d09e48 (patch)
treeeda48e786ad2690ca0f2dc994a44290d74302129 /tests/longConst.ur
parent8c704c35a1c0ed9e83e533f77fb660945d7d42c2 (diff)
Support fancy expressions in module-level 'val' declarations
Diffstat (limited to 'tests/longConst.ur')
-rw-r--r--tests/longConst.ur12
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/longConst.ur b/tests/longConst.ur
new file mode 100644
index 00000000..d81e2ad9
--- /dev/null
+++ b/tests/longConst.ur
@@ -0,0 +1,12 @@
+val ls = 1 :: 2 :: 3 :: 4 :: 5 :: 6
+ :: 1 :: 2 :: 3 :: 4 :: 5 :: 6
+ :: 1 :: 2 :: 3 :: 4 :: 5 :: 6
+ :: 1 :: 2 :: 3 :: 4 :: 5 :: 6
+ :: 1 :: 2 :: 3 :: 4 :: 5 :: 6
+ :: 1 :: 2 :: 3 :: 4 :: 5 :: 6
+ :: []
+
+fun main () : transaction page = return <xml><body>
+ {List.mapX txt ls}<br/>
+ {List.mapX txt ls}
+</body></xml>