Lines Matching refs:word0
76 if (!scale || (i = 2*P + 1 - ((word0(x) & Exp_mask) >> Exp_shift)) <= 0)
78 word0(&u) = Exp_1 + (i << Exp_shift);
308 word0(&rv) = 0x7ff00000;
320 word0(&rv) = 0x7ff80000 | bits[1];
325 word0(&rv) = NAN_WORD0;
404 word0(&rv) -= P*Exp_msk1;
406 if ((word0(&rv) & Exp_mask)
409 word0(&rv) += P*Exp_msk1;
467 word0(&rv) = Big0;
471 word0(&rv) = Exp_mask;
475 word0(&rv) = Exp_mask;
484 word0(&rv) = Big0;
505 word0(&rv) -= P*Exp_msk1;
507 if ((z = word0(&rv) & Exp_mask)
513 word0(&rv) = Big0;
517 word0(&rv) += P*Exp_msk1;
533 if (scale && (j = 2*P + 1 - ((word0(&rv) & Exp_mask)
539 word0(&rv) = (P+2)*Exp_msk1;
541 word0(&rv) &= 0xffffffff << (j-32);
563 word0(&rv) = Tiny0;
683 && !(word0(&rv) & Frac_mask)) {
684 y = word0(&rv) & Exp_mask;
698 if (scale && (y = word0(&rv) & Exp_mask)
700 word0(&adj) += (2*P+1)*Exp_msk1 - y;
703 if ((word0(&rv) & Exp_mask) <=
705 word0(&rv) += P*Exp_msk1;
707 word0(&rv) -= P*Exp_msk1;
729 if (scale && (y = word0(&rv) & Exp_mask) <= 2*P*Exp_msk1)
730 word0(&adj) += (2*P+1)*Exp_msk1 - y;
733 if ((word0(&rv) & Exp_mask) <= P*Exp_msk1) {
734 word0(&rv) += P*Exp_msk1;
740 word0(&rv) -= P*Exp_msk1;
747 if (word0(&rv) == Big0 && word1(&rv) == Big1)
761 if (dsign || word1(&rv) || word0(&rv) & Bndry_mask
764 || (word0(&rv) & Exp_mask) <= (2*P+1)*Exp_msk1
766 || (word0(&rv) & Exp_mask) <= Exp_msk1
791 if ((word0(&rv) & Bndry_mask1) == Bndry_mask1
794 (scale && (y = word0(&rv) & Exp_mask) <= 2*P*Exp_msk1)
799 if (word0(&rv) == Big0 && word1(&rv) == Big1)
801 word0(&rv) = (word0(&rv) & Exp_mask)
814 else if (!(word0(&rv) & Bndry_mask) && !word1(&rv)) {
818 L = word0(&rv) & Exp_mask;
833 L = word0(&rv) & Exp_mask;
844 L = (word0(&rv) & Exp_mask) - Exp_msk1;
846 word0(&rv) = L | Bndry_mask1;
857 if (!(word0(&rv) & Lsb1))
894 else if (word1(&rv) || word0(&rv) & Bndry_mask) {
896 if (word1(&rv) == Tiny1 && !word0(&rv))
930 y = word0(&rv) & Exp_mask;
936 word0(&rv) -= P*Exp_msk1;
939 if ((word0(&rv) & Exp_mask) >=
941 if (word0(&rv0) == Big0 && word1(&rv0) == Big1)
943 word0(&rv) = Big0;
948 word0(&rv) += P*Exp_msk1;
959 word0(&aadj1) += (2*P+1)*Exp_msk1 - y;
965 if ((word0(&rv) & Exp_mask) <= P*Exp_msk1) {
967 word0(&rv) += P*Exp_msk1;
971 if ((word0(&rv) & Exp_mask) < P*Exp_msk1)
973 if ((word0(&rv) & Exp_mask) <= P*Exp_msk1)
976 if (word0(&rv0) == Tiny0
979 word0(&rv) = Tiny0;
984 word0(&rv) -= P*Exp_msk1;
1008 z = word0(&rv) & Exp_mask;
1018 if (dsign || word1(&rv) || word0(&rv) & Bndry_mask) {
1040 word0(&rv0) = Exp_1 + (70 << Exp_shift);
1050 word0(&rv0) = Exp_1 - 2*P*Exp_msk1;
1056 if (!(word0(&rv) & Exp_mask))
1058 if (word0(&rv) == 0 && word1(&rv) == 0)
1065 if (inexact && !(word0(&rv) & Exp_mask)) {