--- a/Float.st	Sun May 26 03:13:39 2019 +0200
+++ b/Float.st	Sun May 26 03:14:52 2019 +0200
@@ -538,6 +538,7 @@
     "Modified (comment): / 22-06-2017 / 13:44:12 / cg"
 ! !
 
+
 !Float class methodsFor:'binary storage'!
 
 readBinaryIEEEDoubleFrom:aStream
@@ -947,6 +948,8 @@
 ! !
 
 
+
+
 !Float methodsFor:'arithmetic'!
 
 * aNumber
@@ -2546,12 +2549,12 @@
 !
 
 mantissa
-    "extract a normalized floats mantissa.
+    "extract a normalized float's mantissa.
      The returned value depends on the float-representation of
      the underlying machine and is therefore highly unportable.
      This is not for general use.
      This assumes that the mantissa is normalized to
-     0.5 .. 1.0 and the floats value is mantissa * 2^exp"
+     0.5 .. 1.0 and the float's value is mantissa * 2^exp"
 
 %{  /* NOCONTEXT */
     double myVal;
@@ -2565,8 +2568,8 @@
     if (! (isnan(myVal) || isinf(myVal)))
 #endif
     {
-	frac = frexp(myVal, &exp);
-	RETURN (__MKFLOAT(frac));
+        frac = frexp(myVal, &exp);
+        RETURN (__MKFLOAT(frac));
     }
 %}.
     ^ super mantissa
@@ -2585,6 +2588,7 @@
     "
 
     "Modified: / 20-06-2017 / 11:37:13 / cg"
+    "Modified (comment): / 26-05-2019 / 03:12:55 / Claus Gittinger"
 ! !