FizzBuzz: Difference between revisions
→{{header|YAMLScript}}
Not a robot (talk | contribs) (Add Refal) |
|||
Line 12,160:
# for a certain requested number (default is 100).
defn main(
fizzbuzz =: "fizzbuzz-$impl"
when-not ENV.
say: "Running function '$fizzbuzz' with count=$count"
function =: resolve(fizzbuzz.symbol(
result =: function(count)
Line 12,181 ⟶ 12,179:
fn(x):
cond:
zero?
zero?
zero?
=>: x
=>: 1 .. n
Line 12,191 ⟶ 12,189:
if (i > n):
=>: l
recur inc(i):
conj l:
cond:
zero?
zero?
zero?
=>: i
Line 12,205 ⟶ 12,202:
s =:
str:
when zero?
if empty?(s): x s
rng: 1 n
| |||