Files
clyx/examples/fizzbuzz.clx
T

11 lines
256 B
Plaintext
Executable File

#!/usr/bin/env clyx
_start [
for [ 1 101 range ] [
1 # tracking flag
swap # the index is on top
dup 3 mod 0= if [ "Fizz" puts swap drop 0 swap ] [ ]
dup 5 mod 0= if [ "Buzz" puts swap drop 0 swap ] [ ]
swap if [ . ] [ drop cr ]
]
]