diff --git a/extra/benchmark/make/make.factor b/extra/benchmark/make/make.factor index f38e0660e4..43e9a04be5 100644 --- a/extra/benchmark/make/make.factor +++ b/extra/benchmark/make/make.factor @@ -9,10 +9,10 @@ IN: benchmark.make [ [ CHAR: a , ] times ] "" make ; : make-arrays ( n -- seq ) - [ iota [ , ] each ] { } make ; + [ iota % ] { } make ; : make-vectors ( n -- seq ) - [ iota [ , ] each ] V{ } make ; + [ iota % ] V{ } make ; : make-benchmark ( -- ) 5,000 iota [