]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/alien/libraries/finder/linux/linux.factor
use reject instead of [ ... not ] filter.
[factor.git] / basis / alien / libraries / finder / linux / linux.factor
index c128cf17d809cbf9690d6c4fa22962f35fbfe59a..406cb9a41e582199006760829e8839099a5c6b4c 100644 (file)
@@ -19,7 +19,8 @@ CONSTANT: mach-map {
         "=>" split1 [ [ blank? ] trim ] bi@
         [
             " " split1 [ "()" in? ] trim "," split
-            [ "OS ABI:" head? not ] filter
+            [ [ blank? ] trim ] map
+            [ "OS ABI:" head? ] reject
         ] dip 3array
     ] map ;