]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/math/extras/extras.factor
core: rename ensure-non-negative to assert-non-negative
[factor.git] / extra / math / extras / extras.factor
index 4d65a2d386049f232cdc8e5b2d0677d7440db410..1e4d3b922c7085168de221a7e47a8a8b1fa56e0e 100644 (file)
@@ -355,7 +355,7 @@ PRIVATE>
 
 :: integer-sqrt ( m -- n )
     m [ 0 ] [
-        ensure-non-negative
+        assert-non-negative
         bit-length 1 - 2 /i :> c
         1 :> a!
         0 :> d!