Sign in
llvm
/
llvm
/
refs/heads/release_16
/
.
/
projects
/
Stacker
/
samples
/
fibonacci.st
blob: d5132d8bbea30c0107da185e0074e22a82ac467d [
file
] [
log
] [
blame
]
#
# Fibonacci Algorithm in Stacker.
#
:
print
>
d CR
;
:
fibonacci RROT DUP2
+
print
3
PICK
--
;
:
MAIN
0
print
1
print
44
WHILE fibonacci
END
;