added: #skip:
authorStefan Vogel <sv@exept.de>
Wed, 17 Oct 2012 18:45:18 +0200
changeset 2827 dd4e71ae9244
parent 2826 8b32111cc271
child 2828 8894852ab900
added: #skip: changed: #position:
LineNumberReadStream.st
--- 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 $'
 ! !