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

[factor.git] / basis / io / sockets / icmp / icmp-tests.factor

diff --git a/basis/io/sockets/icmp/icmp-tests.factor b/basis/io/sockets/icmp/icmp-tests.factor
index 602ecc506008a43c504db90a3be83b04c0ef9a89..221c48945269bfd2894628e37aa940bc767f82bc 100644 (file)
--- a/basis/io/sockets/icmp/icmp-tests.factor
+++ b/basis/io/sockets/icmp/icmp-tests.factor
@@ -6,5 +6,5 @@ IN: io.sockets.icmp.tests
 
 [ { } ] [
     "localhost" <icmp> resolve-host
-    [ [ icmp4? ] [ icmp6? ] bi or not ] filter
+    [ [ icmp4? ] [ icmp6? ] bi or ] reject
 ] unit-test