diff --git a/extra/benchmark/benchmark.factor b/extra/benchmark/benchmark.factor
index 7d068b1fea..3a19d0a6e1 100755
--- a/extra/benchmark/benchmark.factor
+++ b/extra/benchmark/benchmark.factor
@@ -5,25 +5,14 @@ arrays assocs io.styles io help.markup prettyprint sequences
 continuations debugger ;
 IN: benchmark
 
-! : run-benchmark ( vocab -- result )
-!     "=== Benchmark " write dup print flush
-!     dup require
-!     [ [ run ] benchmark ] [ error. drop f f ] recover 2array
-!     dup . ;
-
 : run-benchmark ( vocab -- result )
-  "=== Benchmark " write dup vocab-name print flush
-  [ dup require [ run ] benchmark ] [ error. drop f f ] recover 2array
-  dup . ;
-
-! : run-benchmarks ( -- assoc )
-!     "benchmark" load-children
-!     "benchmark" dup child-vocabs remove
-!     [ dup run-benchmark ] { } map>assoc ;
+    "=== Benchmark " write dup vocab-name print flush
+    [ dup require [ run ] benchmark ] [ error. drop f f ] recover 2array
+    dup . ;
 
 : run-benchmarks ( -- assoc )
-  "benchmark"
-    all-child-vocabs values concat [ dup run-benchmark ] { } map>assoc ;
+    "benchmark"
+        all-child-vocabs values concat [ dup run-benchmark ] { } map>assoc ;
 
 : benchmarks. ( assoc -- )
     standard-table-style [