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