Commit 90e5574f authored by Ken Thompson's avatar Ken Thompson

treat ... as agreed

only unencapsulated if passing one ddd
argument to one ddd parameter.

R=r
OCL=18376
CL=18376
parent 63f38d62
...@@ -1640,7 +1640,7 @@ sigtype(Type *st) ...@@ -1640,7 +1640,7 @@ sigtype(Type *st)
* with a pointer to the structure * with a pointer to the structure
*/ */
Node* Node*
mkdotargs(Node *r, Iter *saver, Node *nn, Type *l, int fp) mkdotargs(Node *r, Node *rr, Iter *saver, Node *nn, Type *l, int fp)
{ {
Type *t, *st, *ft; Type *t, *st, *ft;
Node *a, *n, *var; Node *a, *n, *var;
...@@ -1664,7 +1664,11 @@ mkdotargs(Node *r, Iter *saver, Node *nn, Type *l, int fp) ...@@ -1664,7 +1664,11 @@ mkdotargs(Node *r, Iter *saver, Node *nn, Type *l, int fp)
a = nod(OAS, N, r); a = nod(OAS, N, r);
n = list(n, a); n = list(n, a);
r = listnext(saver); if(rr != N) {
r = rr;
rr = N;
} else
r = listnext(saver);
} }
// make a named type for the struct // make a named type for the struct
...@@ -1705,8 +1709,8 @@ mkdotargs(Node *r, Iter *saver, Node *nn, Type *l, int fp) ...@@ -1705,8 +1709,8 @@ mkdotargs(Node *r, Iter *saver, Node *nn, Type *l, int fp)
Node* Node*
ascompatte(int op, Type **nl, Node **nr, int fp) ascompatte(int op, Type **nl, Node **nr, int fp)
{ {
Type *l; Type *l, *ll;
Node *r, *nn, *a; Node *r, *rr, *nn, *a;
Iter savel, saver; Iter savel, saver;
/* /*
...@@ -1721,15 +1725,28 @@ ascompatte(int op, Type **nl, Node **nr, int fp) ...@@ -1721,15 +1725,28 @@ ascompatte(int op, Type **nl, Node **nr, int fp)
loop: loop:
if(l != T && isddd(l->type)) { if(l != T && isddd(l->type)) {
if(r != N && isddd(r->type)) { // the ddd parameter must be last
goto more; ll = structnext(&savel);
if(ll != T)
yyerror("... must be last argument");
// special case --
// only if we are assigning a single ddd
// argument to a ddd parameter then it is
// passed thru unencapsulated
rr = listnext(&saver);
if(r != N && rr == N && isddd(r->type)) {
a = nod(OAS, nodarg(l, fp), r);
a = convas(a);
nn = list(a, nn);
return rev(nn);
} }
nn = mkdotargs(r, &saver, nn, l, fp); // normal case -- make a structure of all
// remaining arguments and pass a pointer to
// it to the ddd parameter (empty interface)
nn = mkdotargs(r, rr, &saver, nn, l, fp);
l = structnext(&savel);
if(l != T)
yyerror("... must be last argument");
return rev(nn); return rev(nn);
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment