summaryrefslogtreecommitdiff
path: root/examples/fizzbuzz.dumb
diff options
context:
space:
mode:
Diffstat (limited to 'examples/fizzbuzz.dumb')
-rw-r--r--examples/fizzbuzz.dumb13
1 files changed, 4 insertions, 9 deletions
diff --git a/examples/fizzbuzz.dumb b/examples/fizzbuzz.dumb
index 692402a..43b4d82 100644
--- a/examples/fizzbuzz.dumb
+++ b/examples/fizzbuzz.dumb
@@ -1,13 +1,8 @@
1
WHILE 100 OVER <= DO
- 3 OVER %
- OVER 5 SWAP %
- IF 0 ==
- DO
- IF 0 == DO "Fizzbuzz" ELSE "Buzz" END
- ELSE
- IF 0 == DO "Fizz" ELSE DUP END
- END
- . 1 +
+ 5 OVER % IF 0 == DO "Buzz" ELSE "" END
+ OVER 3 SWAP % IF 0 == DO "Fizz" ELSE "" END
+ ++ OVER SWAP IF DUP "" == DO SWAP END
+ . DROP 1 +
END