comment
authorClaus Gittinger <cg@exept.de>
Tue, 13 Nov 2001 10:17:26 +0100
changeset 6180 f1f0dfee9372
parent 6179 20ce3f4b3f5f
child 6181 5876cc789e41
comment
PositionableStream.st
--- a/PositionableStream.st	Tue Nov 13 10:16:43 2001 +0100
+++ b/PositionableStream.st	Tue Nov 13 10:17:26 2001 +0100
@@ -381,7 +381,7 @@
 !
 
 fileInBinary
-    "file in from the receiver, i.e. read binary stored classes.
+    "file in from the receiver, i.e. read binary stored classes and/or objects.
      Return the last object."
 
     |bos obj|
@@ -398,6 +398,7 @@
     ^ obj
 
     "Created: / 13.11.2001 / 10:12:30 / cg"
+    "Modified: / 13.11.2001 / 10:14:04 / cg"
 !
 
 fileInNextChunkNotifying:someone
@@ -1078,6 +1079,6 @@
 !PositionableStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.102 2001-11-13 09:16:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.103 2001-11-13 09:17:26 cg Exp $'
 ! !
 PositionableStream initialize!