1 %verify "executed" 2 /* 3 * Array put, 64 bits. vBB[vCC] <- vAA. 4 * 5 * Arrays of long/double are 64-bit aligned, so it's okay to use STRD. 6 */ 7 /* aput-wide vAA, vBB, vCC */ 8 FETCH(a0, 1) # a0 <- CCBB 9 GET_OPA(t0) # t0 <- AA 10 and a2, a0, 255 # a2 <- BB 11 srl a3, a0, 8 # a3 <- CC 12 GET_VREG(a0, a2) # a0 <- vBB (array object) 13 GET_VREG(a1, a3) # a1 <- vCC (requested index) 14 # null array object? 15 beqz a0, common_errNullObject # yes, bail 16 LOAD_base_offArrayObject_length(a3, a0) # a3 <- arrayObj->length 17 EAS3(a0, a0, a1) # a0 <- arrayObj + index*width 18 EAS2(rOBJ, rFP, t0) # rOBJ <- &fp[AA] 19 # compare unsigned index, length 20 bgeu a1, a3, common_errArrayIndex # index >= length, bail 21 22 FETCH_ADVANCE_INST(2) # advance rPC, load rINST 23 LOAD64(a2, a3, rOBJ) # a2/a3 <- vAA/vAA+1 24 GET_INST_OPCODE(t0) # extract opcode from rINST 25 STORE64_off(a2, a3, a0, offArrayObject_contents) # a2/a3 <- vBB[vCC] 26 GOTO_OPCODE(t0) # jump to next instruction 27 28
