Lines Matching defs:word0
222 #define word0(x) ((x).ul[1])
225 #define word0(x) ((x).ul[0])
275 #define Infinite(x) (word0(x) == 0x7ff00000) /* sufficient test for here */
1278 L = (word0(x) & Exp_mask) - (P-1)*Exp_msk1;
1285 word0(a) = L;
1292 word0(a) = 0x80000 >> L;
1296 word0(a) = 0;
1319 #define d0 word0(d)
1369 word0(d) = d0 >> 16 | d0 << 16;
1396 d0 = word0(d) >> 16 | word0(d) << 16;
1399 #define d0 word0(d)
1493 *bits = 4*P + 8 - k - hi0bits(word0(d) & Frac_mask);
1537 word0(da) += (k >> 2)*Exp_msk1;
1543 word0(db) += (k >> 2)*Exp_msk1;
1549 word0(da) += k*Exp_msk1;
1552 word0(db) += k*Exp_msk1;
1647 word0(rv) = NAN_WORD0;
1831 word0(rv) -= P*Exp_msk1;
1834 if ((word0(rv) & Exp_mask)
1837 word0(rv) += P*Exp_msk1;
1875 word0(rv) -= P*Exp_msk1;
1877 if ((z = word0(rv) & Exp_mask)
1883 word0(rv) = Big0;
1887 word0(rv) += P*Exp_msk1;
1917 word0(rv) = Tiny0;
1996 if (dsign || word1(rv) || word0(rv) & Bndry_mask)
2006 if ((word0(rv) & Bndry_mask1) == Bndry_mask1
2009 word0(rv) = (word0(rv) & Exp_mask)
2019 else if (!(word0(rv) & Bndry_mask) && !word1(rv)) {
2023 L = word0(rv) & Exp_mask;
2032 L = (word0(rv) & Exp_mask) - Exp_msk1;
2034 word0(rv) = L | Bndry_mask1;
2062 else if (word1(rv) || word0(rv) & Bndry_mask) {
2064 if (word1(rv) == Tiny1 && !word0(rv))
2098 y = word0(rv) & Exp_mask;
2104 word0(rv) -= P*Exp_msk1;
2107 if ((word0(rv) & Exp_mask) >=
2109 if (word0(rv0) == Big0 && word1(rv0) == Big1)
2111 word0(rv) = Big0;
2116 word0(rv) += P*Exp_msk1;
2120 if ((word0(rv) & Exp_mask) <= P*Exp_msk1) {
2122 word0(rv) += P*Exp_msk1;
2126 if ((word0(rv) & Exp_mask) < P*Exp_msk1)
2128 if ((word0(rv) & Exp_mask) <= P*Exp_msk1)
2131 if (word0(rv0) == Tiny0
2134 word0(rv) = Tiny0;
2139 word0(rv) -= P*Exp_msk1;
2162 z = word0(rv) & Exp_mask;
2168 if (dsign || word1(rv) || word0(rv) & Bndry_mask) {
2417 if (word0(d) & Sign_bit) {
2420 word0(d) &= ~Sign_bit; /* clear sign bit */
2427 if ((word0(d) & Exp_mask) == Exp_mask)
2429 if (word0(d) == 0x8000)
2436 !word1(d) && !(word0(d) & 0xfffff) ? "Infinity" :
2470 i = (int)(word0(d) >> Exp_shift1 & (Exp_mask>>Exp_shift1));
2472 if ((i = (int)(word0(d) >> Exp_shift1 & (Exp_mask>>Exp_shift1))) != 0) {
2475 word0(d2) &= Frac_mask1;
2476 word0(d2) |= Exp_11;
2478 if (j = 11 - hi0bits(word0(d2) & Frac_mask))
2516 x = i > 32 ? word0(d) << (64 - i) | word1(d) >> (i - 32)
2519 word0(d2) -= 31*Exp_msk1; /* adjust exponent */
2645 word0(eps) -= (P-1)*Exp_msk1;
2806 if (!word1(d) && !(word0(d) & Bndry_mask)
2808 && word0(d) & Exp_mask
