Lines Matching refs:SIGN
451 set q_sn_bit, 0x7 # sign bit of quotient byte
522 set sign_bit, 0x7 # sign bit
1450 andi.w &0x7fff,%d0 # strip sign
1480 sign
1527 andi.w &0x7fff,%d0 # strip sign
2321 andi.w &0x7fff,%d0 # strip sign
2338 andi.w &0x7fff,%d0 # strip sign
2345 mov.w %d0,FP_SRC_EX(%a6) # insert exponent with cleared sign
2351 tst.b 0x2+FP_SRC(%a6) # is sign set?
2353 bset &15,%d0 # set sign
3165 # through here. we simply need to test the sign of the src
3363 # for byte, word, and long, we simply need to test the sign of the src
3438 mov.l FP_SRC_EX(%a6),%d0 # fetch SNAN sign
3439 andi.l &0x80000000,%d0 # keep sign
3452 mov.l FP_SRC_EX(%a6),%d0 # fetch SNAN sign
3453 andi.l &0x80000000,%d0 # keep sign
3465 mov.l FP_SRC_EX(%a6),%d0 # fetch SNAN sign
3466 andi.l &0x80000000,%d0 # keep sign
4331 ext.l %d0 # sign extend displacement
5149 and.l &0x7FFFFFFF,%d1 # strip sign
5211 # ...LEAST SIG. BIT OF D0 IN SIGN POSITION
5265 # ...LEAST SIG. BIT OF D0 IN SIGN POSITION
5602 ftest.x %fp0 # test sign of argument
5637 #--CREATE 2**(-L) * (2/PI), SIGN(INARG)*2**(63),
5653 #--(SIGN(INARG)*2**63 + FP2) - SIGN(INARG)*2**63 WILL GIVE
5658 or.l &0x5F000000,%d2 # d2 = SIGN(INARG)*2**63 IN SGL
6033 ftest.x %fp0 # test sign of argument
6068 #--CREATE 2**(-L) * (2/PI), SIGN(INARG)*2**(63),
6084 #--(SIGN(INARG)*2**63 + FP2) - SIGN(INARG)*2**63 WILL GIVE
6089 or.l &0x5F000000,%d2 # d2 = SIGN(INARG)*2**63 IN SGL
6188 # Arctan(X) = sign(X)*Pi/2 + arctan(X'). Exit. #
6423 mov.l X(%a6),%d1 # LOAD SIGN AND EXPO. AGAIN
6424 and.l &0x80000000,%d1 # SIGN(F)
6425 or.l %d1,ATANF(%a6) # ATANF IS NOW SIGN(F)*ATAN(|F|)
6520 #--IF |X| > 2^(100), RETURN SIGN(X)*(PI/2 - TINY). OTHERWISE,
6521 #--RETURN SIGN(X)*PI/2 + ATAN(-1/X).
6580 #--RETURN SIGN(X)*(PIBY2 - TINY) = SIGN(X)*PIBY2 - SIGN(X)*TINY
6630 # 4. (|X| = 1) sgn := sign(X), return asin(X) := sgn * Pi/2. Exit.#
6683 and.l &0x80000000,%d1 # SIGN BIT OF X
6685 mov.l %d1,-(%sp) # push SIGN(X) IN SGL-FMT
6821 # Step 2. Return ans := ans + sign(X)*2^(-126). Exit. #
6837 # are the sign and biased exponent field of |X|; the #
6979 # X's sign. "Huge" and "Tiny" are respectively large/tiny #
7370 ori.l &0x00800000,(%sp) # sign(X)*2^(-126)
7633 bclr &0xf,%d0 # clear the sign bit
7709 # cosh(X) = sign(X) * exp(|X|)/2. #
7720 # the appropriate sign. Huge is the largest finite number #
7816 # y = |X|, sgn = sign(X), and z = expm1(Y), #
7823 # sinh(X) = sign(X) * exp(|X|)/2. #
7827 # sgn := sign(X) #
7834 # sign(X)*Huge*Huge to generate overflow and an infinity with #
7835 # the appropriate sign. Huge is the largest finite number in #
7852 #--Y = |X|, Z = EXPM1(Y), SINH(X) = SIGN(X)*(1/2)*( Z + Z/(1+Z) )
7934 # sgn := sign(X), y := 2|X|, z := expm1(Y), and #
7944 # sgn := sign(X), y := 2|X|, z := exp(Y), #
7950 # sgn := sign(X), Tiny := 2**(-126), #
7980 #--Y = 2|X|, Z = EXPM1(Y), TANH(X) = SIGN(X) * Z / (Z+2).
8016 #--TANH(X) = 1 - (2/[EXP(2X)+1]). LET Y = 2|X|, SGN = SIGN(X),
8038 eor.l &0xC0000000,%d1 # -SIGN(X)*2
8039 fmov.s %d1,%fp1 # -SIGN(X)*2 IN SGL FMT
8040 fdiv.x %fp0,%fp1 # -SIGN(X)2 / [EXP(Y)+1 ]
8064 eor.l &0x80800000,%d1 # -SIGN(X)*EPS
8695 # sgn := sign(X) #
8703 # 4. (|X| = 1) Generate infinity with an appropriate sign and #
8705 # sgn := sign(X) #
8723 #--Y = |X|, Z = 2Y/(1-Y), ATANH(X) = SIGN(X) * (1/2) * LOG1P(Z).
8733 or.l &0x3F000000,%d1 # SIGN(X)*HALF
9485 clr.w LOCAL_SGN(%a0) # sign always positive
9586 set SIGN, L_SCR1
9593 smi.b SIGN(%a6) # use SIGN to hold dst sign
9594 andi.l &0x00007fff,%d1 # strip sign from dst exp
9597 andi.w &0x7fff,%d0 # clr src sign bit
9680 # Source is outside of 2^14 range. Test the sign and branch
9725 # Step 1. Save and strip signs of X and Y: signX := sign(X), #
9726 # signY := sign(Y), X := |X|, Y := |Y|, #
9800 #..Save sign of X and Y
9852 mov.w %d1,SignQ(%a6) # sign(Q) obtained
10041 #..Get sign of X
10050 mov.w SignQ(%a6),%d6 # D6 is sign(Q)
10054 or.l %d6,%d3 # sign and bits of Q
10120 # Sets N bit according to sign of source operand. #
10228 andi.w &0x8000,FP_SCR0_EX(%a6) # keep old sign
10240 # with the sign of this result being the same as that #
10242 # - t_unfl2() is provided to force the result sign to #
10274 # with the sign of this result being the same as that #
10276 # - t_ovfl2() is provided to force the result sign to #
10327 tst.b LOCAL_EX(%a0) # what is the sign?
10341 sf.b %d1 # clear sign flag for positive
10420 # d1.b : sign bit of result ('11111111 = (-) ; '00000000 = (+)) #
10427 andi.w &0x10,%d1 # keep sign bit in 4th spot
10488 # src_zero(): Return signed zero according to sign of src operand. #
10492 tst.b SRC_EX(%a0) # get sign of src operand
10512 # dst_zero(): Return signed zero according to sign of dst operand. #
10516 tst.b DST_EX(%a1) # get sign of dst operand
10521 # src_inf(): Return signed inf according to sign of src operand. #
10525 tst.b SRC_EX(%a0) # get sign of src operand
10547 # dst_inf(): Return signed inf according to sign of dst operand. #
10551 tst.b DST_EX(%a1) # get sign of dst operand
10562 tst.b SRC_EX(%a0) # check sign of source
10573 tst.b SRC_EX(%a0) # check sign of source
10584 tst.b SRC_EX(%a0) # check sign of source
10589 # src_one(): Return signed one according to sign of src operand. #
10593 tst.b SRC_EX(%a0) # check sign of source
10618 # spi_2(): Return signed PI/2 according to sign of src operand. #
10622 tst.b SRC_EX(%a0) # check sign of source
10649 # cosine register and return a ZERO in fp0 w/ the same sign
10655 tst.b SRC_EX(%a0) # test sign
10796 mov.b SRC_EX(%a0),%d1 # get src sign
10797 mov.b DST_EX(%a1),%d0 # get dst sign
10798 eor.b %d0,%d1 # get qbyte sign
10809 mov.b SRC_EX(%a0),%d1 # get src sign
10810 mov.b DST_EX(%a1),%d0 # get dst sign
10811 eor.b %d0,%d1 # get qbyte sign
10962 tst.b DST_EX(%a1) # set ccodes according to QNAN sign
10987 tst.b SRC_EX(%a0) # set ccodes according to QNAN sign
11649 andi.l &0x7fff,%d1 # strip sign
11650 andi.w &0x8000,%d2 # keep old sign
11652 or.w %d2,%d1 # concat old sign,new exp
11695 sne %d1 # set sign param accordingly
11719 andi.l &0x7fff,%d1 # strip sign
11722 andi.w &0x7fff,%d1 # clear sign bit
11723 andi.w &0x8000,%d2 # keep old sign
11724 or.w %d2,%d1 # concat old sign,new exp
11839 andi.l &0x7fff,%d1 # strip sign
11840 andi.w &0x8000,%d2 # keep old sign
11844 or.w %d2,%d1 # concat old sign,new exp
12008 fabs.x %fp0 # clear result sign
12009 fneg.x %fp0 # set result sign
12013 fabs.x %fp0 # clear result sign
12128 mov.w FP_SCR0_EX(%a6),%d1 # fetch old sign,exp
12129 andi.w &0x8000,%d1 # keep old sign
12130 andi.w &0x7fff,%d0 # clear sign position
12131 or.w %d1,%d0 # concat new exo,old sign
12177 andi.l &0x7fff,%d1 # strip sign
12179 andi.w &0x8000,%d2 # keep old sign
12180 or.w %d1,%d2 # concat old sign,new exponent
12237 andi.l &0x7fff,%d1 # strip sign
12239 andi.w &0x8000,%d2 # extract old sign
12242 or.w %d1,%d2 # concat old sign,new exp
12275 sne %d1 # set sign param accordingly
12291 andi.l &0x7fff,%d1 # strip sign
12292 andi.w &0x8000,%d2 # keep old sign
12463 andi.l &0x7fff,%d1 # strip sign
12464 andi.w &0x8000,%d2 # keep old sign
12466 or.w %d2,%d1 # concat old sign,new exp
12499 andi.l &0x7fff,%d0 # strip sign
12514 sne %d1 # set sign param accordingly
12532 andi.l &0x7fff,%d1 # strip sign
12535 andi.w &0x7fff,%d1 # clear sign bit
12536 andi.w &0x8000,%d2 # keep old sign
12537 or.w %d2,%d1 # concat old sign,new exp
12607 andi.l &0x7fff,%d1 # strip sign
12608 andi.w &0x8000,%d2 # keep old sign
12612 or.w %d2,%d1 # concat old sign,new exp
12744 mov.b SRC_EX(%a0),%d0 # result sign is exclusive
12758 # therefore, is an INF w/ the proper sign.
12759 # So, determine the sign and return a new INF (w/ the j-bit cleared).
12778 # an INF w/ the proper sign.
12779 # The 68881/882 returns the destination INF w/ the new sign(if the j-bit of the
12790 fabs.x %fp0 # clear sign bit
12791 fneg.x %fp0 # set sign bit
12826 # emulated by simply setting sign bit. Sgl/dbl operands must be scaled #
12852 # NEGATE SIGN : norms and denorms ONLY!
12866 eori.w &0x8000,%d0 # negate sign
12867 bpl.b fneg_norm_load # sign is positive
12887 eori.w &0x8000,%d0 # negate sign
12908 mov.w FP_SCR0_EX(%a6),%d1 # fetch old sign,exp
12909 andi.w &0x8000,%d1 # keep old sign
12910 andi.w &0x7fff,%d0 # clear sign position
12911 or.w %d1,%d0 # concat old sign, new exponent
12957 andi.l &0x7fff,%d1 # strip sign
12959 andi.w &0x8000,%d2 # keep old sign
12960 or.w %d1,%d2 # concat old sign,new exp
12988 eori.b &0x80,FP_SCR0_EX(%a6) # negate sign
13017 andi.l &0x7fff,%d1 # strip sign
13018 andi.w &0x8000,%d2 # keep old sign
13022 or.w %d2,%d1 # concat new sign,new exp
13055 sne %d1 # set sign param accordingly
13071 andi.l &0x7fff,%d1 # strip sign
13072 andi.w &0x8000,%d2 # keep old sign
13076 or.w %d2,%d1 # concat sign,exp
13142 # to the operand type and sign. #
13284 mov.w SRC_EX(%a0),FP_SCR0_EX(%a6) # copy sign, zero exp
13386 mov.w SRC_EX(%a0),FP_SCR0_EX(%a6) # copy sign, zero exp
13444 # Simply clear sign for extended precision norm. Ext prec denorm #
13507 bclr &15,%d0 # clear sign
13526 mov.w FP_SCR0_EX(%a6),%d1 # fetch old sign,exp
13527 andi.w &0x8000,%d1 # keep old sign
13528 andi.w &0x7fff,%d0 # clear sign position
13529 or.w %d1,%d0 # concat old sign, new exponent
13575 andi.l &0x7fff,%d1 # strip sign
13577 andi.w &0x8000,%d2 # keep old sign
13578 or.w %d1,%d2 # concat old sign,new exp
13632 andi.l &0x7fff,%d1 # strip sign
13633 andi.w &0x8000,%d2 # keep old sign
13637 or.w %d2,%d1 # concat new sign,new exp
13670 sne %d1 # set sign param accordingly
13686 andi.l &0x7fff,%d1 # strip sign
13687 andi.w &0x8000,%d2 # keep old sign
13691 or.w %d2,%d1 # concat sign,exp
13868 # But with a DENORM and a NORM of the same sign, the neg bit is set if the
14020 andi.l &0x7fff,%d1 # strip sign
14021 andi.w &0x8000,%d2 # keep old sign
14023 or.w %d2,%d1 # concat old sign,new exp
14053 sne %d1 # set sign param accordingly
14067 andi.l &0x7fff,%d1 # strip sign
14071 andi.w &0x8000,%d2 # keep old sign
14072 or.w %d2,%d1 # concat old sign,new exp
14144 andi.l &0x7fff,%d1 # strip sign
14145 andi.w &0x8000,%d2 # keep old sign
14149 or.w %d2,%d1 # concat old sign,new exp
14367 andi.l &0x7fff,%d1 # strip sign
14368 andi.w &0x8000,%d2 # keep old sign
14370 or.w %d2,%d1 # concat old sign,new exp
14392 andi.l &0x7fff,%d1 # strip sign
14406 sne %d1 # set sign param accordingly
14420 andi.l &0x7fff,%d1 # strip sign
14421 andi.w &0x8000,%d2 # keep old sign
14425 or.w %d2,%d1 # concat old sign,new exp
14477 andi.l &0x7fff,%d1 # strip sign
14478 andi.w &0x8000,%d2 # keep old sign
14482 or.w %d2,%d1 # concat old sign, new exp
14694 mov.w (%sp),%d2 # fetch new sign, exp
14695 andi.l &0x7fff,%d2 # strip sign
14707 andi.w &0x8000,%d1 # keep sign
14708 or.w %d2,%d1 # concat sign,new exp
14740 sne %d1 # set sign param accordingly
14755 andi.w &0x8000,%d1 # keep sign
14758 or.w %d2,%d1 # concat sign,new exp
14830 andi.l &0x7fff,%d1 # strip sign
14831 andi.w &0x8000,%d2 # keep old sign
14835 or.w %d2,%d1 # concat sign,new exp
15028 # different signs. else, an INF of the same sign is returned
15148 andi.l &0x7fff,%d2 # strip sign
15160 andi.w &0x8000,%d1 # keep sign
15193 sne %d1 # set sign param accordingly
15208 andi.w &0x8000,%d1 # keep sign
15211 or.w %d2,%d1 # concat sign,exp
15283 andi.l &0x7fff,%d1 # strip sign
15284 andi.w &0x8000,%d2 # keep old sign
15428 # the signs are opposite, so, return a ZERO w/ the sign of the dst ZERO
15493 fneg.x %fp0 # invert sign
15494 fbge.w fsub_inf_done # sign is now positive
15638 andi.l &0x7fff,%d1 # strip sign
15640 andi.w &0x8000,%d2 # keep old sign
15641 or.w %d1,%d2 # concat old sign,new exp
15714 andi.l &0x7fff,%d1 # strip sign
15715 andi.w &0x8000,%d2 # keep old sign
15719 or.w %d2,%d1 # concat new sign,new exp
15752 sne %d1 # set sign param accordingly
15768 andi.l &0x7fff,%d1 # strip sign
15769 andi.w &0x8000,%d2 # keep old sign
15773 or.w %d2,%d1 # concat sign,exp
18797 mov.w %d0,%a0 # sign extend displacement
18810 mov.w %d0,%a0 # sign extend displacement
18823 mov.w %d0,%a0 # sign extend displacement
18836 mov.w %d0,%a0 # sign extend displacement
18849 mov.w %d0,%a0 # sign extend displacement
18862 mov.w %d0,%a0 # sign extend displacement
18875 mov.w %d0,%a0 # sign extend displacement
18888 mov.w %d0,%a0 # sign extend displacement
18930 ext.l %d0 # sign extend word index
18938 extb.l %d2 # sign extend displacement
18984 mov.w %d0,%a0 # sign extend displacement
19026 ext.l %d0 # sign extend word index
19034 extb.l %d2 # sign extend displacement
19109 ext.l %d0 # sign extend bd
19140 ext.l %d0 # sign extend od
20007 btst &0x7, (%a0) # see if sign of SNAN is set
20096 btst &0x7, (%a0) # see if sign of SNAN is set
20266 andi.l &0x80000000,%d1 # keep DENORM sign
20312 andi.l &0x80000000,%d1 # keep DENORM sign
20359 andi.l &0x80000000,%d1 # keep DENORM sign
20430 andi.w &0x8000,FP_SCR0_EX(%a6) # keep only old sign
20454 andi.w &0x7fff,%d0 # strip sign
20610 mov.w SRC_EX(%a0),%d1 # fetch current sign
20655 bclr &0x7,FP_SCR0_EX(%a6) # clear sign bit
20656 sne.b 2+FP_SCR0_EX(%a6) # set internal sign bit
20692 andi.w &0x7fff,%d0 # strip sign
20821 mov.w SRC_EX(%a0),%d1 # fetch current sign
20887 tst.b FTEMP_EX(%a0) # test sign
20889 bset &0x1f,%d0 # if negative, set sign
20952 tst.b FTEMP_EX(%a0) # test sign
20954 bset &0x1f,%d0 # if negative, put in sign first
21014 # the question now is whether the exponents sign bit is allowed to be non-zero
22083 # If sign of fp number = 0 (positive), then add 1 to l. #
22086 tst.b FTEMP_SGN(%a0) # check for sign
22100 # If sign of fp number = 1 (negative), then add 1 to l. #
22103 tst.b FTEMP_SGN(%a0) # check for sign
22418 and.w &0x8000, %d0 # save old sign
22497 andi.w &0x7fff, %d0 # strip off sign
22697 # exponent is extended to 16 bits and the sign is stored in the unused #
22741 tst.b FTEMP_SGN(%a0) # is "internal result" sign set?
22744 clr.b FTEMP_SGN(%a0) # clear temp sign
22801 tst.b FTEMP_SGN(%a0) # is "internal result" sign set?
22804 clr.b FTEMP_SGN(%a0) # clear temp sign
22854 # The default overflow result can be determined by the sign of #
22865 andi.w &0x10,%d1 # keep result sign
22874 and.w &0x10, %d1 # keep result sign
22882 # use the rounding mode, precision, and result sign as in index into the
23018 # muls. Set the sign according to SE. Subtract 16 to compensate #
23024 # adds and muls in FP0. Set the sign according to SM. #
23052 # exponent sign is positive, and dividing FP0 by FP1 if #
23093 # 3. Correct for exponent sign.
23136 # 2. Correct for mantissa sign.
23190 # Check the sign of the mant and make the value in fp0 the same sign.
23193 btst &31,(%a0) # test sign of the mantissa
23206 # 1. Branch on the sign of the adjusted exponent.
23242 # routine is necessary. If so, then check the sign of the exponent
23250 btst &30,(%a0) # check sign of exp
23371 # Sign of Mant Sign of Exp Rounding Mode PWRTEN Rounding Mode
23432 # Check the sign of the adjusted exp and make the value in fp0 the
23433 # same sign. If the exp was pos then multiply fp1*fp0;
23443 btst &30,(%a0) # test the sign of the exponent
23477 # d0 = contains the k-factor sign-extended to 32-bits. #
23484 # A1. Set RM and size ext; Set SIGMA = sign of input. #
23518 # sign of ISCALE, used in A9. Fp1 contains #
23568 # A16. Write sign bits to final string. #
23624 # A1. Set RM and size ext. Set SIGMA = sign input;
23632 mov.l (%a0),L_SCR2(%a6) # save exponent for sign check
23644 and.w &0x7fff,%d0 # strip sign of normalized exp
23660 and.w &0x7fff,%d0 # strip sign of normalized exp
23762 tst.l %d7 # branch on sign of k
23771 tst.l %d4 # LEN check: branch on sign of LEN
23787 # in the output before conversion to bcd. LAMBDA is the sign
23791 # of opposite sign in bindec.sa from Coonen).
23794 # FPCR[6:5] LAMBDA SIGN(X) FPCR[6:5]
23834 tst.l %d7 # test sign of k
23846 tst.l %d0 # test sign of ISCALE
23861 tst.l L_SCR2(%a6) # test sign of original x
23957 andi.w &0x7fff,%d3 # clear sign
23968 andi.w &0x8000,(%sp) # keep sign
23970 andi.w &0x7fff,(%a0) # clear sign bit on DENORM again
24073 tst.l L_SCR2(%a6) # test sign of original operand
24323 tst.l %d7 # check sign of the k-factor
24371 # A16. Write sign bits to final string.
24397 tst.l L_SCR2(%a6) # check sign of original mantissa
24401 tst.l %d6 # check sign of ILOG
Indexes created Sat Oct 25 01:09:55 GMT 2025