--- a/ShortFloat.st	Thu Jun 06 09:06:17 2019 +0200
+++ b/ShortFloat.st	Thu Jun 06 18:02:06 2019 +0200
@@ -357,7 +357,6 @@
     "Modified (comment): / 10-05-2018 / 01:09:13 / stefan"
 ! !
 
-
 !ShortFloat class methodsFor:'binary storage'!
 
 readBinaryIEEESingleFrom:aStream
@@ -499,11 +498,16 @@
     "return a shortFloat which represents not-a-Number (i.e. an invalid number)"
 
     NaN isNil ifTrue:[
-	NaN := super NaN
+        NaN := super NaN
     ].
     ^ NaN
 
+    "
+     self NaN
+    "
+
     "Created: / 20-06-2017 / 13:44:12 / cg"
+    "Modified (comment): / 06-06-2019 / 16:53:34 / Claus Gittinger"
 !
 
 e
@@ -589,7 +593,6 @@
     "Modified: 23.4.1996 / 09:26:45 / cg"
 ! !
 
-
 !ShortFloat class methodsFor:'queries'!
 
 defaultPrintPrecision
@@ -644,7 +647,7 @@
 !
 
 precision
-    "answer the precision of a ShortFloat (in bits)
+    "answer the precision (the number of bits in the mantissa) of a ShortFloat (in bits)
      This is an IEEE float, where only the fraction from the normalized mantissa is stored
      and so there is a hidden bit and the mantissa is actually represented by 24 binary digits
      (although only 23 are needed in the binary representation)"
@@ -655,6 +658,8 @@
      self numBitsInMantissa + 1
      self precision
     "
+
+    "Modified (comment): / 06-06-2019 / 13:23:53 / Claus Gittinger"
 !
 
 radix