[squeak-dev] The Trunk: MultilingualTests-pre.36.mcz

commits at source.squeak.org commits at source.squeak.org
Sun Oct 14 09:01:41 UTC 2018


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 ]!



More information about the Squeak-dev mailing list