LineNumberReadStream.st
changeset 3180 7c7ce3f9483e
parent 2827 dd4e71ae9244
child 3329 170f49ba6c9a
--- a/LineNumberReadStream.st	Tue Feb 18 22:21:18 2014 +0100
+++ b/LineNumberReadStream.st	Thu Feb 20 08:03:30 2014 +0100
@@ -116,6 +116,12 @@
     ^ lineStartPosition
 ! !
 
+!LineNumberReadStream methodsFor:'converting'!
+
+asLineNumberReadStream
+    ^ self
+! !
+
 !LineNumberReadStream methodsFor:'initialization'!
 
 initialize
@@ -148,6 +154,10 @@
     ^ inputStream atEnd
 !
 
+isLineNumberReadStream
+    ^ true
+!
+
 peekOrNil
     "peek ahead for the next character, or return nil"
 
@@ -170,9 +180,10 @@
 !LineNumberReadStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.9 2012-10-17 16:45:18 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.10 2014-02-20 07:03:30 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.9 2012-10-17 16:45:18 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.10 2014-02-20 07:03:30 cg Exp $'
 ! !
+