aboutsummaryrefslogtreecommitdiffstats
path: root/test/ack.resp
diff options
context:
space:
mode:
Diffstat (limited to 'test/ack.resp')
-rw-r--r--test/ack.resp7
1 files changed, 7 insertions, 0 deletions
diff --git a/test/ack.resp b/test/ack.resp
new file mode 100644
index 0000000..76fb397
--- /dev/null
+++ b/test/ack.resp
@@ -0,0 +1,7 @@
+(def (ack m n)
+ (if (= 0 m) (+ n 1)
+ (= 0 n) (ack (- m 1) 1)
+ (ack (- m 1) (ack m (- n 1)))))
+
+(ack 3 10)
+