Eliot Miranda uploaded a new version of Multilingual to project The Inbox: http://source.squeak.org/inbox/Multilingual-eem.229.mcz
==================== Summary ====================
Name: Multilingual-eem.229 Author: eem Time: 12 July 2017, 6:19:36.045422 pm UUID: f6e56208-2b41-4af8-9112-7323fb4d7d68 Ancestors: Multilingual-pre.228
Fix two test failures due to bugs in the UTF16TextConverter
=============== Diff against Multilingual-pre.228 ===============
Item was added: + ----- Method: UTF16TextConverter>>next:putAll:startingAt:toStream: (in category 'conversion') ----- + next: anInteger putAll: aString startingAt: startIndex toStream: aStream + "Handle fast conversion if ByteString" + + | lastIndex nextIndex | + anInteger > 0 ifFalse: [ ^aString ]. + aStream isBinary ifTrue: [ + aStream basicNext: anInteger putAll: aString startingAt: startIndex. + ^aString ]. + aString class == ByteString ifFalse: [ + startIndex to: startIndex + anInteger - 1 do: [ :index | + self nextPut: (aString at: index) toStream: aStream ]. + ^aString ]. + lastIndex := startIndex. + [ (nextIndex := ByteString + findFirstInString: aString + inSet: latin1Map + startingAt: lastIndex) = 0 or: [ anInteger + startIndex <= nextIndex ] ] whileFalse: [ + aStream basicNext: nextIndex - lastIndex putAll: aString startingAt: lastIndex. + self next16BitValue: (aString byteAt: nextIndex) toStream: aStream. + lastIndex := nextIndex + 1 ]. + aStream basicNext: anInteger - lastIndex + startIndex putAll: aString startingAt: lastIndex. + ^aString!
Item was changed: ----- Method: UTF16TextConverter>>swapLatin1EncodingByteOrder (in category 'private') ----- swapLatin1EncodingByteOrder + latin1Encodings := latin1Encodings collect: [:each | each ifNotNil: [each reverse]]! - latin1Encodings := latin1Encodings collect: [:each | each reverse]!