--- a/ShortFloat.st	Tue Oct 10 16:04:15 2017 +0200
+++ b/ShortFloat.st	Tue Oct 10 16:04:23 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1996 by Claus Gittinger
 	      All Rights Reserved
@@ -1419,6 +1417,17 @@
 
 !ShortFloat methodsFor:'printing & storing'!
 
+printOn:aStream
+    "append a printed representation of the receiver to
+     the argument, aStream.
+
+     I use #printString instead of #printOn: as basic print mechanism."
+
+    aStream nextPutAll:self printString
+
+    "Created: / 10-10-2017 / 14:05:28 / cg"
+!
+
 printString
     "return a printed representation of the receiver
      LimitedPrecisonReal and its subclasses use #printString instead of
@@ -1606,6 +1615,17 @@
     "Modified (comment): / 03-07-2017 / 15:12:20 / cg"
 !
 
+storeOn:aStream
+    "append a printed representation of the receiver to
+     the argument, aStream.
+
+     I use #storeString instead of #storeOn: as basic store mechanism."
+
+    aStream nextPutAll:self storeString
+
+    "Created: / 10-10-2017 / 14:06:52 / cg"
+!
+
 storeString
     "return a printed representation of the receiver;
      all valid digits are printed.