Eliot Miranda uploaded a new version of VMMakerUI to project VM Maker: http://source.squeak.org/VMMaker/VMMakerUI-eem.56.mcz
==================== Summary ====================
Name: VMMakerUI-eem.56 Author: eem Time: 3 February 2022, 10:38:54.011651 pm UUID: c62e3fb2-17e9-4d66-98dc-fd7b37f4dd5b Ancestors: VMMakerUI-eem.55
formatting...
=============== Diff against VMMakerUI-eem.55 ===============
Item was changed: ----- Method: CogProcessorAlienInspector>>text (in category 'accessing - ui') ----- text ^Text streamContents: [:s | | max exclude fpstate | cogit ifNotNil: [(cogit addressIsInCodeZone: processor pc) ifTrue: [s tab; + nextPutAll: (processor + decorateDisassembly: (processor disassembleInstructionAt: processor pc In: memory) + for: cogit + fromAddress: processor pc). - nextPutAll: (processor decorateDisassembly: (processor disassembleInstructionAt: processor pc In: memory) - for: cogit - fromAddress: processor pc). (cogit lookupAddress: processor pc) ifNotNil: [:where| s tab: 2; nextPutAll: where]] ifFalse: [(cogit lookupAddress: processor pc) ifNotNil: [:where| s tab: 2. processor pc printOn: s base: 16. s tab; nextPutAll: where]]]. s cr. max := (registerSelectors ifEmpty: [1] ifNotEmpty: [:selector | (selector collect: #size) max]). exclude := Set new. 1 to: (fpstate := processor floatingPointRegisterStateGetters) size by: 4 do: [:index| ((index to: index + 3) allSatisfy: [:fpri| (processor perform: (fpstate at: fpri)) isZero]) ifTrue: [exclude addAll: (fpstate copyFrom: index to: index + 3)]]. registerSelectors do: [:selector | | attribute | (exclude includes: selector) ifFalse: [s nextPutAll: ((selector asUppercase padded: #right to: max with: Character space) asText addAttribute: (attribute := PluggableTextAttribute evalBlock: [self interpret: selector])); space; nextPutAll: (self registerTextAt: selector). (registerMap at: selector ifAbsent: []) ifNotNil: [:abstractReg| s space; nextPutAll: (abstractReg asText addAttribute: attribute)]. s cr]]]!
vm-dev@lists.squeakfoundation.org