Lines Matching refs:e
63 int e; in modfl() local
65 ux.e = x; in modfl()
66 e = ux.bits.exp - LDBL_MAX_EXP + 1; in modfl()
67 if (e < HIBITS) { /* Integer part is in manh. */ in modfl()
68 if (e < 0) { /* |x|<1 */ in modfl()
72 if ((GETFRAC(ux.bits.manh, HIBITS - 1 - e) | in modfl()
78 ux.bits.manh >>= HIBITS - 1 - e; in modfl()
79 ux.bits.manh <<= HIBITS - 1 - e; in modfl()
81 *iptr = ux.e; in modfl()
82 return (x - ux.e); in modfl()
85 } else if (e >= LDBL_MANT_DIG - 1) { /* x has no fraction part. */ in modfl()
91 if (GETFRAC(ux.bits.manl, LDBL_MANT_DIG - 1 - e) == 0) { in modfl()
97 ux.bits.manl >>= LDBL_MANT_DIG - 1 - e; in modfl()
98 ux.bits.manl <<= LDBL_MANT_DIG - 1 - e; in modfl()
99 *iptr = ux.e; in modfl()
100 return (x - ux.e); in modfl()