Tobias Pape uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-topa.767.mcz==================== Summary ====================
Name: System-topa.767
Author: topa
Time: 7 October 2015, 9:00:05.666 pm
UUID: 2a220b8c-0076-434d-bb9e-d70b57cd1e39
Ancestors: System-eem.766
simplify (aSymbol copyWith: $:) asSymbol to asMutator
=============== Diff against System-eem.766 ===============
Item was changed:
----- Method: FilePackage>>fileInFrom: (in category 'reading') -----
fileInFrom: aStream
| changes |
changes := ChangeSet scanFile: aStream from: 0 to: aStream size.
aStream close.
('Processing ', self packageName)
displayProgressFrom: 1
to: changes size
during:[:bar| | chgRec |
1 to: changes size do:[:i|
bar value: i.
chgRec := changes at: i.
+ self perform: chgRec type asMutator with: chgRec.
- self perform: (chgRec type copyWith: $:) asSymbol
- with: chgRec.
].
].!
Item was changed:
----- Method: FilePackage>>fromStream:named: (in category 'reading') -----
fromStream: aStream named: aName
| changes |
changes := ChangeSet scanFile: aStream from: 0 to: aStream size.
aStream close.
('Processing ', aName)
displayProgressFrom: 1
to: changes size
during:[:bar| | chgRec |
1 to: changes size do:[:i|
bar value: i.
chgRec := changes at: i.
+ self perform: chgRec type asMutator with: chgRec.
- self perform: (chgRec type copyWith: $:) asSymbol
- with: chgRec.
].
].!