FileStream.st
changeset 2998 930360fb3f12
parent 2992 197c2c222030
child 3006 b3530950854a
--- 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!