changeset 5152 | 8834593e27e1 |
parent 4928 | 30c9cf7ae5fd |
child 5168 | fee2c272b167 |
--- a/BaseNCoder.st Mon Aug 26 10:10:18 2019 +0200 +++ b/BaseNCoder.st Mon Aug 26 10:24:29 2019 +0200 @@ -482,7 +482,7 @@ nextPut:aByte "encode aByte on the output stream" - ^ self nextPutByte:aByte asInteger. + self nextPutByte:aByte asInteger. ! nextPutAll:aCollection startingAt:first to:last @@ -492,7 +492,7 @@ aCollection from:first to:last do:[:element | self nextPutByte:element ]. - ^ aCollection + ! nextPutBytes:aCollectionOfBytes