use reject instead of [ ... not ] filter.

[factor.git] / extra / mason / test / test.factor

diff --git a/extra/mason/test/test.factor b/extra/mason/test/test.factor
index fd139d8d8a23f6d57b8dd5cf4c0610ce0e88c9eb..465dd68ffa74021782b7dc1287fbf8a552c9d923 100644 (file)
--- a/extra/mason/test/test.factor
+++ b/extra/mason/test/test.factor
@@ -22,7 +22,7 @@ M: method word-vocabulary "method-generic" word-prop word-vocabulary ;
 
 :: do-step ( errors summary-file details-file -- )
     errors
-    [ error-type +linkage-error+ eq? not ] filter
+    [ error-type +linkage-error+ eq? ] reject
     [ file>> ] map members natural-sort summary-file to-file
     errors details-file utf8 [ errors. ] with-file-writer ;