gonzui

t2ex

bsd_source/lib/libc/src_bsd/stdlib/gdtoa.c - 31.0KB - 829 lines

73:         b->wds = i + 1;
74:         *bbits = i*ULbits + 32 - hi0bits(b->x[i]);
75:  ret:
210: #ifdef IBM
211:         if ( (j = 11 - hi0bits(word0(&d) & Frac_mask)) !=0)
212:                 dval(&d) /= 1 << j;
343: #ifdef IBM
344:                 if ( (j = 11 - hi0bits(word0(&d) & Frac_mask)) !=0)
345:                         dval(&d) /= 1 << j;
597:          */
598:         i = ((s5 ? hi0bits(S->x[S->wds-1]) : ULbits - 1) - s2 - 4) & kmask;
599:         m2 += i;