The Trunk: MultilingualTests-ul.13.mcz

Levente Uzonyi uploaded a new version of MultilingualTests to project The Trunk:
http://source.squeak.org/trunk/MultilingualTests-ul.13.mcz

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

Name: MultilingualTests-ul.13
Author: ul
Time: 31 January 2011, 2:39:52.142 am
UUID: 40a392eb-d132-e849-955f-be120d8b7758
Ancestors: MultilingualTests-ar.12

Added a test to demonstrate http://bugs.squeak.org/view.php?id=7603 .

=============== Diff against MultilingualTests-ar.12 ===============

Item was added:
+ ----- Method: MultiByteFileStreamTest>>testNextPutAllStartingAt (in category 'testing') -----
+ testNextPutAllStartingAt
+
+ | result |
+ fileName := 'foonextputallstartingat.txt'.
+ MultiByteFileStream forceNewFileNamed: fileName do: [ :file |
+ file
+ next: 1 putAll: 'abcde' startingAt: 5;
+ next: 3 putAll: 'abcde' startingAt: 2;
+ next: 1 putAll: 'abcde' startingAt: 1 ].
+ result := StandardFileStream readOnlyFileNamed: fileName do: [ :file |
+ file binary; contents ].
+ self assert: #[101 98 99 100 97] equals: result
+ !