--- a/LimitedPrecisionReal.st	Tue Jan 20 19:18:55 1998 +0100
+++ b/LimitedPrecisionReal.st	Tue Jan 20 19:21:19 1998 +0100
@@ -383,17 +383,25 @@
 
 printOn:aStream
     "append a printed representation of the receiver to
-     the argument, aStream"
+     the argument, aStream.
+
+     LimitedPrecisonReal and its subclasses use #printString instead of
+     #printOn: as basic print mechanism."
 
     aStream nextPutAll:self printString
+
+    "Modified: / 20.1.1998 / 14:10:46 / stefan"
 !
 
 printString
-    "return a printed representation of the receiver"
+    "return a printed representation of the receiver
+     LimitedPrecisonReal and its subclasses use #printString instead of
+     #printOn: as basic print mechanism."
 
     ^ self subclassResponsibility
 
-    "Created: 17.4.1996 / 12:12:20 / cg"
+    "Created: / 17.4.1996 / 12:12:20 / cg"
+    "Modified: / 20.1.1998 / 14:10:47 / stefan"
 ! !
 
 !LimitedPrecisionReal methodsFor:'testing'!
@@ -490,5 +498,5 @@
 !LimitedPrecisionReal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LimitedPrecisionReal.st,v 1.24 1998-01-17 17:20:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LimitedPrecisionReal.st,v 1.25 1998-01-20 18:20:35 stefan Exp $'
 ! !