aboutsummaryrefslogtreecommitdiff
path: root/forth/fib.fs
diff options
context:
space:
mode:
Diffstat (limited to 'forth/fib.fs')
-rw-r--r--forth/fib.fs5
1 files changed, 5 insertions, 0 deletions
diff --git a/forth/fib.fs b/forth/fib.fs
new file mode 100644
index 0000000..8f4cfbc
--- /dev/null
+++ b/forth/fib.fs
@@ -0,0 +1,5 @@
+-fib
+marker fib
+
+: fib ( n -- fib )
+ 0 1 rot 0 ?do over + swap loop drop ;