make-benchmark ( -- )

Vocabulary

benchmark.make

Inputs

None

Outputs

None

Definition

USING: kernel sequences ;

IN: benchmark.make

: make-benchmark ( -- )
    5000 <iota> [
        [ make-strings ] [ make-arrays ] [ make-vectors ] tri
        3drop
    ] each ;