Lines Matching refs:e
61 int e; in modfl() local
63 ux.e = x; in modfl()
64 e = ux.bits.exp - LDBL_MAX_EXP + 1; in modfl()
65 if (e < HIBITS) { /* Integer part is in manh. */ in modfl()
66 if (e < 0) { /* |x|<1 */ in modfl()
70 if ((GETFRAC(ux.bits.manh, HIBITS - 1 - e) | in modfl()
76 ux.bits.manh >>= HIBITS - 1 - e; in modfl()
77 ux.bits.manh <<= HIBITS - 1 - e; in modfl()
79 *iptr = ux.e; in modfl()
80 return (x - ux.e); in modfl()
83 } else if (e >= LDBL_MANT_DIG - 1) { /* x has no fraction part. */ in modfl()
89 if (GETFRAC(ux.bits.manl, LDBL_MANT_DIG - 1 - e) == 0) { in modfl()
95 ux.bits.manl >>= LDBL_MANT_DIG - 1 - e; in modfl()
96 ux.bits.manl <<= LDBL_MANT_DIG - 1 - e; in modfl()
97 *iptr = ux.e; in modfl()
98 return (x - ux.e); in modfl()