From 73d664a7d5abaad2fc698d9fb9ea5b6cf60c78f9 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Thu, 27 Sep 2007 03:59:37 -0400
Subject: [PATCH] Minor benchmark update

---
 extra/benchmark/benchmark.factor | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/extra/benchmark/benchmark.factor b/extra/benchmark/benchmark.factor
index 0e7aa60abd..95b42f28e0 100644
--- a/extra/benchmark/benchmark.factor
+++ b/extra/benchmark/benchmark.factor
@@ -6,7 +6,8 @@ IN: benchmark
 
 : run-benchmark ( vocab -- result )
     "=== Benchmark " write dup print flush
-    dup require [ run ] benchmark 2array ;
+    dup require [ run ] benchmark 2array
+    dup . ;
 
 : run-benchmarks ( -- assoc )
     "benchmark" load-children