[Vm-dev] VM Maker: VMMaker.oscog-EstebanLorenzano.1322.mcz

commits at source.squeak.org commits at source.squeak.org
Fri May 22 18:45:32 UTC 2015

Esteban Lorenzano uploaded a new version of VMMaker to project VM Maker:

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

Name: VMMaker.oscog-EstebanLorenzano.1322
Author: EstebanLorenzano
Time: 22 May 2015, 8:38:54.928627 pm
UUID: f973b39f-b9fb-425b-90d2-eda1a2c2406e
Ancestors: VMMaker.oscog-EstebanLorenzano.1321

added a PharoVM flag I forgot

=============== Diff against VMMaker.oscog-EstebanLorenzano.1321 ===============

Item was changed:
  ----- Method: CCodeGenerator>>emitGlobalCVariablesOn: (in category 'C code generator') -----
  emitGlobalCVariablesOn: aStream
  	"Store the global variable declarations on the given stream."
  	aStream cr; nextPutAll: '/*** Global Variables ***/'; cr.
  	(self sortStrings: (variables select: [:v| vmClass mustBeGlobal: v])) do:
  		[:var | | varString decl |
  		varString := var asString.
  		decl := variableDeclarations at: varString ifAbsent: ['sqInt ' , varString].
  		decl first == $# "support cgen var: #bytecodeSetSelector declareC: '#define bytecodeSetSelector 0' hack"
  				[aStream nextPutAll: decl; cr]
  				((decl includesSubString: ' private ')
  				  "or: [decl beginsWith: 'static']") ifFalse: "work-around hack to prevent localization of variables only referenced once."
+ 					PharoVM ifTrue: 
+ 						[(decl beginsWith: 'static') ifFalse: [aStream nextPutAll: 'VM_EXPORT ']].
- 					(decl beginsWith: 'static') ifFalse: [aStream nextPutAll: 'VM_EXPORT '].
  					(decl includes: $=) ifTrue:
  						[decl := decl copyFrom: 1 to: (decl indexOf: $=) - 1].
  						nextPutAll: decl;
  						nextPut: $;;
  	aStream cr!

More information about the Vm-dev mailing list