#BUGFIX by cg
class: Number class
changed: #readFrom:decimalPointCharacters:onError: (send #fromNumber: instead of #fromInteger:)
--- 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