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=6726
A 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"
- !