[Vm-dev] VM Maker: VMMaker.oscog-cb.1261.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Apr 27 11:33:16 UTC 2015


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

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

Name: VMMaker.oscog-cb.1261
Author: cb
Time: 27 April 2015, 1:31:34.958 pm
UUID: a70f7860-6338-4b1a-a62d-15501ed6b8b8
Ancestors: VMMaker.oscog-cb.1260

added a method to be able to simulate non spur images.

fixed a typo...

=============== Diff against VMMaker.oscog-cb.1260 ===============

Item was added:
+ ----- Method: NewCoObjectMemorySimulatorLSB>>intAt:put: (in category 'memory access') -----
+ intAt: byteAddress put: a32BitValue
+ 	^self longAt: byteAddress put: (a32BitValue bitAnd: 16rFFFFFFFF)!

Item was changed:
  ----- Method: StackToRegisterMappingCogit>>allocateEqualsEqualsRegistersArgNeedsReg:rcvrNeedsReg:into: (in category 'bytecode generator support') -----
  allocateEqualsEqualsRegistersArgNeedsReg: argNeedsReg rcvrNeedsReg: rcvrNeedsReg into: binaryBlock
  	<inline: true>
  	| argReg rcvrReg |
  	self assert: (argNeedsReg or: [rcvrNeedsReg]).
  	argNeedsReg
  		ifTrue: 
  			[rcvrNeedsReg
  				ifTrue:
  					[self allocateRegForStackTopTwoEntriesInto: [:rTop :rNext| argReg := rTop. rcvrReg := rNext].
  					 self ssTop popToReg: argReg.
  					 (self ssValue: 1) popToReg: rcvrReg]
  				ifFalse:
+ 					[argReg := self allocateRegForStackEntryAt: 0.
- 					[argReg := self self allocateRegForStackEntryAt: 0.
  					 self ssTop popToReg: argReg]]
  		ifFalse:
  			[self assert: rcvrNeedsReg.
  			rcvrReg := self allocateRegForStackEntryAt: 1.
  			(self ssValue:1) popToReg: rcvrReg].
  		
  	self assert: (argNeedsReg not or: [argReg notNil]).
  	self assert: (rcvrNeedsReg not or: [rcvrReg notNil]).
  	
  	binaryBlock value: rcvrReg value: argReg.!



More information about the Vm-dev mailing list