class: Stream
authorClaus Gittinger <cg@exept.de>
Thu, 20 Feb 2014 08:03:34 +0100
changeset 16086 9b40fde96544
parent 16085 b2331a389345
child 16087 ba981c147e6c
class: Stream added: #isLineNumberReadStream added: #asLineNumberReadStream
Stream.st
--- a/Stream.st	Thu Feb 20 08:02:12 2014 +0100
+++ b/Stream.st	Thu Feb 20 08:03:34 2014 +0100
@@ -294,6 +294,10 @@
 
 !Stream methodsFor:'converting'!
 
+asLineNumberReadStream
+    ^ LineNumberReadStream on:self
+!
+
 asStream
     ^ self
 ! !
@@ -3490,11 +3494,11 @@
 !Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.213 2014-02-20 07:02:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.214 2014-02-20 07:03:34 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.213 2014-02-20 07:02:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.214 2014-02-20 07:03:34 cg Exp $'
 ! !