--- a/LimitedPrecisionReal.st	Sat Jun 08 13:52:42 2019 +0200
+++ b/LimitedPrecisionReal.st	Sat Jun 08 14:06:20 2019 +0200
@@ -1131,7 +1131,7 @@
         optional numExtraBits between mantissa and exponent (normalized flag for ext-real)
         numExponentBits bits of 2s complement exponent
         1 sign bit.
-     Taken from Floats asTrueFraction"
+     Taken from Float's asTrueFraction"
 
     |shifty sign expPart exp fraction fractionPart result zeroBitsCount
      numBytes numBits numBitsInMantissa maskMantissa numBitsInExponent maskExponent
@@ -1221,6 +1221,7 @@
 
     "Modified: / 25-08-2017 / 12:34:08 / cg"
     "Modified: / 28-05-2019 / 09:04:52 / Claus Gittinger"
+    "Modified (comment): / 08-06-2019 / 13:59:40 / Claus Gittinger"
 ! !
 
 !LimitedPrecisionReal methodsFor:'comparing'!
@@ -1540,7 +1541,6 @@
    ^ 0
 ! !
 
-
 !LimitedPrecisionReal methodsFor:'special access'!
 
 partValues:aBlock