Andreas Raab uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-ar.146.mcz

==================== Summary ====================

Name: Collections-ar.146
Author: ar
Time: 29 September 2009, 11:13:32 am
UUID: 92161bb4-bec3-7a43-b30d-9d2d9da56bb8
Ancestors: Collections-ar.145

Pseudo-merging Collections-ul.145:

deprecated #findElementOrNil: and #noCheckAdd:

=============== Diff against Collections-ar.145 ===============

Item was changed:
  ----- Method: KeyedSet>>noCheckAdd: (in category 'private') -----
  noCheckAdd: anObject
+ 
+ 	self deprecated: 'This method should not be used anymore.'.
  	array at: (self scanFor: (keyBlock value: anObject)) put: anObject.
  	tally := tally + 1!

Item was changed:
  ----- Method: Set>>findElementOrNil: (in category 'private') -----
  findElementOrNil: anObject
  	"Answer the index of a first slot containing either a nil (indicating an empty slot) or an element that matches the given object. Answer the index of that slot or zero. Fail if neither a match nor an empty slot is found."
  
  	| index |
+ 	self deprecated: 'Use #scanFor:.'.
- 
  	index := self scanFor: anObject.
  	index > 0 ifTrue: [^index].
  
  	"Bad scene.  Neither have we found a matching element
  	nor even an empty slot.  No hashed set is ever supposed to get
  	completely full."
  	self error: 'There is no free space in this set!!'.!

Item was changed:
  ----- Method: Set>>noCheckAdd: (in category 'private') -----
  noCheckAdd: anObject
+ 
+ 	self deprecated: 'This method should not be used anymore.'.
  	array at: (self scanFor: anObject) put: anObject.
  	tally := tally + 1!

Item was changed:
  ----- Method: Dictionary>>noCheckAdd: (in category 'private') -----
  noCheckAdd: anObject
  	"Must be defined separately for Dictionary because (self scanFor:) expects a key,
  	not an association.  9/7/96 tk"
  
+ 	self deprecated: 'This method should not be used anymore.'.
  	array at: (self scanFor: anObject key) put: anObject.
  	tally := tally + 1!