equal
deleted
inserted
replaced
1 "{ Encoding: utf8 }" |
|
2 |
|
3 " |
1 " |
4 COPYRIGHT (c) 2002 by eXept Software AG |
2 COPYRIGHT (c) 2002 by eXept Software AG |
5 All Rights Reserved |
3 All Rights Reserved |
6 |
4 |
7 This software is furnished under a license and may be used |
5 This software is furnished under a license and may be used |
276 off := off + 1. |
274 off := off + 1. |
277 ]. |
275 ]. |
278 ^ off - offset |
276 ^ off - offset |
279 ! |
277 ! |
280 |
278 |
|
279 nextPutAll:aCollection startingAt:first to:last |
|
280 "append the elements with index from first to last |
|
281 of the argument, aCollection onto the receiver. |
|
282 This is only allowed, if the receiver supports writing." |
|
283 |
|
284 aCollection from:first to:last do:[:element | |
|
285 self nextPut:element |
|
286 ]. |
|
287 ^ aCollection |
|
288 ! |
|
289 |
281 stringUpToEnd |
290 stringUpToEnd |
282 "return a collection of the elements up-to the end" |
291 "return a collection of the elements up-to the end" |
283 |
292 |
284 |answerStream| |
293 |answerStream| |
285 |
294 |
352 |
361 |
353 nextPut:aByte |
362 nextPut:aByte |
354 "encode aByte on the output stream" |
363 "encode aByte on the output stream" |
355 |
364 |
356 ^ self subclassResponsibility. |
365 ^ self subclassResponsibility. |
|
366 ! |
|
367 |
|
368 nextPutByte:aByte |
|
369 "encode aByte on the output stream" |
|
370 |
|
371 ^ self nextPut:aByte. |
357 ! ! |
372 ! ! |
358 |
373 |
359 !BaseNCoder class methodsFor:'documentation'! |
374 !BaseNCoder class methodsFor:'documentation'! |
360 |
375 |
361 version |
376 version |
362 ^ '$Header: /cvs/stx/stx/libbasic2/BaseNCoder.st,v 1.5 2015-05-07 20:36:34 cg Exp $' |
377 ^ '$Header$' |
363 ! ! |
378 ! ! |
364 |
379 |