X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=core%2Fmath%2Fparser%2Fparser.factor;fp=core%2Fmath%2Fparser%2Fparser.factor;h=c5e7c2e11571206835e21447d8c10e03c09ab7ae;hp=c537bf9a4b0eec94cdad4dd2c5e1e8529562e8ab;hb=ee1b8041597e73b426611e3cf9786d35b45c5c24;hpb=1284e5aa76d88f943c6f34ae8e4bc9c1be1fa895 diff --git a/core/math/parser/parser.factor b/core/math/parser/parser.factor index c537bf9a4b..c5e7c2e115 100644 --- a/core/math/parser/parser.factor +++ b/core/math/parser/parser.factor @@ -383,9 +383,6 @@ PRIVATE> : string>number ( str -- n/f ) 10 [ @first-char ] require-next-digit ; -: ?string>number ( str -- n/str ? ) - dup string>number [ nip t ] [ f ] if* ; - : base> ( str radix -- n/f ) [ @first-char-no-radix ] require-next-digit ;