--- a/ReadStream.st	Sat Oct 04 18:31:54 1997 +0200
+++ b/ReadStream.st	Sat Oct 04 19:00:01 1997 +0200
@@ -82,13 +82,21 @@
 !ReadStream methodsFor:'queries'!
 
 isReadable
+    "return true, if reading is supported by the recevier.
+     Here, true is always returned."
+
     ^ true
+
+    "Modified: 4.10.1997 / 17:59:21 / cg"
 !
 
 size
+    "return the number of elements in the streamed collection."
+
     ^ collection size
 
     "Created: 13.9.1996 / 18:14:35 / cg"
+    "Modified: 4.10.1997 / 17:59:45 / cg"
 ! !
 
 !ReadStream methodsFor:'reading'!
@@ -582,5 +590,5 @@
 !ReadStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.34 1997-03-06 00:32:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ReadStream.st,v 1.35 1997-10-04 17:00:01 cg Exp $'
 ! !