[squeak-dev] The Trunk: MultilingualTests-mha.2.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Oct 12 07:40:39 UTC 2009


Michael Haupt uploaded a new version of MultilingualTests to project The Trunk:
http://source.squeak.org/trunk/MultilingualTests-mha.2.mcz

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

Name: MultilingualTests-mha.2
Author: mha
Time: 12 October 2009, 9:40:42 am
UUID: 3d636076-98b9-47e2-bb43-16a9c6189370
Ancestors: MultilingualTests-nice.1

made MultiByteFileStream test clean up properly after itself

=============== Diff against MultilingualTests-nice.1 ===============

Item was changed:
  ----- Method: MultiByteFileStreamTest>>testBinaryUpTo (in category 'testing') -----
  testBinaryUpTo
  	"This is a non regression test for bug http://bugs.squeak.org/view.php?id=6933"
  	
+ 	| foo fileName |
- 	| foo |
  	
+ 	fileName := 'foobug6933'.
+ 	
+ 	foo := MultiByteFileStream forceNewFileNamed: fileName.
- 	foo := MultiByteFileStream forceNewFileNamed: 'foobug6933'.
  	[foo binary.
  	foo nextPutAll: #(1 2 3 4) asByteArray] ensure: [foo close].
  
+ 	foo := MultiByteFileStream oldFileNamed: fileName.
- 	foo := MultiByteFileStream oldFileNamed: 'foobug6933'.
  	[foo binary.
+ 	self assert: (foo upTo: 3) = #(1 2 ) asByteArray] ensure: [foo close].
+ 
+ 	FileDirectory default deleteFileNamed: fileName!
- 	self assert: (foo upTo: 3) = #(1 2 ) asByteArray] ensure: [foo close]!




More information about the Squeak-dev mailing list