[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:
http://source.squeak.org/VMMaker/VMMaker.oscog-EstebanLorenzano.1322.mcz
==================== 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"
ifTrue:
[aStream nextPutAll: decl; cr]
ifFalse:
[
((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].
aStream
nextPutAll: decl;
nextPut: $;;
cr]]].
aStream cr!
More information about the Vm-dev
mailing list