Alexander Lazarević uploaded a new version of SystemReporter to project The Trunk:
http://source.squeak.org/trunk/SystemReporter-laza.13.mcz==================== Summary ====================
Name: SystemReporter-laza.13
Author: laza
Time: 8 February 2011, 11:48:56.356 am
UUID: 4058de5c-336d-1b46-a5e7-d1e1a87421c7
Ancestors: SystemReporter-laza.12
Add output of interpreterClass and cogitClass for Cog VMs to the vm report
=============== Diff against SystemReporter-laza.12 ===============
Item was changed:
----- Method: SystemReporter>>reportVM: (in category 'reporting') -----
reportVM: aStream
self header: 'Virtual Machine' on: aStream.
aStream
nextPutAll: (Smalltalk vm vmFileName); cr;
nextPutAll: (Smalltalk vm vmVersion); cr.
Smalltalk vm buildDate
ifNotNilDo: [:string | aStream nextPutAll: string; cr].
[Smalltalk vm platformSourceVersion
ifNotNilDo: [:v | aStream nextPutAll: 'platform sources revision ', v; cr]]
on: Warning do: ["unsupported primitive"].
[Smalltalk vm interpreterSourceVersion
ifNotNilDo: [:v | aStream nextPutAll: 'VMMaker versionString ', v; cr]]
+ on: Warning do: ["unsupported primitive"].
+ Smalltalk vm interpreterClass
+ ifNotNilDo: [:string | aStream nextPutAll: string; cr].
+ Smalltalk vm cogitClass
+ ifNotNilDo: [:string | aStream nextPutAll: string; cr]
+ !
- on: Warning do: ["unsupported primitive"]!