--- 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!