The Inbox: Multilingual-ul.118.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Inbox: Multilingual-ul.118.mcz

commits-2
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)!