LineNumberReadStream.st
changeset 2827 dd4e71ae9244
parent 2538 8e34a8db4002
child 3180 7c7ce3f9483e
--- a/LineNumberReadStream.st	Wed Oct 10 11:37:10 2012 +0200
+++ b/LineNumberReadStream.st	Wed Oct 17 18:45:18 2012 +0200
@@ -158,15 +158,21 @@
 !
 
 position:aPosition
+    readAhead := nil.
     inputStream position:aPosition
+!
+
+skip:numberToSkip
+    readAhead := nil.
+    inputStream skip:numberToSkip
 ! !
 
 !LineNumberReadStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.8 2011-02-17 16:34:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.9 2012-10-17 16:45:18 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.8 2011-02-17 16:34:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/LineNumberReadStream.st,v 1.9 2012-10-17 16:45:18 stefan Exp $'
 ! !