RosettaCodeData/Task/FizzBuzz/Min/fizzbuzz.min

7 lines
157 B
Plaintext

0 (
succ false :hit
(3 mod 0 ==) ("Fizz" print! true @hit) when
(5 mod 0 ==) ("Buzz" print! true @hit) when
(hit) (print) unless newline
) 100 times