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

[factor.git] / extra / hashcash / hashcash.factor

diff --git a/extra/hashcash/hashcash.factor b/extra/hashcash/hashcash.factor
index 2f94f3f2d695924bb3fb87e98546f0bdf6bbcadc..7a22f2fc5d40247e521745b45467e79bb364b6aa 100644 (file)
--- a/extra/hashcash/hashcash.factor
+++ b/extra/hashcash/hashcash.factor
@@ -26,7 +26,7 @@ IN: hashcash
 ! Random salt is formed by ascii characters
 ! between 33 and 126
 : available-chars ( -- seq )
-    33 126 [a,b] [ CHAR: : = not ] filter ;
+    33 126 [a,b] [ CHAR: : = ] reject ;
 
 PRIVATE>