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

[commits at source.squeak.org]

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

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

Name: VMMaker.oscog-eem.2172
Author: eem
Time: 20 March 2017, 10:12:21.670216 am
UUID: 645291b4-9730-4d8f-aba0-ef17ec4f03dd
Ancestors: VMMaker.oscog-eem.2171

Cogit:
Make the selection criterion
	#if SysVABI && (...)
	#elif WIN64ABI && (...)
instead of the weaker #if defined(SysV) && (...).

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

Item was changed:
  ----- Method: Cogit class>>generateCodeStringForCogitDotC (in category 'translation') -----
  generateCodeStringForCogitDotC
  	"Generate a skeletal cogit.c that includes the relevant cogitFOO.c
  	 for the appropriate subclasses of CogAbstractInstruction."
  	 
  	^String streamContents:
  		[:s|
  		 s nextPutAll: '/* Automatically generated by\	' withCRs.
  		 s nextPutAll: (CCodeGenerator monticelloDescriptionFor: self).
  		 s cr; nextPutAll: ' */'.
  		 s cr; cr; nextPut: $#.
  		 self translateableInstructionSubclassesAndInstalledOptionsDo:
  			[:class | | abi |
  			 s nextPutAll: 'if '.
  			 (abi := initializationOptions at: #ABI ifAbsent: []) ifNotNil:
+ 				[s nextPutAll: abi; nextPutAll: 'ABI && ('].
- 				[s nextPutAll: 'defined('; nextPutAll: abi; nextPutAll: ') && ('].
  			 class identifyingPredefinedMacros
  				do: [:predefinedMacro| s nextPutAll: 'defined('; nextPutAll: predefinedMacro; nextPut: $)]
  				separatedBy: [s nextPutAll: ' || '].
  			 abi ifNotNil: [s nextPut: $)].
  			 s cr; cr; nextPutAll: '#	include "'; nextPutAll: class moduleName; nextPutAll: '.c"'.
  			 s cr; cr; nextPutAll: '#el'].
  		 s nextPutAll: 'se'.
  		 #(	'As yet no Cogit implementation appears to exist for your platform.'
  			'Consider implementing it, starting by adding a subclass of CogAbstractInstruction.') do:
  			[:msg| s cr; nextPutAll: '#	error '; nextPutAll: msg].
  		 s cr; nextPutAll: '#endif'; cr]!