VM Maker: Cog-eem.346.mcz

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

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

Name: Cog-eem.346
Author: eem
Time: 23 January 2018, 11:56:03.060715 am
UUID: 73f848ee-01d3-4d2f-b5be-d869a12f7421
Ancestors: Cog-eem.345

Add the missing control register accessiors for GdbARMAlien64 and delete subclass accessors that are the same as the superclass's.

=============== Diff against Cog-eem.345 ===============

Item was added:
+ ----- Method: GdbARMAlien64>>cflag (in category 'accessing') -----
+ cflag
+ ^self unsignedLongAt: 577!

Item was added:
+ ----- Method: GdbARMAlien64>>cflag: (in category 'accessing') -----
+ cflag: anUnsignedInteger
+ ^self unsignedLongAt: 577 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>fpCPSR (in category 'accessing') -----
+ fpCPSR
+ "The VFP cpsr flags are kept as a single word in the Alien structure. Return just the top 4 bits, the actual flags"
+ ^(self unsignedLongAt: 2569) >>28!

Item was added:
+ ----- Method: GdbARMAlien64>>ifflags (in category 'accessing') -----
+ ifflags
+ ^self unsignedLongAt: 585!

Item was added:
+ ----- Method: GdbARMAlien64>>ifflags: (in category 'accessing') -----
+ ifflags: anUnsignedInteger
+ ^self unsignedLongAt: 585 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>lr (in category 'accessing') -----
- lr
- ^self unsignedLongAt: 69!

Item was removed:
- ----- Method: GdbARMAlien64>>lr: (in category 'accessing') -----
- lr: anUnsignedInteger
- ^self unsignedLongAt: 69 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>nflag (in category 'accessing') -----
+ nflag
+ ^self unsignedLongAt: 569!

Item was added:
+ ----- Method: GdbARMAlien64>>nflag: (in category 'accessing') -----
+ nflag: anUnsignedInteger
+ ^self unsignedLongAt: 569 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>pc (in category 'accessing') -----
- pc
- ^self unsignedLongAt: 73!

Item was removed:
- ----- Method: GdbARMAlien64>>pc: (in category 'accessing') -----
- pc: anUnsignedInteger
- ^self unsignedLongAt: 73 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>priorPc (in category 'accessing') -----
+ priorPc
+ ^self unsignedLongAt: 613!

Item was added:
+ ----- Method: GdbARMAlien64>>priorPc: (in category 'accessing') -----
+ priorPc: anUnsignedInteger
+ ^self unsignedLongAt: 613 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r0 (in category 'accessing') -----
- r0
- ^self unsignedLongAt: 13!

Item was removed:
- ----- Method: GdbARMAlien64>>r0: (in category 'accessing') -----
- r0: anUnsignedInteger
- ^self unsignedLongAt: 13 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r1 (in category 'accessing') -----
- r1
- ^self unsignedLongAt: 17!

Item was removed:
- ----- Method: GdbARMAlien64>>r10 (in category 'accessing') -----
- r10
- ^self unsignedLongAt: 53!

Item was removed:
- ----- Method: GdbARMAlien64>>r10: (in category 'accessing') -----
- r10: anUnsignedInteger
- ^self unsignedLongAt: 53 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r11 (in category 'accessing') -----
- r11
- ^self unsignedLongAt: 57!

Item was removed:
- ----- Method: GdbARMAlien64>>r11: (in category 'accessing') -----
- r11: anUnsignedInteger
- ^self unsignedLongAt: 57 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r12 (in category 'accessing') -----
- r12
- ^self unsignedLongAt: 61!

Item was removed:
- ----- Method: GdbARMAlien64>>r12: (in category 'accessing') -----
- r12: anUnsignedInteger
- ^self unsignedLongAt: 61 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r1: (in category 'accessing') -----
- r1: anUnsignedInteger
- ^self unsignedLongAt: 17 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r2 (in category 'accessing') -----
- r2
- ^self unsignedLongAt: 21!

