frexp
#define ecb_frexpf(x,e) (float) frexp ((double) (x), (e))
m = frexp (x, &e) * 0x20000000000000U;
#define frexp(x, y) __tg_simplev(x, frexp, x, y)
g = frexp(x, &m);
double frexp(double, int *); /* fundamentally !__pure2 */
xs = frexp(x, &ex);
ys = frexp(y, &ey);
zs = frexp(z, &ez);
__weak_reference(frexp, frexpl);
double (frexp)(double x, int *e) { n_double++; }
PASS_REAL_FIXED_ARG_REAL_RET(frexp, &i));