Nicolas Cellier uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-nice.263.mcz==================== Summary ====================
Name: Kernel-nice.263
Author: nice
Time: 7 October 2009, 8:58:27 am
UUID: 2ca1dd7b-3aaf-ef40-a65d-9470d31bf6b6
Ancestors: Kernel-nice.262
Modify this:
(Object>>#printOn:) printString
before -> 'a CompiledMethod(1947: Object>>printOn:)'
after -> '(Object>>#printOn: "a CompiledMethod(1947)")'
This way, a CompiledMethod printString can be interpreted back.
This follows
http://bugs.squeak.org/view.php?id=6726A variant has been implemented in trunk previously, but in a non interpretable manner.
This one close the report.
=============== Diff against Kernel-nice.262 ===============
Item was changed:
----- Method: CompiledMethod>>printOn: (in category 'printing') -----
printOn: aStream
"Overrides method inherited from the byte arrayed collection."
+ aStream nextPut: $(; print: self methodClass; nextPutAll: '>>'; nextPutAll: self selector storeString; space; nextPut: $".
+ self printNameOn: aStream.
+ aStream nextPut: $(; print: self identityHash; nextPut: $); nextPut: $"; nextPut: $)!
- self printNameOn: aStream.
- aStream nextPut: $(; print: self identityHash; nextPutAll: ': ';
- print: self methodClass; nextPutAll: '>>'; nextPutAll: self selector; nextPut: $).
- "aStream space; nextPutAll: self identityHashPrintString"
- !