Return to tran.c CVS log | Up to [local] / src / usr.bin / awk |
version 1.33, 2020/12/18 21:36:24 | version 1.34, 2021/11/02 15:29:41 | ||
---|---|---|---|
|
|
||
return(vp->fval); | return(vp->fval); | ||
} | } | ||
static char *get_inf_nan(double d) | static const char *get_inf_nan(double d) | ||
{ | { | ||
if (isinf(d)) { | if (isinf(d)) { | ||
return (d < 0 ? "-inf" : "+inf"); | return (d < 0 ? "-inf" : "+inf"); | ||
|
|
||
{ | { | ||
int n; | int n; | ||
double dtemp; | double dtemp; | ||
char *p; | const char *p; | ||
if ((vp->tval & (NUM | STR)) == 0) | if ((vp->tval & (NUM | STR)) == 0) | ||
funnyvar(vp, "read value of"); | funnyvar(vp, "read value of"); |