diff options
Diffstat (limited to 'tests/fizzbuzz.bth')
| -rw-r--r-- | tests/fizzbuzz.bth | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/fizzbuzz.bth b/tests/fizzbuzz.bth new file mode 100644 index 0000000..e70c2c1 --- /dev/null +++ b/tests/fizzbuzz.bth @@ -0,0 +1,10 @@ +(do + (set n 1) + (while (< n 30) + (print + (if (= 0 (% n 5)) + (if (= 0 (% n 3)) "fizzbuzz" "buzz") + (if (= 0 (% n 3)) "fizz" n))) + (set n (+ n 1)))) + + |