faster-fib ( m -- n )

Vocabulary

benchmark.fib8

Inputs

m

an object

Outputs

n

an object

Definition

USING: kernel math ;

IN: benchmark.fib8

: faster-fib ( m -- n ) dup 0 >= [ throw ] unless (faster-fib) ;