--- a/Number.st Thu Jun 15 09:57:14 2017 +0200
+++ b/Number.st Thu Jun 15 09:58:00 2017 +0200
@@ -521,7 +521,6 @@
"Modified (comment): / 08-06-2017 / 13:58:36 / mawalch"
! !
-
!Number class methodsFor:'constants'!
decimalPointCharacter
@@ -729,7 +728,6 @@
"
! !
-
!Number class methodsFor:'private'!
readMantissaAndScaleFrom:aStream radix:radix
@@ -804,7 +802,6 @@
^ self == Number
! !
-
!Number methodsFor:'Compatibility-Squeak'!
asSmallAngleDegrees
@@ -950,7 +947,6 @@
"
! !
-
!Number methodsFor:'coercing & converting'!
i
@@ -986,15 +982,17 @@
scaledEpsilon := nE * diff class epsilon.
diff <= scaledEpsilon ifTrue:[
- "compare for really close values near 0"
- ^ true.
- ] ifFalse:[
- "scaled comparison for larger values"
- f1 := self abs.
- f2 := aNumber abs.
- largest := f1 > f2 ifTrue:[f1] ifFalse:[f2].
- ^ (diff <= (scaledEpsilon * largest)).
+ "compare for really close values near 0"
+ ^ true.
].
+
+ "scaled comparison for larger values"
+ f1 := self abs.
+ f2 := aNumber abs.
+ largest := f1 > f2 ifTrue:[f1] ifFalse:[f2].
+ ^ (diff <= (scaledEpsilon * largest)).
+
+ "Modified: / 15-06-2017 / 09:55:15 / cg"
! !
!Number methodsFor:'converting'!
@@ -2811,7 +2809,6 @@
"Modified: / 5.11.2001 / 17:54:22 / cg"
! !
-
!Number class methodsFor:'documentation'!
version