The Trunk: CollectionsTests-nice.108.mcz

Nicolas Cellier uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-nice.108.mcz

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

Name: CollectionsTests-nice.108
Author: nice
Time: 9 November 2009, 12:11:15 pm
UUID: ebea61c9-bc17-42b2-b874-56322d0ec84f
Ancestors: CollectionsTests-nice.107

clean-up isSelfEvaluating

=============== Diff against CollectionsTests-nice.107 ===============

Item was removed:
- ----- Method: AssociationTest>>testIsSelfEvaluating (in category 'tests') -----
- testIsSelfEvaluating
- | anotherAssociation |
- self
- assert: (a isSelfEvaluating).
- anotherAssociation := Object new -> Object new.
- anotherAssociation isSelfEvaluating ifTrue: [self
- assert: (Compiler evaluate: anotherAssociation printString) = anotherAssociation
- description: 'a self evaluating should evaluate as self'].!

Item was removed:
- ----- Method: IntervalTest>>testIsEvaluating (in category 'tests') -----
- testIsEvaluating
- self assert: (1 to: 10) isSelfEvaluating.
- self assert: (1 to: 10 by: 2) isSelfEvaluating!

Item was removed:
- ----- Method: ArrayTest>>testIsSelfEvaluating (in category 'testing') -----
- testIsSelfEvaluating
-
- self assert: example1 isSelfEvaluating.
- example1 at: 1 put: Bag new.
- self deny: example1 isSelfEvaluating.
- example1 at: 1 put: 1.!

Item was removed:
- ----- Method: RunArrayTest>>testIsSelfEvaluating (in category 'tests - instance creation') -----
- testIsSelfEvaluating
- | array array2 |
- array := RunArray new: 5 withAll: 2.
- self assert: array isSelfEvaluating.
- array2 := RunArray new: 5 withAll: Object new.
- array2 isSelfEvaluating ifTrue: [self
- assert: (Compiler evaluate: array2 printString) = array2
- description: 'a self evaluating should evaluate as self'].!