blob: 8ce6058ce2946cfe8fe3689f3c5591e1cbdbf935 [file] [log] [blame]
Douglas Leung200f0402016-02-25 20:05:47 -08001 /*
2 * Long integer shift, 2addr version. vA is 64-bit value/result, vB is
3 * 32-bit shift distance.
4 */
5 /* shl-long/2addr vA, vB */
6 GET_OPA4(rOBJ) # rOBJ <- A+
7 GET_OPB(a3) # a3 <- B
8 GET_VREG(a2, a3) # a2 <- vB
9 EAS2(t2, rFP, rOBJ) # t2 <- &fp[A]
10 LOAD64(a0, a1, t2) # a0/a1 <- vAA/vAA+1
11
12 FETCH_ADVANCE_INST(1) # advance rPC, load rINST
13 GET_INST_OPCODE(t0) # extract opcode from rINST
14
15 andi v1, a2, 0x20 # shift< shift & 0x20
16 sll v0, a0, a2 # rlo<- alo << (shift&31)
17 bnez v1, .L${opcode}_finish
18 not v1, a2 # rhi<- 31-shift (shift is 5b)
19 srl a0, 1
20 srl a0, v1 # alo<- alo >> (32-(shift&31))
21 sll v1, a1, a2 # rhi<- ahi << (shift&31)
22 or v1, a0 # rhi<- rhi | alo
23 SET_VREG64_GOTO(v0, v1, rOBJ, t0) # vAA/vAA+1 <- a0/a1
24%break
25
26.L${opcode}_finish:
27 SET_VREG64_GOTO(zero, v0, rOBJ, t0) # vAA/vAA+1 <- rlo/rhi