diff --git a/extra/benchmark/fannkuch/fannkuch.factor b/extra/benchmark/fannkuch/fannkuch.factor index 40dd54ca99..f3a41ca4a9 100644 --- a/extra/benchmark/fannkuch/fannkuch.factor +++ b/extra/benchmark/fannkuch/fannkuch.factor @@ -24,7 +24,7 @@ IN: benchmark.fannkuch : fannkuch ( n -- ) [ - [ 0 0 ] dip [ 1 + ] B{ } map-as + [ 0 0 ] dip iota [ 1 + ] B{ } map-as [ fannkuch-step ] each-permutation nip ] keep "Pfannkuchen(" write pprint ") = " write . ;