--- a/LongFloat.st Tue Oct 10 16:02:57 2017 +0200
+++ b/LongFloat.st Tue Oct 10 16:03:17 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1999 by eXept Software AG
All Rights Reserved
@@ -1583,6 +1581,17 @@
!LongFloat 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:22 / cg"
+!
+
printString
"return a printed representation of the receiver
LimitedPrecisonReal and its subclasses use #printString instead of
@@ -1775,6 +1784,17 @@
"Modified (comment): / 03-07-2017 / 15:11:48 / 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:46 / cg"
+!
+
storeString
"return a printed representation of the receiver;
all valid digits are printed.