From 77d84c1539851f096b2c632cc6381ac72b2bfd1b Mon Sep 17 00:00:00 2001 From: Matthew Hall Date: Sat, 18 Feb 2023 17:35:13 +1300 Subject: Implement multline comments --- examples/fizzbuzz.dumb | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'examples/fizzbuzz.dumb') diff --git a/examples/fizzbuzz.dumb b/examples/fizzbuzz.dumb index 43b4d82..2ba6033 100644 --- a/examples/fizzbuzz.dumb +++ b/examples/fizzbuzz.dumb @@ -1,8 +1,14 @@ +''' bottom of the stack is the incrementing value, starts at 1 ''' 1 +''' while the incrementing value is <= 100 ''' WHILE 100 OVER <= DO + ''' push string "Buzz" if inc. is divisible by 5, else an empty string ''' 5 OVER % IF 0 == DO "Buzz" ELSE "" END + ''' push string "Fizz" if inc. is divisible by 3, else an empty string ''' OVER 3 SWAP % IF 0 == DO "Fizz" ELSE "" END + ''' concat the two strings and copy the inc., if the string is empty, swap them ''' ++ OVER SWAP IF DUP "" == DO SWAP END + ''' print the top of the stack, drop the next item, add 1 to inc. ''' . DROP 1 + END -- cgit v1.2.1