1%verify "executed"
2%verify "null object"
3    /* iput-wide-quick vA, vB, offset@CCCC */
4    mov     r1, rINST, lsr #12          @ r1<- B
5    ubfx    r0, rINST, #8, #4           @ r0<- A
6    GET_VREG(r2, r1)                    @ r2<- fp[B], the object pointer
7    add     r3, rFP, r0, lsl #2         @ r3<- &fp[A]
8    cmp     r2, #0                      @ check object for null
9    ldmia   r3, {r0-r1}                 @ r0/r1<- fp[A]
10    beq     common_errNullObject        @ object was null
11    FETCH(r3, 1)                        @ r3<- field byte offset
12    FETCH_ADVANCE_INST(2)               @ advance rPC, load rINST
13    strd    r0, [r2, r3]                @ obj.field (64 bits, aligned)<- r0/r1
14    GET_INST_OPCODE(ip)                 @ extract opcode from rINST
15    GOTO_OPCODE(ip)                     @ jump to next instruction
16