mirror of
https://github.com/Noratrieb/GRSBPL.git
synced 2026-01-14 19:55:03 +01:00
for real
This commit is contained in:
parent
0b96e0dd0d
commit
e8967b3273
4 changed files with 237 additions and 0 deletions
9
fizzbuzz.grsbpl
Normal file
9
fizzbuzz.grsbpl
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
10 factorial 1 goto exit
|
||||
|
||||
function factorial 1
|
||||
dup not goto isZero
|
||||
pop dup 1 - factorial * return
|
||||
:isZero
|
||||
1 pop return
|
||||
|
||||
:exit pop dup nout
|
||||
Loading…
Add table
Add a link
Reference in a new issue