]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/base32-crockford/base32-crockford.factor
core: rename ensure-non-negative to assert-non-negative
[factor.git] / extra / base32-crockford / base32-crockford.factor
index 110f70229d3cc9b2e343818f4f2ff2734e1e8ae8..f4d1310bd49e41c9f75e49f2f70e42f276502247 100644 (file)
@@ -31,7 +31,7 @@ PRIVATE>
     normalize-base32 parse-base32 ;
 
 : >base32-crockford ( n -- base32 )
-    ensure-non-negative
+    assert-non-negative
     [ dup 0 > ] [ 32 /mod ALPHABET nth ] "" produce-as nip
     [ "0" ] when-empty reverse! ;