Lines Matching refs:D2
5302 mov.l %d2,-(%sp)
5303 mov.l %d1,%d2
5304 ror.l &1,%d2
5305 and.l &0x80000000,%d2
5306 eor.l %d1,%d2
5307 and.l &0x80000000,%d2
5313 eor.l %d2,RPRIME(%a6)
5314 mov.l (%sp)+,%d2
5476 mov.l %d2,-(%sp) # save d2
5534 mov.l &0x00003FFE,%d2 # BIASED EXP OF 2/PI
5535 sub.l %d1,%d2 # BIASED EXP OF 2**(-L)*(2/PI)
5539 mov.w %d2,FP_SCR0_EX(%a6) # FP_SCR0 = 2**(-L)*(2/PI)
5549 mov.l %a1,%d2
5550 swap %d2
5551 and.l &0x80000000,%d2
5552 or.l &0x5F000000,%d2 # d2 = SIGN(INARG)*2**63 IN SGL
5553 mov.l %d2,TWOTO63(%a6)
5559 mov.l %d1,%d2 # d2 = L
5561 add.l &0x00003FFF,%d2 # BIASED EXP OF 2**L * (PI/2)
5562 mov.w %d2,FP_SCR0_EX(%a6)
5606 mov.l (%sp)+,%d2 # restore d2
5907 mov.l %d2,-(%sp) # save d2
5965 mov.l &0x00003FFE,%d2 # BIASED EXP OF 2/PI
5966 sub.l %d1,%d2 # BIASED EXP OF 2**(-L)*(2/PI)
5970 mov.w %d2,FP_SCR0_EX(%a6) # FP_SCR0 = 2**(-L)*(2/PI)
5980 mov.l %a1,%d2
5981 swap %d2
5982 and.l &0x80000000,%d2
5983 or.l &0x5F000000,%d2 # d2 = SIGN(INARG)*2**63 IN SGL
5984 mov.l %d2,TWOTO63(%a6)
5990 mov.l %d1,%d2 # d2 = L
5992 add.l &0x00003FFF,%d2 # BIASED EXP OF 2**L * (PI/2)
5993 mov.w %d2,FP_SCR0_EX(%a6)
6037 mov.l (%sp)+,%d2 # restore d2
6304 mov.l %d2,-(%sp) # SAVE d2 TEMPORARILY
6305 mov.l %d1,%d2 # THE EXP AND 16 BITS OF X
6307 and.l &0x7FFF0000,%d2 # EXPONENT OF F
6308 sub.l &0x3FFB0000,%d2 # K+4
6309 asr.l &1,%d2
6310 add.l %d2,%d1 # THE 7 BITS IDENTIFYING F
6320 mov.l (%sp)+,%d2 # RESTORE d2
8398 movm.l &0x3f00,-(%sp) # save some registers {d2-d7}
8402 clr.l %d2 # D2 used for holding K
8410 mov.l &32,%d2
8414 add.l %d6,%d2 # (D3,D4,D5) is normalized
8419 neg.l %d2
8420 mov.l %d2,ADJK(%a6)
8422 movm.l (%sp)+,&0xfc # restore registers {d2-d7}
8429 mov.l %d6,%d2 # get k
8441 neg.l %d2
8442 mov.l %d2,ADJK(%a6)
8444 movm.l (%sp)+,&0xfc # restore registers {d2-d7}
9017 mov.l %d2,-(%sp)
9021 mov.l %d1,%d2
9025 asr.l &6,%d2 # d2 IS L, N = 64L + J
9026 mov.l %d2,%d1
9028 sub.l %d1,%d2 # d2 IS M', N = 64(M+M') + J
9029 add.l &0x3FFF,%d2
9114 mov.l %d2,-(%sp)
9118 mov.l %d1,%d2
9122 asr.l &6,%d2 # d2 IS L, N = 64L + J
9123 mov.l %d2,%d1
9125 sub.l %d1,%d2 # d2 IS M', N = 64(M+M') + J
9126 add.l &0x3FFF,%d2
9194 mov.w %d2,ADJFACT(%a6) # INSERT EXPONENT
9195 mov.l (%sp)+,%d2
9496 mov.l DST_LO(%a1),%d2 # (D0,D1,D2) is |X|
9504 mov.l %d2,%d1
9505 clr.l %d2
9510 sub.l %d6,%d0 # (D0,D1,D2) is normalized
9519 mov.l %d2,%d7 # a copy of D2
9520 lsl.l %d6,%d2
9524 or.l %d7,%d1 # (D0,D1,D2) normalized
9529 add.l &0x00003FFE,%d0 # (D0,D1,D2) normalized
9542 #..(Carry,D1,D2) is R
9558 #..At this point carry = 0, R = (D1,D2), Y = (D4,D5)
9561 cmp.l %d2,%d5 # compare lo(R) and lo(Y)
9572 #..If Carry is set, then Y < (Carry,D1,D2) < 2Y. Otherwise, Carry = 0
9573 #..and Y < (D1,D2) < 2Y. Either way, perform R - Y
9574 sub.l %d5,%d2 # lo(R) - lo(Y)
9585 add.l %d2,%d2 # lo(R) = 2lo(R)
9590 #..At this point, R=(Carry,D1,D2) = 2^(k-L)X - QY, j+k=L, j >= 0, R < 2Y.
9595 #..k = L, j = 0, Carry = 0, R = (D1,D2) = X - QY, R < Y.
9603 mov.l %d2,%d1
9604 clr.l %d2
9609 sub.l %d6,%d0 # (D0,D1,D2) is normalized
9619 mov.l %d2,%d7 # a copy of D2
9620 lsl.l %d6,%d2
9624 or.l %d7,%d1 # (D0,D1,D2) normalized
9633 mov.l %d2,R_Lo(%a6)
9643 mov.l %d2,R_Lo(%a6)
9668 cmp.l %d2,%d5
9705 movm.l (%sp)+,&0xfc # {%d2-%d7}
10846 mov.l %d2, -(%sp) # create some temp regs
10852 bfffo %d0{&0:&32}, %d2 # how many places to shift?
10856 lsl.l %d2, %d0 # left shift hi(man)
10857 bfextu %d1{&0:%d2}, %d3 # extract lo bits
10860 lsl.l %d2, %d1 # create lo(man)
10865 mov.l %d2, %d0 # return shift amount
10868 mov.l (%sp)+, %d2
10873 bfffo %d1{&0:&32}, %d2 # how many places to shift?
10874 lsl.l %d2, %d1 # shift lo(man)
10875 add.l &32, %d2 # add 32 to shft amount
10880 mov.l %d2, %d0 # return shift amount
10883 mov.l (%sp)+, %d2
Indexes created Sat Oct 25 16:10:12 GMT 2025