d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fixed old-fashioned decl check

Browse source
This commit is contained in:
ceriel 1991-02-27 13:48:54 +00:00
parent cb7438cb99
commit e61d1b425d
1 changed files with 9 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
lang/cem/cemcom.ansi/declarator.c
View file

@ -102,20 +102,22 @@ reject_params(dc)
case of a function definition. case of a function definition.
*/ */
register struct decl_unary *du = dc->dc_decl_unary; register struct decl_unary *du = dc->dc_decl_unary;
int err_given = 0;
if (dc->dc_formal) { if (dc->dc_formal) {
error("non_empty formal parameter pack"); error("non_empty formal parameter pack");
free_formals(dc->dc_formal); free_formals(dc->dc_formal);
dc->dc_formal = 0; dc->dc_formal = 0;
} else { err_given = 1;
if (du && du->du_fund == FUNCTION
&& !du->du_proto && !options['o']) {
warning("old-fashioned function declaration");
}
} }
while (du) { while (du) {
if (du->du_fund == FUNCTION) if (du->du_fund == FUNCTION) {
remove_proto_idfs(du->du_proto); if (du->du_proto) remove_proto_idfs(du->du_proto);
else if (! err_given && ! options['o']) {
err_given = 1;
warning("old-fashioned function declaration");
}
}
du = du->next; du = du->next;
} }
} }