ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

- Force default [in] attribute on all parameters where explicit [in] 

or [out] attributes aren't specified.
- Force default [out] attribute on return values.
This commit is contained in:
Filip Navara 2004-09-28 02:12:36 +00:00 committed by Alexandre Julliard
parent ae5a436873
commit 75e02e9335
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
tools/widl/parser.y
View File

@ -280,19 +280,31 @@ args: arg
arg: attributes type pident array { $$ = $3;
set_type($$, $2, $4);
$$->attrs = $1;
if (!is_attr($$->attrs, ATTR_OUT) &&
!is_attr($$->attrs, ATTR_IN)) {
attr_t *a = make_attr(ATTR_IN);
LINK(a, $$->attrs); $$->attrs = a;
}
}
| type pident array { $$ = $2;
set_type($$, $1, $3);
$$->attrs = make_attr(ATTR_IN);
}
| attributes type pident '(' m_args ')' { $$ = $3;
$$->ptr_level--;
set_type($$, $2, NULL);
$$->attrs = $1;
$$->args = $5;
if (!is_attr($$->attrs, ATTR_OUT) &&
!is_attr($$->attrs, ATTR_IN)) {
attr_t *a = make_attr(ATTR_IN);
LINK(a, $$->attrs); $$->attrs = a;
}
}
| type pident '(' m_args ')' { $$ = $2;
$$->ptr_level--;
set_type($$, $1, NULL);
$$->attrs = make_attr(ATTR_IN);
$$->args = $4;
}
;
@ -489,6 +501,13 @@ funcdef:
'(' m_args ')' { set_type($4, $2, NULL);
$4->attrs = $1;
$$ = make_func($4, $6);
if (is_attr($4->attrs, ATTR_IN)) {
yyerror("Inapplicatable attribute");
}
if (!is_attr($4->attrs, ATTR_OUT)) {
attr_t *a = make_attr(ATTR_OUT);
LINK(a, $4->attrs); $4->attrs = a;
}
}
;