The Trunk: System-ul.910.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: System-ul.910.mcz

commits-2
Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.910.mcz

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

Name: System-ul.910
Author: ul
Time: 27 August 2016, 7:16:13.238315 pm
UUID: b4b3e62f-d4f9-4531-a22b-6ed8acafadac
Ancestors: System-mt.909

DeepCopier changes:
- added #new: to create a new instance with a given initial capacity
- avoid a block creation in #fixDependents

=============== Diff against System-mt.909 ===============

Item was added:
+ ----- Method: DeepCopier class>>new: (in category 'instance creation') -----
+ new: requestedSize
+
+ ^self basicNew initialize: requestedSize!

Item was changed:
  ----- Method: DeepCopier>>fixDependents (in category 'like fullCopy') -----
  fixDependents
  "They are not used much, but need to be right"
 
  DependentsFields associationsDo: [:pair |
+ pair value do: [ :dependent |
+ (references at: dependent ifAbsent: nil) ifNotNil: [ :newDependent |
+ (references at: pair key ifAbsent: [ pair key ])
+ addDependent: newDependent ] ] ]!
- pair value do: [:dep |
- | newDep newModel |
- newDep := references at: dep ifAbsent: [nil].
- newDep ifNotNil: [
- newModel := references at: pair key ifAbsent: [pair key].
- newModel addDependent: newDep]]].
- !