• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1%verify "executed"
2%verify "null object"
3    /* For: iput-quick */
4    /* op vA, vB, offset@CCCC */
5    mov     r2, rINST, lsr #12          @ r2<- B
6    GET_VREG(r3, r2)                    @ r3<- fp[B], the object pointer
7    FETCH(r1, 1)                        @ r1<- field byte offset
8    cmp     r3, #0                      @ check object for null
9    mov     r2, rINST, lsr #8           @ r2<- A(+)
10    beq     common_errNullObject        @ object was null
11    and     r2, r2, #15
12    GET_VREG(r0, r2)                    @ r0<- fp[A]
13    FETCH_ADVANCE_INST(2)               @ advance rPC, load rINST
14    str     r0, [r3, r1]                @ obj.field (always 32 bits)<- r0
15    GET_INST_OPCODE(ip)                 @ extract opcode from rINST
16    GOTO_OPCODE(ip)                     @ jump to next instruction
17