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

[factor.git] / extra / gml / parser / parser.factor

diff --git a/extra/gml/parser/parser.factor b/extra/gml/parser/parser.factor
index b2feb6c0b80ea36035c95a50a5fd8adc88624a1b..60d97b0777988d3fe75e3635f09e11208416631d 100644 (file)
--- a/extra/gml/parser/parser.factor
+++ b/extra/gml/parser/parser.factor
@@ -120,7 +120,7 @@ Token = Spaces
      ExecName |
      PathName)
 
-Tokens = Token* => [[ [ comment? not ] filter ]]
+Tokens = Token* => [[ [ comment? ] reject ]]
 
 Program = Tokens Spaces !(.) => [[ parse-proc ]]