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.!