mason.test: stop using errorlist

diff --git a/extra/mason/test/test.factor b/extra/mason/test/test.factor
index 1112bbd2ff5094ec2f33b53d1a2e6f6e0eb52512..651c7139021b9c8b6d4ac640d05e5ac5a406299f 100644 (file)
--- a/extra/mason/test/test.factor
+++ b/extra/mason/test/test.factor
@@ -21,14 +21,12 @@ IN: mason.test
 : load-failures. ( failures -- ) [ load-error. nl ] each ;
 
 : require-all-no-restarts ( vocabs -- failures )
-    V{ } clone errorlist [
-        V{ } clone [
-            '[
-                [ require ]
-                [ swap vocab-name _ set-at ] recover
-            ] each
-        ] keep
-    ] with-variable ;
+    V{ } clone [
+        '[
+            [ require ]
+            [ swap vocab-name _ set-at ] recover
+        ] each
+    ] keep ;
 
 : load-from-root-no-restarts ( root prefix -- failures )
     vocabs-to-load require-all-no-restarts ;