@@ -1085,7 +1085,7 @@ static struct symbol_list *sparse_tokenstream(struct token *token)
// Parse the resulting C code
while (!eof_token(token))
- token = external_declaration(token, &translation_unit_used_list);
+ token = external_declaration(token, &translation_unit_used_list, NULL);
return translation_unit_used_list;
}
@@ -2242,7 +2242,7 @@ static struct token *parse_for_statement(struct token *token, struct statement *
e1 = NULL;
/* C99 variable declaration? */
if (lookup_type(token)) {
- token = external_declaration(token, &syms);
+ token = external_declaration(token, &syms, NULL);
} else {
token = parse_expression(token, &e1);
token = expect(token, ';', "in 'for'");
@@ -2469,7 +2469,7 @@ static struct token * statement_list(struct token *token, struct statement_list
seen_statement = 0;
}
stmt = alloc_statement(token->pos, STMT_DECLARATION);
- token = external_declaration(token, &stmt->declaration);
+ token = external_declaration(token, &stmt->declaration, NULL);
} else {
seen_statement = Wdeclarationafterstatement;
token = statement(token, &stmt);
@@ -2797,7 +2797,8 @@ static struct token *toplevel_asm_declaration(struct token *token, struct symbol
return token;
}
-struct token *external_declaration(struct token *token, struct symbol_list **list)
+struct token *external_declaration(struct token *token, struct symbol_list **list,
+ validate_decl_t validate_decl)
{
struct ident *ident = NULL;
struct symbol *decl;
@@ -2885,6 +2886,9 @@ struct token *external_declaration(struct token *token, struct symbol_list **lis
token = initializer(&decl->initializer, token->next);
}
if (!is_typedef) {
+ if (validate_decl)
+ validate_decl(decl);
+
if (!(decl->ctype.modifiers & (MOD_EXTERN | MOD_INLINE))) {
add_symbol(list, decl);
fn_local_symbol(decl);
@@ -129,7 +129,8 @@ extern int show_statement(struct statement *);
extern void show_statement_list(struct statement_list *, const char *);
extern int show_expression(struct expression *);
-extern struct token *external_declaration(struct token *token, struct symbol_list **list);
+typedef void (*validate_decl_t)(struct symbol *decl);
+extern struct token *external_declaration(struct token *, struct symbol_list **, validate_decl_t);
extern struct symbol *ctype_integer(int size, int want_unsigned);
After parsing and validation, the symbols in the declaration are added to the list given in argument, *if* they are not extern symbols. The symbols that are extern are them not added to the list. This is what is needed for usual declarations but ignoring extern symbols make it impossible to emit a diagnostic in less usual situation. This is motivated by the validation of variable declaration inside a for-loop initializer, which is valid in C99 but only for variable with local storage. The change consists in adding to external_declaration() an optional callback 'validate_decl()' which, if present (non-null), is called just before adding the declaration to the list. Signed-off-by: Luc Van Oostenryck <luc.vanoostenryck@gmail.com> --- lib.c | 2 +- parse.c | 10 +++++++--- parse.h | 3 ++- 3 files changed, 10 insertions(+), 5 deletions(-)