diff --git a/extra/benchmark/benchmark.factor b/extra/benchmark/benchmark.factor index 5a8e7595b5..a8c6e2a2ac 100755 --- a/extra/benchmark/benchmark.factor +++ b/extra/benchmark/benchmark.factor @@ -2,7 +2,7 @@ ! See http://factorcode.org/license.txt for BSD license. USING: kernel vocabs vocabs.loader tools.time tools.vocabs arrays assocs io.styles io help.markup prettyprint sequences -continuations debugger ; +continuations debugger math ; IN: benchmark : run-benchmark ( vocab -- result ) @@ -17,12 +17,12 @@ IN: benchmark standard-table-style [ [ [ "Benchmark" write ] with-cell - [ "Time (ms)" write ] with-cell + [ "Time (seconds)" write ] with-cell ] with-row [ [ [ [ 1array $vocab-link ] with-cell ] - [ pprint-cell ] bi* + [ 1000000 /f pprint-cell ] bi* ] with-row ] assoc-each ] tabular-output ;