REAL
REAL N_real;
NODE *realnode(REAL r);
REAL exprreal(NODE *np);
yylval.node = realnode((REAL)wcstod(linebuf, (wchar_t **)0));
return (realnode((REAL)pow(f1, f2)));
register REAL r1, r2;
register REAL r1, r2;
REAL rval;
realnode(REAL real)
REAL
return ((REAL)loopexit);
return ((REAL)np->n_int);
return ((REAL)wcstod((wchar_t *)np->n_string, (wchar_t **)0));
return ((REAL)0);
return (realnode((REAL)ldexp(result, expon-15)));