--- a/Float.st Fri Nov 15 20:05:05 2019 +0100
+++ b/Float.st Sat Nov 16 16:22:48 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1988 by Claus Gittinger
All Rights Reserved
@@ -899,10 +897,17 @@
(i.e. the value-delta of the least significant bit)"
Epsilon isNil ifTrue:[
- Epsilon := self computeEpsilon.
+ Epsilon := self computeEpsilon.
].
^ Epsilon
+ "
+ Float epsilon -> 1.11022302462516E-16
+ ShortFloat epsilon -> 5.960464e-08
+ LongFloat epsilon -> 5.42101086242752217E-20
+ QuadFloat epsilon ->
+ "
+
"Modified (comment): / 22-06-2017 / 13:44:12 / cg"
!