1200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    /*
2200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung     * Array put, 64 bits.  vBB[vCC] <- vAA.
3200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung     *
4200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung     * Arrays of long/double are 64-bit aligned, so it's okay to use STRD.
5200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung     */
6200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    /* aput-wide vAA, vBB, vCC */
7200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    FETCH(a0, 1)                           #  a0 <- CCBB
8200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    GET_OPA(t0)                            #  t0 <- AA
9200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    and       a2, a0, 255                  #  a2 <- BB
10200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    srl       a3, a0, 8                    #  a3 <- CC
11200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    GET_VREG(a0, a2)                       #  a0 <- vBB (array object)
12200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    GET_VREG(a1, a3)                       #  a1 <- vCC (requested index)
13200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    # null array object?
14200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    beqz      a0, common_errNullObject     #  yes, bail
15200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    LOAD_base_offMirrorArray_length(a3, a0) #  a3 <- arrayObj->length
16200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    EAS3(a0, a0, a1)                       #  a0 <- arrayObj + index*width
17200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    EAS2(rOBJ, rFP, t0)                    #  rOBJ <- &fp[AA]
18200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    # compare unsigned index, length
19200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    bgeu      a1, a3, common_errArrayIndex #  index >= length, bail
20200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung
21200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    FETCH_ADVANCE_INST(2)                  #  advance rPC, load rINST
22200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    LOAD64(a2, a3, rOBJ)                   #  a2/a3 <- vAA/vAA+1
23200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    GET_INST_OPCODE(t0)                    #  extract opcode from rINST
24200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    STORE64_off(a2, a3, a0, MIRROR_WIDE_ARRAY_DATA_OFFSET) #  a2/a3 <- vBB[vCC]
25200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung    GOTO_OPCODE(t0)                        #  jump to next instruction
26