The Trunk: Kernel-eem.888.mcz

Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.888.mcz

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

Name: Kernel-eem.888
Author: eem
Time: 1 December 2014, 12:01:40.684 pm
UUID: 99c1a1fa-cf39-4a3d-a40f-c9158a8f7014
Ancestors: Kernel-eem.887

Fix CompiledMethod class newFrom:

=============== Diff against Kernel-eem.887 ===============

Item was changed:
  ----- Method: CompiledMethod class>>newFrom: (in category 'instance creation') -----
  newFrom: aCompiledMethod
+ "Clone the argument, aCompiledMethod"
  | inst |
+ "CompiledMethod newFrom: CompiledMethod class >> #newFrom:"
+ inst := self newMethod: aCompiledMethod basicSize - aCompiledMethod initialPC + 1
+ header: aCompiledMethod header.
+ 1 to: aCompiledMethod numLiterals do:
+ [:index|
+ inst literalAt: index put: (aCompiledMethod literalAt: index)].
+ aCompiledMethod initialPC to: aCompiledMethod size do:
+ [:index |
- inst := super basicNew: aCompiledMethod size.
- 1 to: aCompiledMethod size do: [:index |
  inst at: index put: (aCompiledMethod at: index)].
+ inst postCopy.
+ ^inst!
- ^ inst.!