Home | History | Annotate | Download | only in mips
      1     /*
      2      * Long integer shift.  This is different from the generic 32/64-bit
      3      * binary operations because vAA/vBB are 64-bit but vCC (the shift
      4      * distance) is 32-bit.  Also, Dalvik requires us to ignore all but the low
      5      * 6 bits.
      6      */
      7     /* shl-long vAA:vBB(rARG1:rARG0), vCC(a2) - result in (rRESULT1:rRESULT0) */
      8     sll     rRESULT0, rARG0, a2		#  rlo<- alo << (shift&31)
      9     not     rRESULT1, a2		#  rhi<- 31-shift  (shift is 5b)
     10     srl     rARG0, 1
     11     srl     rARG0, rRESULT1		#  alo<- alo >> (32-(shift&31))
     12     sll     rRESULT1, rARG1, a2		#  rhi<- ahi << (shift&31)
     13     or      rRESULT1, rARG0		#  rhi<- rhi | alo
     14     andi    a2, 0x20			#  shift< shift & 0x20
     15     movn    rRESULT1, rRESULT0, a2	#  rhi<- rlo (if shift&0x20)
     16     movn    rRESULT0, zero, a2		#  rlo<- 0  (if shift&0x20)
     17     RETURN
     18