summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2010-10-14 11:35:56 -0400
committerGravatar Adam Chlipala <adam@chlipala.net>2010-10-14 11:35:56 -0400
commitcfffcb997d0345f90444725248c7c85b035c30b4 (patch)
tree3e839cc2566526f3e4a294229c41f88e60e8d24e /tests
parent7bf0a0124a6c8a834983a660af53d8789ac0a8ac (diff)
-limit for running time
Diffstat (limited to 'tests')
-rw-r--r--tests/thog.ur9
-rw-r--r--tests/thog.urp2
-rw-r--r--tests/thog.urs1
3 files changed, 12 insertions, 0 deletions
diff --git a/tests/thog.ur b/tests/thog.ur
new file mode 100644
index 00000000..29e335fc
--- /dev/null
+++ b/tests/thog.ur
@@ -0,0 +1,9 @@
+fun ack (m, n) =
+ if m = 0 then
+ n + 1
+ else if n = 0 then
+ ack (m - 1, 1)
+ else
+ ack (m - 1, ack (m, n - 1))
+
+fun main n = return <xml>{[ack (n, 4)]}</xml>
diff --git a/tests/thog.urp b/tests/thog.urp
new file mode 100644
index 00000000..e9e7e469
--- /dev/null
+++ b/tests/thog.urp
@@ -0,0 +1,2 @@
+$/list
+thog
diff --git a/tests/thog.urs b/tests/thog.urs
new file mode 100644
index 00000000..38b757ea
--- /dev/null
+++ b/tests/thog.urs
@@ -0,0 +1 @@
+val main : int -> transaction page