mason.test: Fix benchmarks for mason. Proper fix eventually...

diff --git a/extra/mason/test/test.factor b/extra/mason/test/test.factor
index bc20ef0cb165c0f406161972902c3f3b04fb1a8a..420e3b9eb300b4cc6dd17cf29aa16ccc1271b51f 100644 (file)
--- a/extra/mason/test/test.factor
+++ b/extra/mason/test/test.factor
@@ -114,7 +114,15 @@ SYMBOL: skip-mason-benchmarks
         [ generate-help ] benchmark html-help-time-file to-file
         [ do-tests ] benchmark test-time-file to-file
         [ do-help-lint ] benchmark help-lint-time-file to-file
-        skip-mason-benchmarks get [ [ do-benchmarks ] benchmark benchmark-time-file to-file ] unless
+        ! Because of the way mason is written, it expects these files to exist.
+        ! So fake them.
+        skip-mason-benchmarks get [
+            { } benchmarks-file to-file
+            benchmark-error-messages-file touch-file
+            0 benchmark-time-file to-file
+        ] [
+            [ do-benchmarks ] benchmark benchmark-time-file to-file
+        ] if
         do-compile-errors
     ] with-directory ;