The Trunk: MultilingualTests-pre.36.mcz

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

The Trunk: MultilingualTests-pre.36.mcz

commits-2
Patrick Rein uploaded a new version of MultilingualTests to project The Trunk:
http://source.squeak.org/trunk/MultilingualTests-pre.36.mcz

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

Name: MultilingualTests-pre.36
Author: pre
Time: 14 October 2018, 11:01:18.438278 am
UUID: bb5fcec0-3297-0843-b644-4f20a75ab1a7
Ancestors: MultilingualTests-fn.35

Reverts the revert of MultiByteFileStreamTest>>testLineEndConvention:withConverter:ifFail: to actually test for MultiByteFileStream

=============== Diff against MultilingualTests-fn.35 ===============

Item was changed:
  ----- Method: MultiByteFileStreamTest>>testLineEndConvention:withConverter:ifFail: (in category 'helpers') -----
  testLineEndConvention: lineEndConvention withConverter: textConverterClass ifFail: failBlock
 
  | expectedResult result |
  [
  MultiByteFileStream forceNewFileNamed: fileName do: [ :file |
  file
  converter: textConverterClass new;
  lineEndConvention: lineEndConvention;
  cr;
  nextPut: Character cr;
  nextPutAll: String cr;
  nextPutAll: String cr asWideString ].
+ result := MultiByteFileStream oldFileNamed: fileName do: [ :file |
+ file
+ converter: textConverterClass new;
+ contents ].
- result := StandardFileStream oldFileNamed: fileName do: [ :file |
- file contents ].
  expectedResult := String streamContents: [ :stream |
  4 timesRepeat: [ stream perform: lineEndConvention ] ].
  result = expectedResult ifFalse: [
  failBlock value: expectedResult asByteArray value: result asByteArray ] ]
  on: Error
  do: [ :err | failBlock value: err messageText value: err messageText ]!