summaryrefslogtreecommitdiff
path: root/examples/fib.gorth
diff options
context:
space:
mode:
Diffstat (limited to 'examples/fib.gorth')
-rw-r--r--examples/fib.gorth16
1 files changed, 0 insertions, 16 deletions
diff --git a/examples/fib.gorth b/examples/fib.gorth
deleted file mode 100644
index bf2b90d..0000000
--- a/examples/fib.gorth
+++ /dev/null
@@ -1,16 +0,0 @@
-# Print out given number of elements in the Fibonacci sequence, 46 is the max value
-define fib
- var lim push lim
- var a 1 push a
- var b 1 push b
- pull lim while dup 0 > do
- pull a dump
- pull b dup
- pull a
- + push b
- push a
- 1 -
- done
-end
-
-10 fib