--- a/Integer.st Wed Feb 08 19:04:45 2017 +0100
+++ b/Integer.st Wed Feb 08 19:40:23 2017 +0100
@@ -617,16 +617,9 @@
bad (not using L and D) roman numbers.
(Such numbers can be seen on some medevial buildings. "
- |val|
-
- RomanNumberFormatError
- handle:[:ex |
- val := exceptionalValue value
- ]
- do:[
- val := self readFromRomanString:aStringOrStream
- ].
- ^ val
+ ^ RomanNumberFormatError
+ handle:[:ex | exceptionalValue value ]
+ do:[ self readFromRomanString:aStringOrStream ].
"
@@ -643,7 +636,7 @@
Integer readFromRomanString:'CLXXXXVIIII' onError:nil
Error cases:
-\ Integer readFromRomanString:'LC' onError:nil
+ Integer readFromRomanString:'LC' onError:nil
"
"error cases:
@@ -729,6 +722,8 @@
(Integer readFromRomanString:romanString onError:nil) ~= n ifTrue:[self halt].
]
"
+
+ "Modified (comment): / 08-02-2017 / 19:07:00 / stefan"
!
readFromString:aString radix:base onError:exceptionBlock
@@ -773,6 +768,8 @@
"Modified: / 15.11.1999 / 20:35:20 / cg"
! !
+
+
!Integer class methodsFor:'class initialization'!
initialize