SF patch #416249, from Mark Favas: 2.1c1 compile: unused vrbl cleanup
This commit is contained in:
parent
d6283b84c8
commit
5ac946c697
|
@ -3539,13 +3539,11 @@ com_arglist(struct compiling *c, node *n)
|
||||||
for (i = 0, narg = 0; i < nch; i++) {
|
for (i = 0, narg = 0; i < nch; i++) {
|
||||||
node *ch = CHILD(n, i);
|
node *ch = CHILD(n, i);
|
||||||
node *fp;
|
node *fp;
|
||||||
char *name;
|
|
||||||
if (TYPE(ch) == STAR || TYPE(ch) == DOUBLESTAR)
|
if (TYPE(ch) == STAR || TYPE(ch) == DOUBLESTAR)
|
||||||
break;
|
break;
|
||||||
REQ(ch, fpdef); /* fpdef: NAME | '(' fplist ')' */
|
REQ(ch, fpdef); /* fpdef: NAME | '(' fplist ')' */
|
||||||
fp = CHILD(ch, 0);
|
fp = CHILD(ch, 0);
|
||||||
if (TYPE(fp) != NAME) {
|
if (TYPE(fp) != NAME) {
|
||||||
name = nbuf;
|
|
||||||
sprintf(nbuf, ".%d", i);
|
sprintf(nbuf, ".%d", i);
|
||||||
complex = 1;
|
complex = 1;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue