Levente Uzonyi uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-ul.256.mcz==================== Summary ====================
Name: CollectionsTests-ul.256
Author: ul
Time: 2 November 2015, 4:10:24.284 am
UUID: 3605a07c-4484-44ae-ba91-f5be4d7da842
Ancestors: CollectionsTests-nice.255
Set >> #collect: returns a Set, so compare the result of it with a Set in SetWithNilTest >> #runSetWithNilTestOf:.
=============== Diff against CollectionsTests-nice.255 ===============
Item was changed:
----- Method: SetWithNilTest>>runSetWithNilTestOf: (in category 'tests') -----
runSetWithNilTestOf: newSet
"Run the common tests for the given set class"
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]) = (Set with: nil).
- 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] 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).
!