From: Christoph Mallon <christoph.mallon@gmx.de>
Date: Sat, 23 Aug 2008 11:18:45 +0000 (+0000)
Subject: Accept GNU-style designators ("identifier: value").
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=d2c95ccf75b25984c2daebb145abbd9a28cef213;p=cparser

Accept GNU-style designators ("identifier: value").

[r21381]
---

diff --git a/parser.c b/parser.c
index b4ac5f1..b9235f1 100644
--- a/parser.c
+++ b/parser.c
@@ -2339,7 +2339,16 @@ static initializer_t *parse_sub_initializer(type_path_t *path,
 		designator_t *designator = NULL;
 		if (token.type == '.' || token.type == '[') {
 			designator = parse_designation();
+			goto finish_designator;
+		} else if (token.type == T_IDENTIFIER && look_ahead(1)->type == ':') {
+			/* GNU-style designator ("identifier: value") */
+			designator = allocate_ast_zero(sizeof(designator[0]));
+			designator->source_position = token.source_position;
+			designator->symbol          = token.v.symbol;
+			eat(T_IDENTIFIER);
+			eat(':');
 
+finish_designator:
 			/* reset path to toplevel, evaluate designator from there */
 			ascend_to(path, top_path_level);
 			if (!walk_designator(path, designator, false)) {