[Pkg] The Trunk: CollectionsTests-fbs.201.mcz

[commits at source.squeak.org]

Frank Shearar uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-fbs.201.mcz

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

Name: CollectionsTests-fbs.201
Author: fbs
Time: 5 April 2013, 1:30:30.063 pm
UUID: 56fcde94-d861-4642-8fbe-54a1da9a9485
Ancestors: CollectionsTests-nice.200

Make the tests spit out useful error messages.

This test:

    self assert: '{#Array}' equals: nonSEarray2 printString.

fails because nonSEarray2 := { Smalltalk globals associationAt: #Array } is now an Array with a ClassBinding.

=============== Diff against CollectionsTests-nice.200 ===============

Item was changed:
  ----- Method: ArrayTest>>testPrinting (in category 'testing') -----
  testPrinting
+ 	self assert: '#(1 true 3 #four)' equals: literalArray printString.
+ 	self
+ 		assert: (literalArray = (Compiler evaluate: literalArray printString))
+ 		description: 'Literal array doesn''t print as a string that when evaluated returns an equivalent Array'.
+ 	self assert: '{1 . true . (3/4) . Color black . (2 to: 4) . 5}' equals: selfEvaluatingArray printString.
+ 	self
+ 		assert: (selfEvaluatingArray = (Compiler evaluate: selfEvaluatingArray printString))
+ 		description: 'Array doesn''t print as a string that when evaluated returns an equivalent Array'.
+ 	self assert: '{1 . a Set(1)}' equals: nonSEArray1 printString.
+ 	self assert: '{#Array}' equals: nonSEarray2 printString.
- 	self assert: literalArray printString = '#(1 true 3 #four)'.
- 	self assert: (literalArray = (Compiler evaluate: literalArray printString)).
- 	self assert: selfEvaluatingArray printString =  '{1 . true . (3/4) . Color black . (2 to: 4) . 5}'.
- 	self assert: (selfEvaluatingArray = (Compiler evaluate: selfEvaluatingArray printString)).
- 	self assert: nonSEArray1 printString =  '{1 . a Set(1)}'.
- 	self assert: nonSEarray2 printString =  '{#Array}'
  !