#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Tue, 25 Jun 2019 11:06:22 +0200
changeset 5046 9b2d073d0573
parent 5045 b7e343586357
child 5047 f6ccfe8f2ddb
#DOCUMENTATION by cg class: LazyValue comment/format in: #displayOn: #displayString
LazyValue.st
--- a/LazyValue.st	Tue Jun 25 11:06:15 2019 +0200
+++ b/LazyValue.st	Tue Jun 25 11:06:22 2019 +0200
@@ -504,6 +504,8 @@
 !LazyValue methodsFor:'printing'!
 
 displayOn:aGCOrStream
+    "notice: displayString and displayOn: will not wait for the value (they are for developers and inspectors),
+     whereas printString and printOn: will wait (they are for the program to print data)."
 
     "/ what a kludge - Dolphin and Squeak mean: printOn: a stream;
     "/ ST/X (and some old ST80's) mean: draw-yourself on a GC.
@@ -518,9 +520,14 @@
     ].    
     aGCOrStream nextPutAll:'LazyValue (unevaluated) block: '.
     block displayOn:aGCOrStream.
+
+    "Modified (comment): / 25-06-2019 / 10:49:42 / Claus Gittinger"
 !
 
 displayString
+    "notice: displayString and displayOn: will not wait for the value (they are for developers and inspectors),
+     whereas printString and printOn: will wait (they are for the program to print data)."
+
     "defined here, because I inherit from nobody"
 
     ^ (Object compiledMethodAt:#displayString)
@@ -528,7 +535,7 @@
         arguments:nil
         selector:#displayString
 
-    "Modified: / 25-06-2019 / 09:54:18 / Claus Gittinger"
+    "Modified (comment): / 25-06-2019 / 10:49:45 / Claus Gittinger"
 ! !
 
 !LazyValue methodsFor:'private access'!
@@ -603,5 +610,9 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !