A new version of Multilingual was added to project The Inbox: http://source.squeak.org/inbox/Multilingual-ul.118.mcz
==================== Summary ====================
Name: Multilingual-ul.118 Author: ul Time: 31 March 2010, 4:31:25.163 am UUID: a18fc0c8-7bb3-cd4c-b801-49bf04b83cc2 Ancestors: Multilingual-nice.117
- restored the original version of MultiByteFileStream >> #basicUpTo:, because StandardFileStream >> #upTo: doesn't send any method (that's true recursively, so the sent methods don't send such methods either, etc) that's overridden by MultiByteFileStream.
=============== Diff against Multilingual-nice.117 ===============
Item was changed: ----- Method: MultiByteFileStream>>basicUpTo: (in category 'private basic') ----- + basicUpTo: delim + + ^ super upTo: delim. + ! - basicUpTo: delim - "Fast version to speed up nextChunk" - | pos buffer count | - collection ifNotNil: [ - (position < readLimit and: [ - (pos := collection indexOf: delim startingAt: position + 1) <= readLimit and: [ - pos > 0 ] ]) ifTrue: [ - ^collection copyFrom: position + 1 to: (position := pos) - 1 ] ]. - pos := self position. - buffer := self basicNext: 2000. - (count := buffer indexOf: delim) > 0 ifTrue: - ["Found the delimiter part way into buffer" - self position: pos + count. - ^ buffer copyFrom: 1 to: count - 1]. - self atEnd ifTrue: - ["Never found it, and hit end of file" - ^ buffer]. - "Never found it, but there's more..." - ^ buffer , (self basicUpTo: delim)!