flip-benchmark ( -- )

Vocabulary

benchmark.flip

Inputs

None

Outputs

None

Definition

USING: kernel math sequences ;

IN: benchmark.flip

: flip-benchmark ( -- )
    1000000 [ my-generic flip drop ] times 1000000
    [ my-array flip drop ] times ;