The Trunk: CollectionsTests-mt.334.mcz

Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-mt.334.mcz

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

Name: CollectionsTests-mt.334
Author: mt
Time: 26 February 2020, 5:21:29.250527 pm
UUID: cb010f8e-8ffe-c54e-89fa-d7120e38b23d
Ancestors: CollectionsTests-ul.333

Prepare 5.3rc2 --- Marks expected failures for some Interval tests. Adds tests about #isEmpty in weak collections.

=============== Diff against CollectionsTests-ul.333 ===============

Item was added:
+ ----- Method: IntervalTest>>expectedFailures (in category 'failures') -----
+ expectedFailures
+
+ ^ #(testIntervalOfFloatLast testIntervalOfFloatReversed testSurprisingFuzzyInclusionBehavior)!

Item was added:
+ ClassTestCase subclass: #WeakIdentityDictionaryTest
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'CollectionsTests-Weak'!

Item was added:
+ ----- Method: WeakIdentityDictionaryTest>>testIsEmpty (in category 'tests') -----
+ testIsEmpty
+
+ | wid o1 o2 |
+ o1 := #o1 -> Object new.
+ o2 := #o2 -> Object new.
+
+ wid := self targetClass new.
+ self assert: wid isEmpty.
+
+ wid add: o1.
+ wid add: o2.
+ self deny: wid isEmpty.
+      
+ Smalltalk garbageCollect.
+ self deny: wid isEmpty.
+
+ o1 := nil.
+ o2 := nil.
+ Smalltalk garbageCollect.
+ self assert: wid isEmpty.!

Item was added:
+ ----- Method: WeakKeyDictionaryTest>>testIsEmpty (in category 'tests') -----
+ testIsEmpty
+
+ | wkd o1 o2 |
+ o1 := Object new.
+ o2 := Object new.
+
+ wkd := self targetClass new.
+ self assert: wkd isEmpty.
+
+ wkd at: o1 put: #o1.
+ wkd at: o2 put: #o2.
+ self deny: wkd isEmpty.
+      
+ Smalltalk garbageCollect.
+ wkd finalizeValues.
+ self deny: wkd isEmpty.
+
+ o1 := nil.
+ o2 := nil.
+ Smalltalk garbageCollect.
+ wkd finalizeValues.
+ self assert: wkd isEmpty.!

Item was added:
+ ----- Method: WeakSetTest>>testIsEmpty (in category 'tests') -----
+ testIsEmpty
+
+ | ws o1 o2 |
+ o1 := Object new.
+ o2 := Object new.
+
+ ws := self targetClass new.
+ self assert: ws isEmpty.
+
+ ws add: o1.
+ ws add: o2.
+ self deny: ws isEmpty.
+      
+ Smalltalk garbageCollect.
+ self deny: ws isEmpty.
+
+ o1 := nil.
+ o2 := nil.
+ Smalltalk garbageCollect.
+ self assert: ws isEmpty.!