realnode
NODE *realnode(REAL r);
yylval.node = realnode((REAL)wcstod(linebuf, (wchar_t **)0));
return (realnode((REAL)pow(f1, f2)));
tnp = realnode(np->n_real);
return (type == FINT ? intnode(iresult) : realnode(r1));
return (realnode(sqrt(exprreal(na==0 ? field0 : getlist(&np)))));
return (realnode(sin(exprreal(getlist(&np)))));
return (realnode(cos(exprreal(getlist(&np)))));
return (realnode(atan2(y, x)));
return (realnode((REAL)ldexp(result, expon-15)));
return (realnode(exp(exprreal(na==0 ? field0 : getlist(&np)))));
return (realnode(log(exprreal(na==0 ? field0 : getlist(&np)))));