diff options
| author | ubq323 <ubq323@ubq323.website> | 2024-06-27 12:01:33 +0100 |
|---|---|---|
| committer | ubq323 <ubq323@ubq323.website> | 2024-06-27 12:05:27 +0100 |
| commit | 991e694b558691264f82d80a7aa1b86ef3d2c92c (patch) | |
| tree | 881946b076bdcc6545aa167ef7d544b6e16f9abb /tests/sumrec.bth | |
| parent | a559125a2d7af771784614b7a2092cc7fb707345 (diff) | |
more tests
Diffstat (limited to 'tests/sumrec.bth')
| -rw-r--r-- | tests/sumrec.bth | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/sumrec.bth b/tests/sumrec.bth new file mode 100644 index 0000000..8c8804a --- /dev/null +++ b/tests/sumrec.bth @@ -0,0 +1,7 @@ +(set f' (fn (x acc) + (if (< x 1) + acc + (f' (- x 1) (+ acc x))))) +(set f (fn (x) (f' x 0))) +(say (f 10)) +(say (f 100)) |