Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

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

diff --git a/extra/hashcash/hashcash.factor b/extra/hashcash/hashcash.factor
index a77ebf2577071e2d6cd12ab9b43a131a12697175..2f94f3f2d695924bb3fb87e98546f0bdf6bbcadc 100755 (executable)
--- a/extra/hashcash/hashcash.factor
+++ b/extra/hashcash/hashcash.factor
@@ -69,7 +69,7 @@ M: hashcash string>>
 
 : (mint) ( tuple counter -- tuple ) 
     2dup set-suffix checksummed-bits pick 
-    valid-guess? [ drop ] [ 1+ (mint) ] if ;
+    valid-guess? [ drop ] [ 1 + (mint) ] if ;
 
 PRIVATE>