added: #size
authorClaus Gittinger <cg@exept.de>
Sun, 05 Aug 2012 18:39:34 +0200
changeset 2775 d758d2280367
parent 2774 326ccd55debf
child 2776 f15140d07975
added: #size
FilteringStream.st
--- a/FilteringStream.st	Sun Aug 05 18:19:24 2012 +0200
+++ b/FilteringStream.st	Sun Aug 05 18:39:34 2012 +0200
@@ -475,14 +475,22 @@
     ^ self
 
     "Created: / 06-12-2011 / 01:05:26 / cg"
+!
+
+size
+    "not correct, but what else do we know?"
+
+    ^ inputStream size
+
+    "Created: / 05-08-2012 / 18:39:00 / cg"
 ! !
 
 !FilteringStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/FilteringStream.st,v 1.14 2011-12-06 00:49:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/FilteringStream.st,v 1.15 2012-08-05 16:39:34 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/FilteringStream.st,v 1.14 2011-12-06 00:49:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/FilteringStream.st,v 1.15 2012-08-05 16:39:34 cg Exp $'
 ! !