VM Maker: VMMaker.oscog-eem.2706.mcz

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

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

Name: VMMaker.oscog-eem.2706
Author: eem
Time: 4 February 2020, 5:56:30.188439 pm
UUID: e99996b1-463c-4cb8-878e-833d5286269f
Ancestors: VMMaker.oscog-eem.2705

Simulation: Fix printRumpCStack and have it be more informative.

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

Item was changed:
  ----- Method: CogVMSimulator>>printRumpCStackTo: (in category 'rump c stack') -----
  printRumpCStackTo: address
  self assert: (self isOnRumpCStack: address).
+ address
+ to: heapBase - self rumpCStackSize
- heapBase - objectMemory wordSize
- to: address
  by: objectMemory wordSize negated
+ do: [:addr| | label |
- do:
- [:addr|
  self printHex: addr.
+ addr = cogit processor sp ifTrue: [label := ' sp'].
+ addr = cogit processor fp ifTrue: [label := (label ifNil: [''] ifNotNil: [label, ',']), 'fp'].
+ addr = CStackPointer ifTrue: [label := (label ifNil: [''] ifNotNil: [label, ',']), 'CSP'].
+ addr = CFramePointer ifTrue: [label := (label ifNil: [''] ifNotNil: [label, ',']), 'CFP'].
+ label ifNil: [self tab] ifNotNil: [self print: ' ', label, '->'].
- addr = cogit processor sp
- ifTrue: [self print: ' sp->']
- ifFalse:
- [addr = cogit processor fp
- ifTrue: [self print: ' fp->']
- ifFalse: [self tab]].
  self tab; printHex: (objectMemory longAt: addr); cr]!