1200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung%default { "load":"lw", "shift":"2", "data_offset":"MIRROR_INT_ARRAY_DATA_OFFSET" } 2200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung /* 3200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * Array get, 32 bits or less. vAA <- vBB[vCC]. 4200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * 5200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * Note: using the usual FETCH/and/shift stuff, this fits in exactly 17 6200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * instructions. We use a pair of FETCH_Bs instead. 7200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * 8200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * for: aget, aget-boolean, aget-byte, aget-char, aget-short 9200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * 10200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * NOTE: assumes data offset for arrays is the same for all non-wide types. 11200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung * If this changes, specialize. 12200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung */ 13200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung /* op vAA, vBB, vCC */ 14200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung FETCH_B(a2, 1, 0) # a2 <- BB 15200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung GET_OPA(rOBJ) # rOBJ <- AA 16200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung FETCH_B(a3, 1, 1) # a3 <- CC 17200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung GET_VREG(a0, a2) # a0 <- vBB (array object) 18200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung GET_VREG(a1, a3) # a1 <- vCC (requested index) 19200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung # null array object? 20200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung beqz a0, common_errNullObject # yes, bail 21200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung LOAD_base_offMirrorArray_length(a3, a0) # a3 <- arrayObj->length 22200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung .if $shift 23200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung EASN(a0, a0, a1, $shift) # a0 <- arrayObj + index*width 24200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung .else 25200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung addu a0, a0, a1 26200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung .endif 27200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung # a1 >= a3; compare unsigned index 28200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung bgeu a1, a3, common_errArrayIndex # index >= length, bail 29200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung FETCH_ADVANCE_INST(2) # advance rPC, load rINST 30200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung $load a2, $data_offset(a0) # a2 <- vBB[vCC] 31200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung GET_INST_OPCODE(t0) # extract opcode from rINST 32200f040af3e4fe9e178cb63c90860d58d90ef665Douglas Leung SET_VREG_GOTO(a2, rOBJ, t0) # vAA <- a2 33