[Pkg] The Trunk: SystemReporter-nice.36.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Jun 10 15:57:35 UTC 2017


Nicolas Cellier uploaded a new version of SystemReporter to project The Trunk:
http://source.squeak.org/trunk/SystemReporter-nice.36.mcz

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

Name: SystemReporter-nice.36
Author: nice
Time: 10 June 2017, 5:57:23.049423 pm
UUID: 39920c72-ab26-4596-bd3f-41ab4d481980
Ancestors: SystemReporter-eem.35

Massively replace ifNotNilDo: by ifNotNil:
We don't need two different selectors to do a single thing.

=============== Diff against SystemReporter-eem.35 ===============

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
+ 		ifNotNil: [:string | aStream nextPutAll: string; cr].
- 		ifNotNilDo: [:string | aStream nextPutAll: string; cr].
  	[Smalltalk vm platformSourceVersion
+ 		ifNotNil: [:v | aStream nextPutAll: 'platform sources revision ', v; cr]]
- 		ifNotNilDo: [:v | aStream nextPutAll: 'platform sources revision ', v; cr]]
  			on: Warning do: ["unsupported primitive"].
  	[Smalltalk vm interpreterSourceVersion
+ 		ifNotNil: [:v | aStream nextPutAll: 'VMMaker versionString ', v; cr]]
- 		ifNotNilDo: [:v | aStream nextPutAll: 'VMMaker versionString ', v; cr]]
  			on: Warning do: ["unsupported primitive"].
  	[Smalltalk vm interpreterClass
+ 		ifNotNil: [:string | aStream nextPutAll: string; cr].
- 		ifNotNilDo: [:string | aStream nextPutAll: string; cr].
  	Smalltalk vm cogitClass
+ 		ifNotNil: [:string | aStream nextPutAll: string; cr]
- 		ifNotNilDo: [:string | aStream nextPutAll: string; cr]
  	] on: Error do: ["unsupported primitives"]
  !



More information about the Packages mailing list