NBITS
#define NDEC (NBITS*8/27)
while( ((b[NE-1] & 0x7fff) - (t[NE-1] & 0x7fff)) < NBITS );
rndprc = NBITS;
rndprc = NBITS;
n = NBITS/8; /* Number of terms to do in the continued fraction */
if( j > NBITS )
if( (j > NBITS) && (exp < 32767L) )
if( exp > (long )(-NBITS-1) )
case NBITS:
if( (exp <= 0) && (rndprc != NBITS) )
if( (exp <= 0) && (rndprc != 64) && (rndprc != NBITS) )
if( rndprc < NBITS )
if( (exp <= 0) && (rndprc != NBITS) )
if( (exp <= 0) && (rndprc != 64) && (rndprc != NBITS) )
enan( c, NBITS );
enan( c, NBITS );
if( lt < (long )(-NBITS-1) )
enan( c, NBITS );
enan( c, NBITS );
enan( y, NBITS );
enan( y, NBITS );
int rndprc = NBITS;
if( (k = enormlz(yy)) > NBITS )
enan( y, NBITS );
enan( y, NBITS );
enan( y, NBITS );
enan( y, NBITS );
enan( y, NBITS );
enan( y, NBITS );
if( (k = enormlz(yy)) > NBITS )
if( (k = enormlz( yi )) > NBITS ) /* normalize the significand */
if( (k = enormlz( yi )) > NBITS ) /* normalize the significand */
if( (k = enormlz( xi )) > NBITS )
if( (k = enormlz( xi )) > NBITS )
if( sc > NBITS )
if( sc > (NBITS+16) )
if( sc < -NBITS )
rndprc = NBITS; /* set to full precision */
u[NE-1] = EXONE + NBITS - 1;
u[NE-1] += y[NE-1] - (unsigned int )(EXONE + NBITS - 1);
if( rndprc < NBITS )
asctoeg( s, y, NBITS );
rndprc = NBITS; /* Set to full precision */
if( (k = enormlz(yy)) > NBITS )
lexp = (EXONE - 1 + NBITS) - k;
case NBITS:
e = NBITS - e;
enan( c, NBITS );
case NBITS:
enan (y, NBITS);
exp += (NBITS - 1) - rndprc;
enan( b, NBITS );
for( i=0; i<NBITS+2; i++ )
for( i=0; i<NBITS+2; i++ )
k = NBITS;
switch (NBITS(typ)) {
switch (NBITS(typ)) {
bloc, brhs, NBITS(data->d_rtype));
return (kubsan_deserialize_int(typ, val) >= NBITS(typ));