Item was removed:
- ----- Method: GdbARMAlien64>>r2: (in category 'accessing') -----
- r2: anUnsignedInteger
- ^self unsignedLongAt: 21 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r3 (in category 'accessing') -----
- r3
- ^self unsignedLongAt: 25!

Item was removed:
- ----- Method: GdbARMAlien64>>r3: (in category 'accessing') -----
- r3: anUnsignedInteger
- ^self unsignedLongAt: 25 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r4 (in category 'accessing') -----
- r4
- ^self unsignedLongAt: 29!

Item was removed:
- ----- Method: GdbARMAlien64>>r4: (in category 'accessing') -----
- r4: anUnsignedInteger
- ^self unsignedLongAt: 29 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r5 (in category 'accessing') -----
- r5
- ^self unsignedLongAt: 33!

Item was removed:
- ----- Method: GdbARMAlien64>>r5: (in category 'accessing') -----
- r5: anUnsignedInteger
- ^self unsignedLongAt: 33 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r6 (in category 'accessing') -----
- r6
- ^self unsignedLongAt: 37!

Item was removed:
- ----- Method: GdbARMAlien64>>r6: (in category 'accessing') -----
- r6: anUnsignedInteger
- ^self unsignedLongAt: 37 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r7 (in category 'accessing') -----
- r7
- ^self unsignedLongAt: 41!

Item was removed:
- ----- Method: GdbARMAlien64>>r7: (in category 'accessing') -----
- r7: anUnsignedInteger
- ^self unsignedLongAt: 41 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r8 (in category 'accessing') -----
- r8
- ^self unsignedLongAt: 45!

Item was removed:
- ----- Method: GdbARMAlien64>>r8: (in category 'accessing') -----
- r8: anUnsignedInteger
- ^self unsignedLongAt: 45 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>r9 (in category 'accessing') -----
- r9
- ^self unsignedLongAt: 49!

Item was removed:
- ----- Method: GdbARMAlien64>>r9: (in category 'accessing') -----
- r9: anUnsignedInteger
- ^self unsignedLongAt: 49 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>rawCPSR (in category 'accessing') -----
+ rawCPSR
+ ^self unsignedLongAt: 537!

Item was added:
+ ----- Method: GdbARMAlien64>>sflag (in category 'accessing') -----
+ sflag
+ ^self unsignedLongAt: 589!

Item was added:
+ ----- Method: GdbARMAlien64>>sflag: (in category 'accessing') -----
+ sflag: anUnsignedInteger
+ ^self unsignedLongAt: 589 put: anUnsignedInteger!

Item was removed:
- ----- Method: GdbARMAlien64>>sp (in category 'accessing') -----
- sp
- ^self unsignedLongAt: 65!

Item was removed:
- ----- Method: GdbARMAlien64>>sp: (in category 'accessing') -----
- sp: anUnsignedInteger
- ^self unsignedLongAt: 65 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>tflag (in category 'accessing') -----
+ tflag
+ ^self unsignedLongAt: 593!

Item was added:
+ ----- Method: GdbARMAlien64>>tflag: (in category 'accessing') -----
+ tflag: anUnsignedInteger
+ ^self unsignedLongAt: 593 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>vflag (in category 'accessing') -----
+ vflag
+ ^self unsignedLongAt: 581!

Item was added:
+ ----- Method: GdbARMAlien64>>vflag: (in category 'accessing') -----
+ vflag: anUnsignedInteger
+ ^self unsignedLongAt: 581 put: anUnsignedInteger!

Item was added:
+ ----- Method: GdbARMAlien64>>zflag (in category 'accessing') -----
+ zflag
+ ^self unsignedLongAt: 573!

Item was added:
+ ----- Method: GdbARMAlien64>>zflag: (in category 'accessing') -----
+ zflag: anUnsignedInteger
+ ^self unsignedLongAt: 573 put: anUnsignedInteger!