A new version of Collections was added to project The Inbox:
http://source.squeak.org/inbox/Collections-ul.145.mcz==================== Summary ====================
Name: Collections-ul.145
Author: ul
Time: 26 September 2009, 3:09:51 am
UUID: 82a41c01-844f-764d-82ee-39ae38d692ec
Ancestors: Collections-ul.144
deprecated #findElementOrNil: and #noCheckAdd:
=============== Diff against Collections-ul.144 ===============
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!