X-Git-Url: https://oss.titaniummirror.com/gitweb/?p=nesc.git;a=blobdiff_plain;f=src%2Fc-parse.y;fp=src%2Fc-parse.y;h=5d32fca129a7e9c28f674973edf3d5b59d7587f9;hp=febdc401a0bde092457540a372412e24a2c05515;hb=afe799e7802f38d1f55e1bd2044451ba164743b1;hpb=38be457fa32d3ab0721ec1fc9e5086b745e17468

diff --git a/src/c-parse.y b/src/c-parse.y
index febdc40..5d32fca 100644
--- a/src/c-parse.y
+++ b/src/c-parse.y
@@ -1781,13 +1781,13 @@ attribute:
 target_attribute:
 	  TARGET_ATTRIBUTE0
 		{ word w = new_word(pr, $1.location, $1.id);
-		  $$ = new_gcc_attribute(pr, $1.location, w, NULL); }
+		  $$ = new_target_attribute(pr, $1.location, w, NULL); }
 	| TARGET_ATTRIBUTE1 restricted_expr
 		{ word w = new_word(pr, $1.location, $1.id);
-		  $$ = new_gcc_attribute(pr, $1.location, w, $2); }
+		  $$ = new_target_attribute(pr, $1.location, w, $2); }
 	| '@' restricted_expr
 		{ word w = new_word(pr, $2->location, str2cstring(pr, "iar_at"));
-		  $$ = new_gcc_attribute(pr, $2->location, w, $2); }
+		  $$ = new_target_attribute(pr, $2->location, w, $2); }
 	;
 
 restricted_expr:
@@ -2040,13 +2040,13 @@ structuse:
 
 structdef:
 	  structkind tag nesc_attributes '{'
-		{ $$ = start_struct($1.location, $1.i, $2);
+		{ $<u.telement>$ = start_struct($1.location, $1.i, $2);
 		  /* Start scope of tag before parsing components.  */
 		}
 	  component_decl_list '}' maybe_attribute 
 		{ $$ = finish_struct($<u.telement>5, $6, attribute_chain($3, $8)); }
 	| STRUCT '@' tag nesc_attributes '{'
-		{ $$ = start_struct($1.location, kind_attribute_ref, $3);
+		{ $<u.telement>$ = start_struct($1.location, kind_attribute_ref, $3);
 		  /* Start scope of tag before parsing components.  */
 		}
 	  component_decl_list '}' maybe_attribute 
@@ -2056,11 +2056,11 @@ structdef:
 						  NULL), $3, $5);
 		}
 	| ENUM tag nesc_attributes '{'
-		{ $$ = start_enum($1.location, $2); }
+		{ $<u.telement>$ = start_enum($1.location, $2); }
 	  enumlist maybecomma_warn '}' maybe_attribute
 		{ $$ = finish_enum($<u.telement>5, declaration_reverse($6), attribute_chain($3, $9)); }
 	| ENUM '{'
-		{ $$ = start_enum($1.location, NULL); }
+		{ $<u.telement>$ = start_enum($1.location, NULL); }
 	  enumlist maybecomma_warn '}' maybe_attribute
 		{ $$ = finish_enum($<u.telement>3, declaration_reverse($4), $7); }
 	;