X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=core%2Fmath%2Fintegers%2Fintegers.factor;h=3cab1dd4e83c06adb12d466555e3eb4def6c1bdd;hp=940ffa65ac291287acff3abfe482903b5f33436d;hb=943596575ad294c074dfa381b70af74dba5992b1;hpb=e738c7206c32bd9b76f3cee31e950835e1b1ee24 diff --git a/core/math/integers/integers.factor b/core/math/integers/integers.factor index 940ffa65ac..3cab1dd4e8 100644 --- a/core/math/integers/integers.factor +++ b/core/math/integers/integers.factor @@ -153,7 +153,7 @@ M: bignum (log2) bignum-log2 ; inline M: bignum /f ( m n -- f ) { bignum bignum } declare bignum/f ; -CONSTANT: bignum/f-threshold HEX: 20,0000,0000,0000 +CONSTANT: bignum/f-threshold 0x20,0000,0000,0000 : fixnum/f ( m n -- m/n ) [ >float ] bi@ float/f ; inline