The Trunk: MultilingualTests-dtl.31.mcz

David T. Lewis uploaded a new version of MultilingualTests to project The Trunk:
http://source.squeak.org/trunk/MultilingualTests-dtl.31.mcz

==================== Summary ====================

Name: MultilingualTests-dtl.31
Author: dtl
Time: 4 February 2018, 5:48:55.726594 pm
UUID: 7f0ac050-db7b-4ecc-80d8-9617409af3be
Ancestors: MultilingualTests-tonyg.30, MultilingualTests-cbc.19

Merge MultilingualTests-cbc.19

=============== Diff against MultilingualTests-tonyg.30 ===============

Item was changed:
  ----- Method: MultiByteFileStreamTest>>testLineEndingChunk (in category 'testing') -----
  testLineEndingChunk
+ | failures |
-
  fileName := 'foolinend.txt'.
+ failures := OrderedCollection new.
  MultiByteFileStream forceNewFileNamed: fileName do: [ :file |
  file
  wantsLineEndConversion: false;
  nextPutAll: 'line 1'; cr;
  nextPutAll: 'line 2'; crlf;
  nextPutAll: 'line 3'; lf;
  nextPutAll: 'line 4'; nextPut: $!! ].
  {
  {#cr.  'line 1' , String cr , 'line 2' , String cr , 'line 3' , String cr , 'line 4'}.
  {#lf.  'line 1' , String cr , 'line 2' , String cr , 'line 3' , String cr , 'line 4'}.
  {#crlf.  'line 1' , String cr , 'line 2' , String cr , 'line 3' , String cr , 'line 4'}.
  {nil.  'line 1' , String cr , 'line 2' , String crlf , 'line 3' , String lf , 'line 4'}
  } do: [:lineEndingResult |
+ MultiByteFileStream oldFileNamed: fileName do: [ :file | | actual |
- MultiByteFileStream oldFileNamed: fileName do: [ :file |
  file lineEndConvention: lineEndingResult first.
+ lineEndingResult last = (actual := file nextChunk) ifFalse: [
+ failures add: (lineEndingResult copyWith: actual).
+ ].
+ ] ].
+ self assert: failures isEmpty!
- self assert: lineEndingResult last equals: file nextChunk ] ]!