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