Float.st
changeset 21904 a873a020a6cb
parent 21877 3dd1362bd049
child 21909 1d46683f40fc
--- 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'!