9
|
1 |
--- gcc-3.4.3/gcc/c-parse.in.orig Tue Feb 16 13:13:29 2010
|
|
2 |
+++ gcc-3.4.3/gcc/c-parse.in Tue Feb 16 13:17:36 2010
|
|
3 |
@@ -1730,7 +1730,7 @@
|
|
4 |
|
|
5 |
structsp_attr:
|
|
6 |
struct_head identifier '{'
|
|
7 |
- { $$ = start_struct (RECORD_TYPE, $2);
|
|
8 |
+ { $<ttype>$ = start_struct (RECORD_TYPE, $2);
|
|
9 |
/* Start scope of tag before parsing components. */
|
|
10 |
}
|
|
11 |
component_decl_list '}' maybe_attribute
|
|
12 |
@@ -1741,7 +1741,7 @@
|
|
13 |
nreverse ($3), chainon ($1, $5));
|
|
14 |
}
|
|
15 |
| union_head identifier '{'
|
|
16 |
- { $$ = start_struct (UNION_TYPE, $2); }
|
|
17 |
+ { $<ttype>$ = start_struct (UNION_TYPE, $2); }
|
|
18 |
component_decl_list '}' maybe_attribute
|
|
19 |
{ $$ = finish_struct ($<ttype>4, nreverse ($5),
|
|
20 |
chainon ($1, $7)); }
|
|
21 |
@@ -1750,12 +1750,12 @@
|
|
22 |
nreverse ($3), chainon ($1, $5));
|
|
23 |
}
|
|
24 |
| enum_head identifier '{'
|
|
25 |
- { $$ = start_enum ($2); }
|
|
26 |
+ { $<ttype>$ = start_enum ($2); }
|
|
27 |
enumlist maybecomma_warn '}' maybe_attribute
|
|
28 |
{ $$ = finish_enum ($<ttype>4, nreverse ($5),
|
|
29 |
chainon ($1, $8)); }
|
|
30 |
| enum_head '{'
|
|
31 |
- { $$ = start_enum (NULL_TREE); }
|
|
32 |
+ { $<ttype>$ = start_enum (NULL_TREE); }
|
|
33 |
enumlist maybecomma_warn '}' maybe_attribute
|
|
34 |
{ $$ = finish_enum ($<ttype>3, nreverse ($4),
|
|
35 |
chainon ($1, $7)); }
|