[Vm-dev] VM Maker: VMMaker.oscog-eem.1806.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.1806.mcz

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

Name: VMMaker.oscog-eem.1806
Author: eem
Time: 15 April 2016, 11:25:55.653793 am
UUID: 6a92b5f2-a4af-44e1-9146-b829bdd5452a
Ancestors: VMMaker.oscog-eem.1805

Fix option provessing in the Cogit's primitive table generation for bytecode set options.

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

Item was changed:
  ----- Method: StackInterpreter class>>initializeBytecodeTable (in category 'initialization') -----
  initializeBytecodeTable
  	"StackInterpreter initializeBytecodeTable"
  
+ 	VMBytecodeConstants falsifyBytecodeSetFlags: initializationOptions.
- 	VMBytecodeConstants falsifyBytecodeSetFlags.
  	BytecodeSetHasDirectedSuperSend := false.
  
  	(initializationOptions at: #bytecodeTableInitializer ifAbsent: nil) ifNotNil:
  		[:initalizer| ^self perform: initalizer].
  
  	NewspeakVM ifTrue:
  		[^MULTIPLEBYTECODESETS
  			ifTrue: [self initializeBytecodeTableForSqueakV3PlusClosuresNewspeakV4Hybrid]
  			ifFalse: [self initializeBytecodeTableForNewspeakV4]].
  
  	^self initializeBytecodeTableForSqueakV3PlusClosures!

Item was removed:
- ----- Method: VMBytecodeConstants class>>falsifyBytecodeSetFlags (in category 'simulator initialization') -----
- falsifyBytecodeSetFlags
- 	SqueakV3PlusClosuresBytecodeSet.
- 	NewsqueakV4BytecodeSet.
- 	SistaV1BytecodeSet.
- 	classPool keys do:
- 		[:k|
- 		(k endsWith: 'BytecodeSet') ifTrue:
- 			[classPool at: k put: false]]
- 
- 	"classPool keys select: [:k| k endsWith: 'BytecodeSet']"!

Item was added:
+ ----- Method: VMBytecodeConstants class>>falsifyBytecodeSetFlags: (in category 'simulator initialization') -----
+ falsifyBytecodeSetFlags: initializationOptions
+ 	SqueakV3PlusClosuresBytecodeSet.
+ 	NewsqueakV4BytecodeSet.
+ 	SistaV1BytecodeSet.
+ 	classPool keys do:
+ 		[:k|
+ 		(k endsWith: 'BytecodeSet') ifTrue:
+ 			[classPool at: k put: false.
+ 			 initializationOptions at: k put: false]]
+ 
+ 	"classPool keys select: [:k| k endsWith: 'BytecodeSet']"!