Levente Uzonyi uploaded a new version of 51Deprecated to project The Trunk:
http://source.squeak.org/trunk/51Deprecated-ul.30.mcz==================== Summary ====================
Name: 51Deprecated-ul.30
Author: ul
Time: 2 June 2016, 8:28:00.97666 pm
UUID: 2a30b91d-0870-412d-8c10-ee96c3c48065
Ancestors: 51Deprecated-mt.29
Deprecated the now unused methods of Heap.
=============== Diff against 51Deprecated-mt.29 ===============
Item was added:
+ ----- Method: Heap>>fullySort (in category '*51Deprecated') -----
+ fullySort
+ "Fully sort the heap.
+ This method preserves the heap invariants and can thus be sent safely"
+
+ self deprecated: 'Use #sort'.
+ self sort!
Item was added:
+ ----- Method: Heap>>reSort (in category '*51Deprecated') -----
+ reSort
+ "Resort the entire heap"
+
+ self deprecated: 'This method should not be used anymore. Use #sortBlock: if you want to change the sort order.'.
+ tally <= 1 ifTrue: [ ^self ].
+ (tally bitShift: -1) to: 1 by: -1 do: [ :index | self downHeap: index ]!
Item was added:
+ ----- Method: Heap>>sorts:before: (in category '*51Deprecated') -----
+ sorts: element1 before: element2
+ "Return true if element1 should be sorted before element2.
+ This method defines the sort order in the receiver"
+
+ self deprecated: 'This method has been inlined for performance.'.
+ ^sortBlock == nil
+ ifTrue:[element1 <= element2]
+ ifFalse:[sortBlock value: element1 value: element2].!
Item was added:
+ ----- Method: Heap>>trim (in category '*51Deprecated') -----
+ trim
+ "Remove any empty slots in the receiver."
+
+ self deprecated: 'Use #compact'.
+ self compact!
Item was added:
+ ----- Method: Heap>>updateObjectIndex: (in category '*51Deprecated') -----
+ updateObjectIndex: index
+ "If indexUpdateBlock is not nil, notify the object at index of its new position in the heap array."
+
+ self deprecated: 'This method has been inlined for performance.'.
+ indexUpdateBlock ifNotNil: [
+ indexUpdateBlock value: (array at: index) value: index]!