NonPositionableExternalStream.st
changeset 16207 923f92b4f0e8
parent 16187 e0147ce76df5
child 16340 6203956d63ee
equal deleted inserted replaced
16206:b718fbf5d43e 16207:923f92b4f0e8
   271 
   271 
   272 skip:numberToSkip
   272 skip:numberToSkip
   273     "skip count bytes/characters, return the receiver.
   273     "skip count bytes/characters, return the receiver.
   274      Re-redefined since PositionableStream redefined it."
   274      Re-redefined since PositionableStream redefined it."
   275 
   275 
   276     "dont know how to unread ..."
   276     "don't know how to unread ..."
   277     numberToSkip < 0 ifTrue:[
   277     numberToSkip < 0 ifTrue:[
   278 	PositionError raiseRequest.
   278         PositionError raiseRequest.
   279 	^ self
   279         ^ self
   280     ].
   280     ].
   281     numberToSkip timesRepeat:self next
   281     numberToSkip timesRepeat:[self next].
   282 
   282 
   283     "Modified: / 30.7.1999 / 12:42:12 / cg"
   283     "Modified: / 30.7.1999 / 12:42:12 / cg"
   284 ! !
   284 ! !
   285 
   285 
   286 !NonPositionableExternalStream methodsFor:'printing & storing'!
   286 !NonPositionableExternalStream methodsFor:'printing & storing'!
   531 ! !
   531 ! !
   532 
   532 
   533 !NonPositionableExternalStream class methodsFor:'documentation'!
   533 !NonPositionableExternalStream class methodsFor:'documentation'!
   534 
   534 
   535 version
   535 version
   536     ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.68 2014-03-01 22:09:47 cg Exp $'
   536     ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.69 2014-03-05 10:00:26 stefan Exp $'
   537 !
   537 !
   538 
   538 
   539 version_CVS
   539 version_CVS
   540     ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.68 2014-03-01 22:09:47 cg Exp $'
   540     ^ '$Header: /cvs/stx/stx/libbasic/NonPositionableExternalStream.st,v 1.69 2014-03-05 10:00:26 stefan Exp $'
   541 ! !
   541 ! !
   542 
   542