core: remove ?string>number in favor of ?if

[factor.git] / core / math / parser / parser.factor

diff --git a/core/math/parser/parser.factor b/core/math/parser/parser.factor
index c537bf9a4b0eec94cdad4dd2c5e1e8529562e8ab..c5e7c2e11571206835e21447d8c10e03c09ab7ae 100644 (file)
--- a/core/math/parser/parser.factor
+++ b/core/math/parser/parser.factor
@@ -383,9 +383,6 @@ PRIVATE>
 : string>number ( str -- n/f )
     10 <number-parse> [ @first-char ] require-next-digit ;
 
-: ?string>number ( str -- n/str ? )
-    dup string>number [ nip t ] [ f ] if* ;
-
 : base> ( str radix -- n/f )
     <number-parse> [ @first-char-no-radix ] require-next-digit ;