We conservatively assume all functions have variable argument lists.
@@ -290,18 +290,12 @@ call(Node *n, Symb *sr)
fprintf(of, "\t");
psymb(*sr);
fprintf(of, " =%c call $%s(", irtyp(sr->ctyp), f);
- a = n->r;
- if (a)
- for (;;) {
- fprintf(of, "%c ", irtyp(a->u.s.ctyp));
- psymb(a->u.s);
- a = a->r;
- fprintf(of, ", ");
- else
- break;
- }
- fprintf(of, ")\n");
+ for (a=n->r; a; a=a->r) {
+ fprintf(of, "%c ", irtyp(a->u.s.ctyp));
+ psymb(a->u.s);
+ fprintf(of, ", ");
+ }
+ fprintf(of, "...)\n");
}
Symb