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

[factor.git] / core / parser / parser.factor

diff --git a/core/parser/parser.factor b/core/parser/parser.factor
index f1385440342fce4135d8287337bb2af39c8eeecd..04ff5cb7a5d9268bea6fc2f76e215ff80cc0fa5b 100644 (file)
--- a/core/parser/parser.factor
+++ b/core/parser/parser.factor
@@ -32,7 +32,7 @@ SYMBOL: auto-use?
     ] [ create-in ] if ;
 
 : ignore-forwards ( seq -- seq' )
-    [ forward-reference? not ] filter ;
+    [ forward-reference? ] reject ;
 
 : private? ( word -- ? ) vocabulary>> ".private" tail? ;