Marcel Taeumel uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-ct.857.mcz==================== Summary ====================
Name: Collections-ct.857
Author: ct
Time: 27 September 2019, 4:16:15.510642 pm
UUID: 8ef4b53e-ab8c-f64e-ad7e-4c24e28b2ccc
Ancestors: Collections-jr.855
Fix a copy bug revealed in CollectionsTests-ct.321
=============== Diff against Collections-jr.855 ===============
Item was changed:
----- Method: OrderedDictionary>>postCopyFrom:to: (in category 'copying') -----
postCopyFrom: startIndex to: endIndex
"Adapted from SequenceableCollection and OrderedCollection."
| oldOrder |
oldOrder := order.
array := self class arrayType
new: (self class goodPrimeAtLeast: endIndex - startIndex + 1 * 4 // 3). "fill 75% to 100%"
order := self class arrayType
+ new: array size + 1 * 3 // 4. "remove 25%"
- new: array size * 3 // 4. "remove 25%"
startIndex to: endIndex do: [:index | | element |
element := (oldOrder at: index) copy.
order at: index - startIndex + 1 put: element.
array at: (self scanFor: element key) put: element].
tally := endIndex - startIndex + 1.!
Locked
