11 lines
258 B
Plaintext
Executable File
11 lines
258 B
Plaintext
Executable File
#!/usr/bin/env clyx
|
|
:: _main [
|
|
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 ]
|
|
]
|
|
]
|