--- a/Float.st Thu Jun 22 13:44:43 2017 +0200
+++ b/Float.st Thu Jun 22 13:44:45 2017 +0200
@@ -16,8 +16,8 @@
LimitedPrecisionReal variableByteSubclass:#Float
instanceVariableNames:''
classVariableNames:'DefaultPrintFormat DefaultPrintfFormat E Epsilon Halfpi
- HalfpiNegative Ln10 Ln2 MaxSmallInteger Pi RadiansPerDegree Sqrt2
- Twopi NaN PositiveInfinity NegativeInfinity'
+ HalfpiNegative Ln10 Ln2 MaxSmallInteger NaN NegativeInfinity Pi
+ PositiveInfinity RadiansPerDegree Sqrt2 Twopi'
poolDictionaries:''
category:'Magnitude-Numbers'
!
@@ -512,10 +512,15 @@
!
epsilon
+ "return the maximum relative spacing of instances of mySelf
+ (i.e. the value-delta of the least significant bit)"
+
Epsilon isNil ifTrue:[
- Epsilon := self computeEpsilon.
+ Epsilon := self computeEpsilon.
].
^ Epsilon
+
+ "Modified (comment): / 22-06-2017 / 13:44:12 / cg"
! !
!Float class methodsFor:'binary storage'!