76 |
|
for (n = strlen(ass); n > 0; n--) |
77 |
|
if (!isspace(ass[n-1])) |
78 |
|
break; |
79 |
< |
if (!n && !nowarn) { |
80 |
< |
fprintf(stderr, "%s: warning - missing value for variable '%s'\n", |
81 |
< |
progname, varname); |
79 |
> |
if (!n) { |
80 |
> |
if (!nowarn) |
81 |
> |
fprintf(stderr, |
82 |
> |
"%s: warning - missing value for variable '%s'\n", |
83 |
> |
progname, varname); |
84 |
|
return; |
85 |
|
} |
86 |
|
/* match variable from list */ |
135 |
|
|
136 |
|
|
137 |
|
char * |
138 |
< |
nvalue(vp, n) /* return nth variable value */ |
139 |
< |
VARIABLE *vp; |
138 |
> |
nvalue(vn, n) /* return nth variable value */ |
139 |
> |
register int vn; |
140 |
|
register int n; |
141 |
|
{ |
142 |
|
register char *cp; |
143 |
|
|
144 |
< |
if (vp == NULL | n < 0 | n >= vp->nass) |
144 |
> |
if (vval(vn) == NULL | n < 0 | n >= vdef(vn)) |
145 |
|
return(NULL); |
146 |
< |
cp = vp->value; |
146 |
> |
cp = vval(vn); |
147 |
|
while (n--) |
148 |
|
while (*cp++) |
149 |
|
; |
281 |
|
fputs("= ", fp); |
282 |
|
k = clipline = ( vv[i].fixval == catvalues ? 64 : 320 ) |
283 |
|
- strlen(vnam(i)) ; |
284 |
< |
cp = nvalue(vv+i, j); |
284 |
> |
cp = nvalue(i, j); |
285 |
|
while (*cp) { |
286 |
|
putc(*cp++, fp); |
287 |
|
if (--k <= 0) { /* line too long */ |