--- a/FileStream.st Sat Oct 04 19:00:01 1997 +0200
+++ b/FileStream.st Sat Oct 04 19:01:30 1997 +0200
@@ -957,8 +957,15 @@
!
size
- self obsoleteMethodWarning:'use #fileSize'.
+ "return the size of the stream;
+ thats the number of bytes of the file."
+
+ "/ no obsoleteMethodWarning - size is ok for streams.
+ "/ self obsoleteMethodWarning:'use #fileSize'.
+
^ self fileSize.
+
+ "Modified: 4.10.1997 / 18:01:09 / cg"
! !
!FileStream methodsFor:'testing'!
@@ -973,6 +980,6 @@
!FileStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.49 1997-10-04 15:56:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.50 1997-10-04 17:01:30 cg Exp $'
! !
FileStream initialize!