3 float modff(float x, float *iptr)
9 e = (int)(u>>23 & 0xff) - 0x7f;
11 /* no fractional part */
14 if (e == 0x80 && u<<9 != 0) /* nan */
16 SET_FLOAT_WORD(x, u & 0x80000000);
19 /* no integral part */
21 SET_FLOAT_WORD(*iptr, u & 0x80000000);
26 if ((u & mask) == 0) {
28 SET_FLOAT_WORD(x, u & 0x80000000);
31 SET_FLOAT_WORD(*iptr, u & ~mask);