[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