%default { "store":"sw", "shift":"2", "data_offset":"MIRROR_INT_ARRAY_DATA_OFFSET" } /* * Array put, 32 bits or less. vBB[vCC] <- vAA. * * for: aput, aput-boolean, aput-byte, aput-char, aput-short * * NOTE: this assumes data offset for arrays is the same for all non-wide types. * If this changes, specialize. */ /* op vAA, vBB, vCC */ lbu a2, 2(rPC) # a2 <- BB lbu a3, 3(rPC) # a3 <- CC srl a4, rINST, 8 # a4 <- AA GET_VREG_U a0, a2 # a0 <- vBB (array object) GET_VREG a1, a3 # a1 <- vCC (requested index) beqz a0, common_errNullObject # bail if null array object lw a3, MIRROR_ARRAY_LENGTH_OFFSET(a0) # a3 <- arrayObj->length .if $shift # [d]lsa does not support shift count of 0. dlsa a0, a1, a0, $shift # a0 <- arrayObj + index*width .else daddu a0, a1, a0 # a0 <- arrayObj + index*width .endif bgeu a1, a3, common_errArrayIndex # unsigned compare: index >= length, bail FETCH_ADVANCE_INST 2 # advance rPC, load rINST GET_VREG a2, a4 # a2 <- vAA GET_INST_OPCODE v0 # extract opcode from rINST $store a2, $data_offset(a0) # vBB[vCC] <- a2 GOTO_OPCODE v0 # jump to next instruction