diff --git a/extra/mason/test/test.factor b/extra/mason/test/test.factor
index d50c77f71b..235c9adbc6 100644
--- a/extra/mason/test/test.factor
+++ b/extra/mason/test/test.factor
@@ -52,7 +52,7 @@ M: method-body word-vocabulary "method-generic" word-prop word-vocabulary ;
     do-step ;
 
 : benchmark-ms ( quot -- ms )
-    benchmark 1000 /i ; inline
+    benchmark 1000000 /i ; inline
 
 : check-boot-image ( -- )
     "" to-refresh drop 2dup [ empty? not ] either?
@@ -75,4 +75,4 @@ M: method-body word-vocabulary "method-generic" word-prop word-vocabulary ;
         do-compile-errors
     ] with-directory ;
 
-MAIN: do-all
\ No newline at end of file
+MAIN: do-all