[Vm-dev] VM Maker: VMMaker.oscog-eem.2586.mcz

commits at source.squeak.org commits at source.squeak.org
Sun Nov 17 18:27:58 UTC 2019


Eliot Miranda uploaded a new version of VMMaker to project VM Maker:
http://source.squeak.org/VMMaker/VMMaker.oscog-eem.2586.mcz

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

Name: VMMaker.oscog-eem.2586
Author: eem
Time: 17 November 2019, 10:27:40.821889 am
UUID: ae4e24e7-dc65-411b-9f81-53f66f183eaf
Ancestors: VMMaker.oscog-eem.2585

Eliminate info duplicaton in new interpreter version name.

=============== Diff against VMMaker.oscog-eem.2585 ===============

Item was changed:
  ----- Method: VMClass class>>declareInterpreterVersionIn:defaultName: (in category 'translation') -----
  declareInterpreterVersionIn: aCCodeGenerator defaultName: defaultName
- 	| objMemName |
- 	objMemName := aCCodeGenerator vmClass objectMemoryClass memoryManagerName.
  	NewspeakVM ifTrue:
  		["Newspeak as of mid 2011 derives SystemScope systemName from the interpreterVersion
  		  (via system attribute 1004) by copying up to but not including the last space, provided the
  		  string ends with a digit.  So spaces must be eliminated from the Monitcello version string,
  		  and we can't surround it with square brackets."
  		(aCCodeGenerator shortMonticelloDescriptionForClass: self) last isDigit ifFalse:
  			[self error: 'Newspeak expects interpreterVersion ends with a digit'].
  		aCCodeGenerator
  			var: #interpreterVersion
  			declareC: 'const char *interpreterVersion = "Newspeak Virtual Machine ',
+ 							('[ Open Smalltalk, ', aCCodeGenerator vmClass objectMemoryClass memoryManagerName,'] '),
- 							('[ Open Smalltalk, ',objMemName,'] '),
  							((aCCodeGenerator shortMonticelloDescriptionForClass: self) copyReplaceAll: ' ' with: '_'),
  							'"'.
  		^self].
  	
  	aCCodeGenerator
  		var: #interpreterVersion
  		declareC: 'const char *interpreterVersion = "Open Smalltalk ', defaultName, ' VM [',
- 					objMemName, ' ',
  					(aCCodeGenerator shortMonticelloDescriptionForClass: self),']"'!



More information about the Vm-dev mailing list