616 |
|
register struct field *f |
617 |
|
) |
618 |
|
{ |
619 |
< |
static char buf[MAXWORD+1]; /* no recursion! */ |
619 |
> |
static char buf[RMAXWORD+1]; /* no recursion! */ |
620 |
|
int delim, inword; |
621 |
|
double d; |
622 |
|
char *np; |
661 |
|
*cp++ = ipb.chr; |
662 |
|
scaninp(); |
663 |
|
} |
664 |
< |
} while (inword && cp < &buf[MAXWORD]); |
664 |
> |
} while (inword && cp < &buf[RMAXWORD]); |
665 |
|
*cp = '\0'; |
666 |
|
if (f->f.sv->val == NULL) |
667 |
|
f->f.sv->val = savqstr(buf); /* first setting */ |
690 |
|
*cp++ = ipb.chr; |
691 |
|
scaninp(); |
692 |
|
} |
693 |
< |
} while (inword && cp < &buf[MAXWORD]); |
693 |
> |
} while (inword && cp < &buf[RMAXWORD]); |
694 |
|
*cp = '\0'; |
695 |
|
d = np==NULL ? 0. : atof(np); |
696 |
|
if (!vardefined(f->f.nv)) |