#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Mon, 19 Jun 2017 15:34:18 +0200
changeset 21839 4a29e408440a
parent 21838 0682509bb3fb
child 21840 d8a0a2f4bf9b
#BUGFIX by cg class: Number class changed: #readFrom:decimalPointCharacters:onError: (send #fromNumber: instead of #fromInteger:)
Number.st
--- a/Number.st	Mon Jun 19 15:04:52 2017 +0200
+++ b/Number.st	Mon Jun 19 15:34:18 2017 +0200
@@ -351,7 +351,7 @@
                         ].    
                     ].
                 ] ifFalse:[
-                    value := self fromInteger:value.
+                    value := self fromNumber:value.
                 ].
                 
                 (nextChar notNil and:[(nextChar isDigitRadix:radix)]) ifTrue:[
@@ -444,7 +444,7 @@
      Number readFrom:'99,00'
     "
 
-    "Modified (comment): / 15-06-2017 / 10:06:38 / cg"
+    "Modified: / 19-06-2017 / 15:15:31 / cg"
 !
 
 readFrom:aStringOrStream onError:exceptionBlock