Lines Matching refs:word0
74 if (!scale || (i = 2*P + 1 - ((word0(x) & Exp_mask) >> Exp_shift)) <= 0)
76 word0(&u) = Exp_1 + (i << Exp_shift);
308 word0(&rv) = 0x7ff00000;
320 word0(&rv) = 0x7ff00000 | bits[1];
325 word0(&rv) = NAN_WORD0;
403 word0(&rv) -= P*Exp_msk1;
405 if ((word0(&rv) & Exp_mask)
408 word0(&rv) += P*Exp_msk1;
466 word0(&rv) = Big0;
470 word0(&rv) = Exp_mask;
474 word0(&rv) = Exp_mask;
483 word0(&rv) = Big0;
504 word0(&rv) -= P*Exp_msk1;
506 if ((z = word0(&rv) & Exp_mask)
512 word0(&rv) = Big0;
516 word0(&rv) += P*Exp_msk1;
532 if (scale && (j = 2*P + 1 - ((word0(&rv) & Exp_mask)
538 word0(&rv) = (P+2)*Exp_msk1;
540 word0(&rv) &= 0xffffffff << (j-32);
562 word0(&rv) = Tiny0;
708 && !(word0(&rv) & Frac_mask)) {
709 y = word0(&rv) & Exp_mask;
725 if (scale && (y = word0(&rv) & Exp_mask)
727 word0(&adj) += (2*P+1)*Exp_msk1 - y;
730 if ((word0(&rv) & Exp_mask) <=
732 word0(&rv) += P*Exp_msk1;
734 word0(&rv) -= P*Exp_msk1;
756 if (scale && (y = word0(&rv) & Exp_mask) <= 2*P*Exp_msk1)
757 word0(&adj) += (2*P+1)*Exp_msk1 - y;
760 if ((word0(&rv) & Exp_mask) <= P*Exp_msk1) {
761 word0(&rv) += P*Exp_msk1;
767 word0(&rv) -= P*Exp_msk1;
774 if (word0(&rv) == Big0 && word1(&rv) == Big1)
788 if (dsign || word1(&rv) || word0(&rv) & Bndry_mask
791 || (word0(&rv) & Exp_mask) <= (2*P+1)*Exp_msk1
793 || (word0(&rv) & Exp_mask) <= Exp_msk1
820 if ((word0(&rv) & Bndry_mask1) == Bndry_mask1
823 (scale && (y = word0(&rv) & Exp_mask) <= 2*P*Exp_msk1)
828 if (word0(&rv) == Big0 && word1(&rv) == Big1)
830 word0(&rv) = (word0(&rv) & Exp_mask)
843 else if (!(word0(&rv) & Bndry_mask) && !word1(&rv)) {
847 L = word0(&rv) & Exp_mask;
862 L = word0(&rv) & Exp_mask;
873 L = (word0(&rv) & Exp_mask) - Exp_msk1;
875 word0(&rv) = L | Bndry_mask1;
886 if (!(word0(&rv) & Lsb1))
923 else if (word1(&rv) || word0(&rv) & Bndry_mask) {
925 if (word1(&rv) == Tiny1 && !word0(&rv))
959 y = word0(&rv) & Exp_mask;
965 word0(&rv) -= P*Exp_msk1;
968 if ((word0(&rv) & Exp_mask) >=
970 if (word0(&rv0) == Big0 && word1(&rv0) == Big1)
972 word0(&rv) = Big0;
977 word0(&rv) += P*Exp_msk1;
988 word0(&aadj1) += (2*P+1)*Exp_msk1 - y;
994 if ((word0(&rv) & Exp_mask) <= P*Exp_msk1) {
996 word0(&rv) += P*Exp_msk1;
1000 if ((word0(&rv) & Exp_mask) < P*Exp_msk1)
1002 if ((word0(&rv) & Exp_mask) <= P*Exp_msk1)
1005 if (word0(&rv0) == Tiny0
1008 word0(&rv) = Tiny0;
1013 word0(&rv) -= P*Exp_msk1;
1037 z = word0(&rv) & Exp_mask;
1047 if (dsign || word1(&rv) || word0(&rv) & Bndry_mask) {
1069 word0(&rv0) = Exp_1 + (70 << Exp_shift);
1079 word0(&rv0) = Exp_1 - 2*P*Exp_msk1;
1085 if (!(word0(&rv) & Exp_mask))
1087 if (word0(&rv) == 0 && word1(&rv) == 0)
1094 if (inexact && !(word0(&rv) & Exp_mask)) {