diff --git a/extra/benchmark/benchmark.factor b/extra/benchmark/benchmark.factor index 01e7d2c78e..bd13455357 100755 --- a/extra/benchmark/benchmark.factor +++ b/extra/benchmark/benchmark.factor @@ -6,7 +6,7 @@ continuations debugger ; IN: benchmark : run-benchmark ( vocab -- result ) - [ [ run ] benchmark ] [ error. drop f f ] recover 2array ; + [ dup require [ run ] benchmark ] [ error. drop f f ] recover 2array ; : run-benchmarks ( -- assoc ) "benchmark" all-child-vocabs values concat [ vocab-name ] map