stack-benchmark ( -- )

Vocabulary

benchmark.stack

Inputs

None

Outputs

None

Definition

USING: kernel sequences vectors ;

IN: benchmark.stack

: stack-benchmark ( -- )
    V{ 123456 } clone stack-loop
    20000 <vector> 123456 over set-first stack-loop ;