diff --git a/extra/benchmark/benchmark.factor b/extra/benchmark/benchmark.factor index ca48e6208c..220f16fad5 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 math namespaces ; +continuations debugger math namespaces memory ; IN: benchmark : run-benchmark ( vocab -- ) [ "=== " write vocab-name print flush ] [ - [ [ require ] [ [ run ] benchmark ] [ ] tri timings ] + [ [ require ] [ gc [ run ] benchmark ] [ ] tri timings ] [ swap errors ] recover get set-at ] bi ;