| 133 |
|
|
| 134 |
|
|
| 135 |
|
char * |
| 136 |
< |
nvalue(vp, n) /* return nth variable value */ |
| 137 |
< |
VARIABLE *vp; |
| 136 |
> |
nvalue(vn, n) /* return nth variable value */ |
| 137 |
> |
register int vn; |
| 138 |
|
register int n; |
| 139 |
|
{ |
| 140 |
|
register char *cp; |
| 141 |
|
|
| 142 |
< |
if (vp == NULL | n < 0 | n >= vp->nass) |
| 142 |
> |
if (vval(vn) == NULL | n < 0 | n >= vdef(vn)) |
| 143 |
|
return(NULL); |
| 144 |
< |
cp = vp->value; |
| 144 |
> |
cp = vval(vn); |
| 145 |
|
while (n--) |
| 146 |
|
while (*cp++) |
| 147 |
|
; |
| 279 |
|
fputs("= ", fp); |
| 280 |
|
k = clipline = ( vv[i].fixval == catvalues ? 64 : 320 ) |
| 281 |
|
- strlen(vnam(i)) ; |
| 282 |
< |
cp = nvalue(vv+i, j); |
| 282 |
> |
cp = nvalue(i, j); |
| 283 |
|
while (*cp) { |
| 284 |
|
putc(*cp++, fp); |
| 285 |
|
if (--k <= 0) { /* line too long */ |