The Trunk: Collections-nice.239.mcz

Nicolas Cellier uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-nice.239.mcz

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

Name: Collections-nice.239
Author: nice
Time: 4 December 2009, 3:57:30 am
UUID: d67661a8-1206-da45-90f5-3c5081799230
Ancestors: Collections-ul.238

Remove some now useless fixTemps

=============== Diff against Collections-ul.238 ===============

Item was changed:
  ----- Method: Heap>>indexUpdateBlock: (in category 'accessing') -----
  indexUpdateBlock: aBlockOrNil
 
  indexUpdateBlock := aBlockOrNil.
+
- indexUpdateBlock fixTemps.
  !

Item was changed:
  ----- Method: SortedCollection>>sortBlock: (in category 'accessing') -----
  sortBlock: aBlock
  "Make the argument, aBlock, be the criterion for ordering elements of the
  receiver."
 
+ sortBlock := aBlock.
+ "sortBlocks with side effects may not work right"
- aBlock
- ifNotNil: [sortBlock := aBlock fixTemps]
- ifNil: [sortBlock := aBlock].
- "The sortBlock must copy its home context, so as to avoid circularities!!"
- "Therefore sortBlocks with side effects may not work right"
  self size > 0 ifTrue: [self reSort]!

Item was changed:
  ----- Method: Heap>>sortBlock: (in category 'accessing') -----
  sortBlock: aBlock
  sortBlock := aBlock.
- sortBlock fixTemps.
  self reSort.!

Item was changed:
  ----- Method: SortedCollection>>reverseInPlace (in category 'converting') -----
  reverseInPlace
  "Change this colleciton into its reversed.
  Do not make a copy like reversed do, but change self in place."
 
  | newFirstIndex oldSortBlock |
  newFirstIndex := 1 + array size - lastIndex.
  lastIndex := 1 + array size - firstIndex.
  firstIndex := newFirstIndex.
  array := array reversed.
  oldSortBlock := (sortBlock ifNil: [[:a :b | a <= b]]) copy.
+ sortBlock := [:a :b | oldSortBlock value: b value: a]!
- sortBlock := [:a :b | oldSortBlock value: b value: a] fixTemps!