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