Nicolas Cellier uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-nice.106.mcz==================== Summary ====================
Name: CollectionsTests-nice.106
Author: nice
Time: 1 November 2009, 7:15:47 am
UUID: 634040db-9e5e-4125-af0e-d015cc0e52d1
Ancestors: CollectionsTests-nice.105
Provide non regression tests for literal Array storeOn: (especially it must not loose bits when storing Float)
=============== Diff against CollectionsTests-nice.105 ===============
Item was added:
+ ----- Method: ArrayTest>>testLiteralStoreOn (in category 'testing') -----
+ testLiteralStoreOn
+ "Test that a literal Array is stored and evaluated back unchanged"
+
+ | anArray |
+ anArray := {true. false. nil. #a. 'a'. $a. -1. 0. 1. Float pi. Float halfPi. Float halfPi negated.}.
+ anArray := anArray copyWith: anArray.
+ self assert: anArray isLiteral.
+ self assert: (Compiler evaluate: anArray storeString) = anArray.!