planckforth/benchmark/fib.fs

mirror of https://github.com/nineties/planckforth synced 2024-12-25 21:58:22 +01:00
: fib dup 2 < unless 1- dup recurse swap 1- recurse + then ;
30 fib . cr
Add new benchmark 2021-01-11 09:28:57 +01:00			`: fib dup 2 < unless 1- dup recurse swap 1- recurse + then ;`
Change benchmark program from fib(20) to fib(30) 2021-01-11 10:29:15 +01:00			`30 fib . cr`