Andreas Raab uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-ar.150.mcz==================== Summary ====================
Name: Collections-ar.150
Author: ar
Time: 30 September 2009, 9:29:03 am
UUID: ed19ab06-dd57-0e4f-a80c-0c5cba39e948
Ancestors: Collections-ul.148, Collections-ul.149
Merging Collections-ul.149:
- removed zero check from WeakSet >> #like:
=============== Diff against Collections-ul.148 ===============
Item was changed:
----- Method: WeakSet>>like: (in category 'public') -----
like: anObject
"Answer an object in the receiver that is equal to anObject,
nil if no such object is found. Relies heavily on hash properties"
+ | element |
+ ^(element := array at: (self scanFor: anObject)) == flag
+ ifFalse: [ element ]!
- | index element |
-
- ^(index := self scanFor: anObject) = 0
- ifFalse: [(element := array at: index) == flag ifFalse: [element]]!