ruby-106/ruby/util.c

798 #    define word1(x) (((ULong *)&(x))[0])
801 #    define word1(x) (((ULong *)&(x))[1])
807 #    define word1(x) ((x).L[0])
810 #    define word1(x) ((x).L[1])
1567         word1(a) = 0;
1575             word1(a) = 0;
1580             word1(a) = L >= 31 ? 1 : 1 << 31 - L;
1598 #define d1 word1(d)
1645     word1(d) = d1 >> 16 | d1 << 16;
1669     d1 = word1(d) >> 16 | word1(d) << 16;
1672 #define d1 word1(d)
1937         word1(*rvp) = x[1];
2177                     word1(rv) = 0;
2185                     word1(rv) = NAN_WORD1;
2329                     word1(rv) = Big1;
2333                     word1(rv) = 0;
2337                 word1(rv) = 0;
2346                 word1(rv) = Big1;
2366                 word1(rv) = Big1;
2389                     word1(rv) = 0;
2396                     word1(rv) &= 0xffffffff << j;
2421                 word1(rv) = Tiny1;
2532                     if (!word1(rv)
2608             if (dsign || word1(rv) || word0(rv) & Bndry_mask
2639                         &&  word1(rv) == (
2652                     word1(rv) = 0;
2659             else if (!(word0(rv) & Bndry_mask) && !word1(rv)) {
2692                 word1(rv) = 0xffffffff;
2700             if (!(word1(rv) & LSB))
2722             else if (word1(rv) || word0(rv) & Bndry_mask) {
2724                 if (word1(rv) == Tiny1 && !word0(rv))
2769                 if (word0(rv0) == Big0 && word1(rv0) == Big1)
2772                 word1(rv) = Big1;
2804                     if (word0(rv0) == Tiny0 && word1(rv0) == Tiny1)
2807                     word1(rv) = Tiny1;
2845             if (dsign || word1(rv) || word0(rv) & Bndry_mask) {
2863             word1(rv0) = 0;
2873         word1(rv0) = 0;
2877         if (word0(rv) == 0 && word1(rv) == 0)
3175         if (!word1(d) && !(word0(d) & 0xfffff))
3251         x = i > 32  ? word0(d) << (64 - i) | word1(d) >> (i - 32)
3252 	    : word1(d) << (32 - i);
3539         if (!word1(d) && !(word0(d) & Bndry_mask)
3627             if (j1 == 0 && mode != 1 && !(word1(d) & 1)
3646                 && !(word1(d) & 1)
3750             word1(d) = 0;
3815 #define dmanl_get(u) ((uint32_t)word1(u))