--- a/Float.st	Mon Jun 10 21:28:24 2019 +0200
+++ b/Float.st	Mon Jun 10 21:28:34 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
@@ -904,7 +906,12 @@
 !
 
 exponentCharacter
+    "return the character used to print between mantissa an exponent.
+     Also used by the scanner when reading numbers."
+
     ^ $d
+
+    "Modified (comment): / 10-06-2019 / 21:27:46 / Claus Gittinger"
 !
 
 isBuiltInClass