Andreas Raab uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-ar.137.mcz
==================== Summary ====================
Name: CollectionsTests-ar.137 Author: ar Time: 1 February 2010, 9:44:54.528 pm UUID: 22c99a94-361b-f54f-83f8-4fcf0d126d36 Ancestors: CollectionsTests-ar.136
Fixes a typo in SetWithNilTest.
=============== Diff against CollectionsTests-ar.136 ===============
Item was changed: ----- Method: SetWithNilTest>>runSetWithNilTestOf: (in category 'tests') ----- runSetWithNilTestOf: newSet "Run the common tests for the given set class" self shouldnt:[newSet value add: nil] raise: Error. self shouldnt:[newSet value addAll: #(nil nil nil)] raise: Error.
self assert: (newSet value add: nil; yourself) size = 1. self assert: (newSet value addAll: #(nil nil nil); yourself) size = 1.
self assert: ((newSet value add: nil; yourself) includes: nil). self assert: ((newSet value addAll: #(nil nil nil); yourself) includes: nil).
self assert: (newSet value add: nil; yourself) anyOne = nil. self assert: ((newSet value add: nil; yourself) remove: nil) == nil. self assert: ((newSet value add: nil; yourself) remove: nil; yourself) isEmpty.
self assert: (newSet value addAll: #(1 nil foo); yourself) size = 3. self assert: ((newSet value addAll: #(1 nil foo); yourself) remove: nil; yourself) size = 2.
+ self assert: ((newSet value add: nil; yourself) collect:[:x| x]) = (newSet value add: nil; yourself). - self assert: ((newSet value add: nil; yourself) collect:[:x| x]) = (PluggableSet with: nil). self assert: ((newSet value add: nil; yourself) collect:[:x| x] as: Array) = #(nil).
self deny: ((newSet value) includes: nil). self deny: ((newSet value add: 3; yourself) includes: nil). self deny: ((newSet value add: 3; remove: 3; yourself) includes: nil). !
packages@lists.squeakfoundation.org