From c3b6e11400d742ce467690ef436183ae1e856ef1 Mon Sep 17 00:00:00 2001 From: Jim Kingdon Date: Wed, 22 Sep 1999 06:58:30 -0600 Subject: [PATCH] c-parse.in: save and restore warn_pointer_arith on __extension__ along with pedantic. * c-parse.in: save and restore warn_pointer_arith on __extension__ along with pedantic. (SAVE_WARN_FLAGS, RESTORE_WARN_FLAGS): Added. Set the type of extension to itype rather than $1 kludge. * extend.texi (Alternate Keywords): Adjust documentation. * c-parse.c, c-parse.y, objc-parse.c, objc-parse.y: Rebuilt. From-SVN: r29588 --- gcc/ChangeLog | 9 + gcc/c-parse.c | 798 +++++++++++++++-------------- gcc/c-parse.in | 24 +- gcc/c-parse.y | 24 +- gcc/objc/objc-parse.c | 1128 +++++++++++++++++++++-------------------- gcc/objc/objc-parse.y | 24 +- 6 files changed, 1036 insertions(+), 971 deletions(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 37be3bf8d0e..ef867ff042f 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,12 @@ +Wed Sep 22 06:25:15 1999 Jim Kingdon + + * c-parse.in: save and restore warn_pointer_arith on __extension__ + along with pedantic. + (SAVE_WARN_FLAGS, RESTORE_WARN_FLAGS): Added. + Set the type of extension to itype rather than $1 kludge. + * extend.texi (Alternate Keywords): Adjust documentation. + * c-parse.c, c-parse.y, objc-parse.c, objc-parse.y: Rebuilt. + Wed Sep 22 06:06:57 1999 Jeffrey A Law (law@cygnus.com) * flow.c (record_active_eh_regions): Terminate loop after finding diff --git a/gcc/c-parse.c b/gcc/c-parse.c index b8ebe33febb..ac7022674e4 100644 --- a/gcc/c-parse.c +++ b/gcc/c-parse.c @@ -99,7 +99,7 @@ const char * const language_string = "GNU C"; #line 64 "c-parse.y" typedef union {long itype; tree ttype; enum tree_code code; char *filename; int lineno; int ends_in_label; } YYSTYPE; -#line 184 "c-parse.y" +#line 186 "c-parse.y" /* Number of statements (loosely speaking) and compound statements seen so far. */ @@ -121,6 +121,15 @@ static tree declspec_stack; /* 1 if we explained undeclared var errors. */ static int undeclared_variable_notice; +/* For __extension__, save/restore the warning flags which are + controlled by __extension__. */ +#define SAVE_WARN_FLAGS() (pedantic | (warn_pointer_arith << 1)) +#define RESTORE_WARN_FLAGS(val) \ + do { \ + pedantic = val & 1; \ + warn_pointer_arith = (val >> 1) & 1; \ + } while (0) + /* Tell yyparse how to print a token's value, if yydebug is set. */ @@ -370,47 +379,47 @@ static const short yyrhs[] = { -1, #if YYDEBUG != 0 static const short yyrline[] = { 0, - 223, 228, 242, 244, 244, 245, 247, 249, 250, 258, - 262, 273, 278, 283, 285, 287, 288, 289, 294, 301, - 303, 308, 313, 319, 321, 326, 331, 337, 339, 344, - 351, 353, 356, 358, 360, 362, 364, 366, 368, 372, - 376, 379, 382, 385, 389, 391, 394, 397, 401, 429, - 435, 438, 441, 444, 446, 448, 452, 456, 460, 462, - 465, 469, 496, 498, 500, 502, 504, 506, 508, 510, - 512, 514, 516, 518, 520, 522, 526, 528, 532, 534, - 537, 541, 543, 550, 553, 561, 572, 671, 672, 674, - 680, 682, 705, 714, 716, 718, 722, 728, 730, 735, - 737, 742, 744, 745, 755, 760, 762, 763, 764, 771, - 777, 782, 785, 793, 798, 800, 801, 802, 809, 820, - 824, 830, 835, 840, 845, 847, 849, 858, 861, 865, - 867, 869, 874, 878, 881, 885, 888, 890, 902, 905, - 907, 909, 913, 917, 919, 922, 935, 938, 942, 944, - 952, 953, 954, 958, 960, 966, 967, 968, 971, 973, - 976, 978, 981, 984, 990, 997, 999, 1006, 1013, 1016, - 1023, 1026, 1030, 1033, 1037, 1042, 1045, 1049, 1052, 1054, - 1056, 1058, 1065, 1067, 1068, 1069, 1074, 1076, 1081, 1089, - 1094, 1098, 1101, 1103, 1108, 1110, 1111, 1114, 1114, 1117, - 1120, 1122, 1124, 1127, 1129, 1132, 1138, 1140, 1144, 1158, - 1166, 1170, 1184, 1192, 1199, 1201, 1206, 1209, 1214, 1216, - 1218, 1225, 1227, 1235, 1241, 1246, 1248, 1250, 1257, 1259, - 1265, 1271, 1273, 1275, 1280, 1282, 1289, 1291, 1294, 1297, - 1301, 1304, 1308, 1311, 1315, 1320, 1322, 1326, 1328, 1330, - 1332, 1336, 1338, 1341, 1344, 1347, 1350, 1354, 1356, 1359, - 1361, 1366, 1369, 1374, 1376, 1378, 1392, 1399, 1404, 1410, - 1415, 1417, 1422, 1424, 1428, 1432, 1436, 1446, 1448, 1453, - 1458, 1461, 1465, 1468, 1472, 1475, 1478, 1481, 1485, 1488, - 1492, 1496, 1498, 1500, 1502, 1504, 1506, 1508, 1510, 1514, - 1522, 1530, 1532, 1534, 1538, 1540, 1543, 1546, 1557, 1559, - 1564, 1566, 1569, 1583, 1586, 1589, 1591, 1593, 1601, 1609, - 1619, 1637, 1642, 1647, 1650, 1664, 1673, 1677, 1681, 1685, - 1691, 1695, 1700, 1703, 1708, 1711, 1712, 1729, 1734, 1737, - 1749, 1751, 1761, 1771, 1772, 1780, 1783, 1795, 1799, 1816, - 1826, 1835, 1840, 1845, 1850, 1854, 1858, 1869, 1876, 1883, - 1890, 1901, 1907, 1910, 1915, 1938, 1972, 2003, 2034, 2049, - 2063, 2067, 2071, 2074, 2079, 2081, 2084, 2086, 2090, 2095, - 2098, 2104, 2109, 2114, 2116, 2125, 2126, 2132, 2134, 2144, - 2146, 2150, 2153, 2159, 2169, 2178, 2187, 2197, 2211, 2216, - 2221, 2223, 2232, 2235, 2240, 2243, 2247 + 234, 239, 253, 255, 255, 256, 258, 260, 261, 269, + 273, 284, 289, 294, 296, 298, 299, 300, 305, 312, + 314, 319, 324, 330, 332, 337, 342, 348, 350, 355, + 362, 364, 367, 369, 371, 373, 375, 377, 379, 383, + 387, 390, 393, 396, 400, 402, 405, 408, 412, 440, + 446, 449, 452, 455, 457, 459, 463, 467, 471, 473, + 476, 480, 507, 509, 511, 513, 515, 517, 519, 521, + 523, 525, 527, 529, 531, 533, 537, 539, 543, 545, + 548, 552, 554, 561, 564, 572, 583, 682, 683, 685, + 691, 693, 716, 725, 727, 729, 733, 739, 741, 746, + 748, 753, 755, 756, 766, 771, 773, 774, 775, 782, + 788, 793, 796, 804, 809, 811, 812, 813, 820, 831, + 835, 841, 846, 851, 856, 858, 860, 869, 872, 876, + 878, 880, 885, 889, 892, 896, 899, 901, 913, 916, + 918, 920, 924, 928, 930, 933, 946, 949, 953, 955, + 963, 964, 965, 969, 971, 977, 978, 979, 982, 984, + 987, 989, 992, 995, 1001, 1008, 1010, 1017, 1024, 1027, + 1034, 1037, 1041, 1044, 1048, 1053, 1056, 1060, 1063, 1065, + 1067, 1069, 1076, 1078, 1079, 1080, 1085, 1087, 1092, 1100, + 1105, 1109, 1112, 1114, 1119, 1121, 1122, 1125, 1125, 1128, + 1131, 1133, 1135, 1138, 1140, 1143, 1149, 1151, 1155, 1169, + 1177, 1181, 1195, 1203, 1210, 1212, 1217, 1220, 1225, 1227, + 1229, 1236, 1238, 1246, 1252, 1257, 1259, 1261, 1268, 1270, + 1276, 1282, 1284, 1286, 1291, 1293, 1300, 1302, 1305, 1308, + 1312, 1315, 1319, 1322, 1326, 1331, 1333, 1337, 1339, 1341, + 1343, 1347, 1349, 1352, 1355, 1358, 1361, 1365, 1367, 1370, + 1372, 1377, 1380, 1385, 1387, 1389, 1403, 1410, 1415, 1421, + 1426, 1428, 1433, 1435, 1439, 1443, 1447, 1457, 1459, 1464, + 1469, 1472, 1476, 1479, 1483, 1486, 1489, 1492, 1496, 1499, + 1503, 1507, 1509, 1511, 1513, 1515, 1517, 1519, 1521, 1525, + 1533, 1541, 1543, 1545, 1549, 1551, 1554, 1557, 1568, 1570, + 1575, 1577, 1580, 1594, 1597, 1600, 1602, 1604, 1612, 1620, + 1630, 1648, 1653, 1658, 1661, 1675, 1684, 1688, 1692, 1696, + 1702, 1706, 1711, 1714, 1719, 1722, 1723, 1740, 1745, 1748, + 1760, 1762, 1772, 1782, 1783, 1791, 1794, 1806, 1810, 1827, + 1837, 1846, 1851, 1856, 1861, 1865, 1869, 1880, 1887, 1894, + 1901, 1912, 1918, 1921, 1926, 1949, 1983, 2014, 2045, 2060, + 2074, 2078, 2082, 2085, 2090, 2092, 2095, 2097, 2101, 2106, + 2109, 2115, 2120, 2125, 2127, 2136, 2137, 2143, 2145, 2155, + 2157, 2161, 2164, 2170, 2180, 2189, 2198, 2208, 2222, 2227, + 2232, 2234, 2243, 2246, 2251, 2254, 2258 }; #endif @@ -1255,7 +1264,7 @@ static const short yycheck[] = { 38, 53, 54 }; /* -*-C-*- Note some compilers choke on comments on `#line' lines. */ -#line 3 "bison.simple" +#line 3 "/usr/cygnus/TBD-TBD/share/bison.simple" /* Skeleton output parser for bison, Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc. @@ -1448,7 +1457,7 @@ __yy_memcpy (char *to, char *from, int count) #endif #endif -#line 196 "bison.simple" +#line 196 "/usr/cygnus/TBD-TBD/share/bison.simple" /* The user can define YYPARSE_PARAM as the name of an argument to be passed into yyparse. The argument should have type void *. @@ -1753,14 +1762,14 @@ yyreduce: switch (yyn) { case 1: -#line 224 "c-parse.y" +#line 235 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids an empty source file"); finish_file (); ; break;} case 2: -#line 229 "c-parse.y" +#line 240 "c-parse.y" { /* In case there were missing closebraces, get us back to the global binding level. */ @@ -1770,15 +1779,15 @@ case 2: ; break;} case 3: -#line 243 "c-parse.y" +#line 254 "c-parse.y" {yyval.ttype = NULL_TREE; ; break;} case 5: -#line 244 "c-parse.y" +#line 255 "c-parse.y" {yyval.ttype = NULL_TREE; ; break;} case 9: -#line 251 "c-parse.y" +#line 262 "c-parse.y" { STRIP_NOPS (yyvsp[-2].ttype); if ((TREE_CODE (yyvsp[-2].ttype) == ADDR_EXPR && TREE_CODE (TREE_OPERAND (yyvsp[-2].ttype, 0)) == STRING_CST) @@ -1788,11 +1797,11 @@ case 9: error ("argument of `asm' is not a constant string"); ; break;} case 10: -#line 259 "c-parse.y" -{ pedantic = yyvsp[-1].itype; ; +#line 270 "c-parse.y" +{ RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 11: -#line 264 "c-parse.y" +#line 275 "c-parse.y" { if (pedantic) error ("ANSI C forbids data definition with no type or storage class"); else if (!flag_traditional) @@ -1804,45 +1813,45 @@ case 11: resume_momentary (yyvsp[-2].itype); ; break;} case 12: -#line 274 "c-parse.y" +#line 285 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 13: -#line 279 "c-parse.y" +#line 290 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 14: -#line 284 "c-parse.y" +#line 295 "c-parse.y" { pedwarn ("empty declaration"); ; break;} case 15: -#line 286 "c-parse.y" +#line 297 "c-parse.y" { shadow_tag (yyvsp[-1].ttype); ; break;} case 18: -#line 290 "c-parse.y" +#line 301 "c-parse.y" { if (pedantic) pedwarn ("ANSI C does not allow extra `;' outside of a function"); ; break;} case 19: -#line 296 "c-parse.y" +#line 307 "c-parse.y" { if (! start_function (current_declspecs, yyvsp[0].ttype, prefix_attributes, NULL_TREE, 0)) YYERROR1; reinit_parse_for_function (); ; break;} case 20: -#line 301 "c-parse.y" +#line 312 "c-parse.y" { store_parm_decls (); ; break;} case 21: -#line 303 "c-parse.y" +#line 314 "c-parse.y" { finish_function (0); current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -1850,25 +1859,25 @@ case 21: resume_momentary (yyvsp[-5].itype); ; break;} case 22: -#line 309 "c-parse.y" +#line 320 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 23: -#line 314 "c-parse.y" +#line 325 "c-parse.y" { if (! start_function (current_declspecs, yyvsp[0].ttype, prefix_attributes, NULL_TREE, 0)) YYERROR1; reinit_parse_for_function (); ; break;} case 24: -#line 319 "c-parse.y" +#line 330 "c-parse.y" { store_parm_decls (); ; break;} case 25: -#line 321 "c-parse.y" +#line 332 "c-parse.y" { finish_function (0); current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -1876,25 +1885,25 @@ case 25: resume_momentary (yyvsp[-5].itype); ; break;} case 26: -#line 327 "c-parse.y" +#line 338 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 27: -#line 332 "c-parse.y" +#line 343 "c-parse.y" { if (! start_function (NULL_TREE, yyvsp[0].ttype, prefix_attributes, NULL_TREE, 0)) YYERROR1; reinit_parse_for_function (); ; break;} case 28: -#line 337 "c-parse.y" +#line 348 "c-parse.y" { store_parm_decls (); ; break;} case 29: -#line 339 "c-parse.y" +#line 350 "c-parse.y" { finish_function (0); current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -1902,72 +1911,72 @@ case 29: resume_momentary (yyvsp[-5].itype); ; break;} case 30: -#line 345 "c-parse.y" +#line 356 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 33: -#line 357 "c-parse.y" +#line 368 "c-parse.y" { yyval.code = ADDR_EXPR; ; break;} case 34: -#line 359 "c-parse.y" +#line 370 "c-parse.y" { yyval.code = NEGATE_EXPR; ; break;} case 35: -#line 361 "c-parse.y" +#line 372 "c-parse.y" { yyval.code = CONVERT_EXPR; ; break;} case 36: -#line 363 "c-parse.y" +#line 374 "c-parse.y" { yyval.code = PREINCREMENT_EXPR; ; break;} case 37: -#line 365 "c-parse.y" +#line 376 "c-parse.y" { yyval.code = PREDECREMENT_EXPR; ; break;} case 38: -#line 367 "c-parse.y" +#line 378 "c-parse.y" { yyval.code = BIT_NOT_EXPR; ; break;} case 39: -#line 369 "c-parse.y" +#line 380 "c-parse.y" { yyval.code = TRUTH_NOT_EXPR; ; break;} case 40: -#line 373 "c-parse.y" +#line 384 "c-parse.y" { yyval.ttype = build_compound_expr (yyvsp[0].ttype); ; break;} case 41: -#line 378 "c-parse.y" +#line 389 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 43: -#line 384 "c-parse.y" +#line 395 "c-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 44: -#line 386 "c-parse.y" +#line 397 "c-parse.y" { chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 46: -#line 392 "c-parse.y" +#line 403 "c-parse.y" { yyval.ttype = build_indirect_ref (yyvsp[0].ttype, "unary *"); ; break;} case 47: -#line 395 "c-parse.y" +#line 406 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; - pedantic = yyvsp[-1].itype; ; + RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 48: -#line 398 "c-parse.y" +#line 409 "c-parse.y" { yyval.ttype = build_unary_op (yyvsp[-1].code, yyvsp[0].ttype, 0); overflow_warning (yyval.ttype); ; break;} case 49: -#line 402 "c-parse.y" +#line 413 "c-parse.y" { tree label = lookup_label (yyvsp[0].ttype); if (pedantic) pedwarn ("ANSI C forbids `&&'"); @@ -1982,7 +1991,7 @@ case 49: ; break;} case 50: -#line 430 "c-parse.y" +#line 441 "c-parse.y" { skip_evaluation--; if (TREE_CODE (yyvsp[0].ttype) == COMPONENT_REF && DECL_C_BIT_FIELD (TREE_OPERAND (yyvsp[0].ttype, 1))) @@ -1990,53 +1999,53 @@ case 50: yyval.ttype = c_sizeof (TREE_TYPE (yyvsp[0].ttype)); ; break;} case 51: -#line 436 "c-parse.y" +#line 447 "c-parse.y" { skip_evaluation--; yyval.ttype = c_sizeof (groktypename (yyvsp[-1].ttype)); ; break;} case 52: -#line 439 "c-parse.y" +#line 450 "c-parse.y" { skip_evaluation--; yyval.ttype = c_alignof_expr (yyvsp[0].ttype); ; break;} case 53: -#line 442 "c-parse.y" +#line 453 "c-parse.y" { skip_evaluation--; yyval.ttype = c_alignof (groktypename (yyvsp[-1].ttype)); ; break;} case 54: -#line 445 "c-parse.y" +#line 456 "c-parse.y" { yyval.ttype = build_unary_op (REALPART_EXPR, yyvsp[0].ttype, 0); ; break;} case 55: -#line 447 "c-parse.y" +#line 458 "c-parse.y" { yyval.ttype = build_unary_op (IMAGPART_EXPR, yyvsp[0].ttype, 0); ; break;} case 56: -#line 449 "c-parse.y" +#line 460 "c-parse.y" { yyval.ttype = build_va_arg (yyvsp[-3].ttype, groktypename (yyvsp[-1].ttype)); ; break;} case 57: -#line 453 "c-parse.y" +#line 464 "c-parse.y" { skip_evaluation++; ; break;} case 58: -#line 457 "c-parse.y" +#line 468 "c-parse.y" { skip_evaluation++; ; break;} case 60: -#line 463 "c-parse.y" +#line 474 "c-parse.y" { tree type = groktypename (yyvsp[-2].ttype); yyval.ttype = build_c_cast (type, yyvsp[0].ttype); ; break;} case 61: -#line 466 "c-parse.y" +#line 477 "c-parse.y" { start_init (NULL_TREE, NULL, 0); yyvsp[-2].ttype = groktypename (yyvsp[-2].ttype); really_start_incremental_init (yyvsp[-2].ttype); ; break;} case 62: -#line 470 "c-parse.y" +#line 481 "c-parse.y" { char *name; tree result = pop_init_level (0); tree type = yyvsp[-5].ttype; @@ -2063,90 +2072,90 @@ case 62: ; break;} case 64: -#line 499 "c-parse.y" +#line 510 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 65: -#line 501 "c-parse.y" +#line 512 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 66: -#line 503 "c-parse.y" +#line 514 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 67: -#line 505 "c-parse.y" +#line 516 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 68: -#line 507 "c-parse.y" +#line 518 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 69: -#line 509 "c-parse.y" +#line 520 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 70: -#line 511 "c-parse.y" +#line 522 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 71: -#line 513 "c-parse.y" +#line 524 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 72: -#line 515 "c-parse.y" +#line 526 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 73: -#line 517 "c-parse.y" +#line 528 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 74: -#line 519 "c-parse.y" +#line 530 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 75: -#line 521 "c-parse.y" +#line 532 "c-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 76: -#line 523 "c-parse.y" +#line 534 "c-parse.y" { yyvsp[-1].ttype = truthvalue_conversion (default_conversion (yyvsp[-1].ttype)); skip_evaluation += yyvsp[-1].ttype == boolean_false_node; ; break;} case 77: -#line 526 "c-parse.y" +#line 537 "c-parse.y" { skip_evaluation -= yyvsp[-3].ttype == boolean_false_node; yyval.ttype = parser_build_binary_op (TRUTH_ANDIF_EXPR, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 78: -#line 529 "c-parse.y" +#line 540 "c-parse.y" { yyvsp[-1].ttype = truthvalue_conversion (default_conversion (yyvsp[-1].ttype)); skip_evaluation += yyvsp[-1].ttype == boolean_true_node; ; break;} case 79: -#line 532 "c-parse.y" +#line 543 "c-parse.y" { skip_evaluation -= yyvsp[-3].ttype == boolean_true_node; yyval.ttype = parser_build_binary_op (TRUTH_ORIF_EXPR, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 80: -#line 535 "c-parse.y" +#line 546 "c-parse.y" { yyvsp[-1].ttype = truthvalue_conversion (default_conversion (yyvsp[-1].ttype)); skip_evaluation += yyvsp[-1].ttype == boolean_false_node; ; break;} case 81: -#line 538 "c-parse.y" +#line 549 "c-parse.y" { skip_evaluation += ((yyvsp[-4].ttype == boolean_true_node) - (yyvsp[-4].ttype == boolean_false_node)); ; break;} case 82: -#line 541 "c-parse.y" +#line 552 "c-parse.y" { skip_evaluation -= yyvsp[-6].ttype == boolean_true_node; yyval.ttype = build_conditional_expr (yyvsp[-6].ttype, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 83: -#line 544 "c-parse.y" +#line 555 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids omitting the middle term of a ?: expression"); /* Make sure first operand is calculated only once. */ @@ -2155,12 +2164,12 @@ case 83: skip_evaluation += yyvsp[-1].ttype == boolean_true_node; ; break;} case 84: -#line 551 "c-parse.y" +#line 562 "c-parse.y" { skip_evaluation -= yyvsp[-4].ttype == boolean_true_node; yyval.ttype = build_conditional_expr (yyvsp[-4].ttype, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 85: -#line 554 "c-parse.y" +#line 565 "c-parse.y" { char class; yyval.ttype = build_modify_expr (yyvsp[-2].ttype, NOP_EXPR, yyvsp[0].ttype); class = TREE_CODE_CLASS (TREE_CODE (yyval.ttype)); @@ -2170,7 +2179,7 @@ case 85: ; break;} case 86: -#line 562 "c-parse.y" +#line 573 "c-parse.y" { char class; yyval.ttype = build_modify_expr (yyvsp[-2].ttype, yyvsp[-1].code, yyvsp[0].ttype); /* This inhibits warnings in truthvalue_conversion. */ @@ -2181,7 +2190,7 @@ case 86: ; break;} case 87: -#line 574 "c-parse.y" +#line 585 "c-parse.y" { yyval.ttype = lastiddecl; if (!yyval.ttype || yyval.ttype == error_mark_node) @@ -2281,11 +2290,11 @@ case 87: ; break;} case 89: -#line 673 "c-parse.y" +#line 684 "c-parse.y" { yyval.ttype = combine_strings (yyvsp[0].ttype); ; break;} case 90: -#line 675 "c-parse.y" +#line 686 "c-parse.y" { char class = TREE_CODE_CLASS (TREE_CODE (yyvsp[-1].ttype)); if (class == 'e' || class == '1' || class == '2' || class == '<') @@ -2293,11 +2302,11 @@ case 90: yyval.ttype = yyvsp[-1].ttype; ; break;} case 91: -#line 681 "c-parse.y" +#line 692 "c-parse.y" { yyval.ttype = error_mark_node; ; break;} case 92: -#line 683 "c-parse.y" +#line 694 "c-parse.y" { tree rtl_exp; if (pedantic) pedwarn ("ANSI C forbids braced-groups within expressions"); @@ -2322,7 +2331,7 @@ case 92: ; break;} case 93: -#line 706 "c-parse.y" +#line 717 "c-parse.y" { /* Make sure we call expand_end_stmt_expr. Otherwise we are likely to lose sequences and crash later. */ @@ -2333,21 +2342,21 @@ case 93: ; break;} case 94: -#line 715 "c-parse.y" +#line 726 "c-parse.y" { yyval.ttype = build_function_call (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 95: -#line 717 "c-parse.y" +#line 728 "c-parse.y" { yyval.ttype = build_array_ref (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 96: -#line 719 "c-parse.y" +#line 730 "c-parse.y" { yyval.ttype = build_component_ref (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 97: -#line 723 "c-parse.y" +#line 734 "c-parse.y" { tree expr = build_indirect_ref (yyvsp[-2].ttype, "->"); @@ -2355,56 +2364,56 @@ case 97: ; break;} case 98: -#line 729 "c-parse.y" +#line 740 "c-parse.y" { yyval.ttype = build_unary_op (POSTINCREMENT_EXPR, yyvsp[-1].ttype, 0); ; break;} case 99: -#line 731 "c-parse.y" +#line 742 "c-parse.y" { yyval.ttype = build_unary_op (POSTDECREMENT_EXPR, yyvsp[-1].ttype, 0); ; break;} case 101: -#line 738 "c-parse.y" +#line 749 "c-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 104: -#line 747 "c-parse.y" +#line 758 "c-parse.y" { c_mark_varargs (); if (pedantic) pedwarn ("ANSI C does not permit use of `varargs.h'"); ; break;} case 105: -#line 757 "c-parse.y" +#line 768 "c-parse.y" { ; break;} case 110: -#line 773 "c-parse.y" +#line 784 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 111: -#line 778 "c-parse.y" +#line 789 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 112: -#line 783 "c-parse.y" +#line 794 "c-parse.y" { shadow_tag_warned (yyvsp[-1].ttype, 1); pedwarn ("empty declaration"); ; break;} case 113: -#line 786 "c-parse.y" +#line 797 "c-parse.y" { pedwarn ("empty declaration"); ; break;} case 114: -#line 795 "c-parse.y" +#line 806 "c-parse.y" { ; break;} case 119: -#line 810 "c-parse.y" +#line 821 "c-parse.y" { yyval.itype = suspend_momentary (); pending_xref_error (); declspec_stack = tree_cons (prefix_attributes, @@ -2414,131 +2423,131 @@ case 119: ¤t_declspecs, &prefix_attributes); ; break;} case 120: -#line 821 "c-parse.y" +#line 832 "c-parse.y" { prefix_attributes = chainon (prefix_attributes, yyvsp[0].ttype); ; break;} case 121: -#line 826 "c-parse.y" +#line 837 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 122: -#line 831 "c-parse.y" +#line 842 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 123: -#line 836 "c-parse.y" +#line 847 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-1].itype); ; break;} case 124: -#line 841 "c-parse.y" +#line 852 "c-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-1].itype); ; break;} case 125: -#line 846 "c-parse.y" +#line 857 "c-parse.y" { shadow_tag (yyvsp[-1].ttype); ; break;} case 126: -#line 848 "c-parse.y" +#line 859 "c-parse.y" { pedwarn ("empty declaration"); ; break;} case 127: -#line 850 "c-parse.y" -{ pedantic = yyvsp[-1].itype; ; +#line 861 "c-parse.y" +{ RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 128: -#line 860 "c-parse.y" +#line 871 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 129: -#line 862 "c-parse.y" +#line 873 "c-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ; break;} case 130: -#line 866 "c-parse.y" +#line 877 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 131: -#line 868 "c-parse.y" +#line 879 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 132: -#line 870 "c-parse.y" +#line 881 "c-parse.y" { if (extra_warnings) warning ("`%s' is not at beginning of declaration", IDENTIFIER_POINTER (yyvsp[0].ttype)); yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 133: -#line 875 "c-parse.y" +#line 886 "c-parse.y" { yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, yyvsp[-1].ttype); ; break;} case 134: -#line 880 "c-parse.y" +#line 891 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 135: -#line 882 "c-parse.y" +#line 893 "c-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ; break;} case 136: -#line 887 "c-parse.y" +#line 898 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 137: -#line 889 "c-parse.y" +#line 900 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 138: -#line 891 "c-parse.y" +#line 902 "c-parse.y" { if (extra_warnings) warning ("`%s' is not at beginning of declaration", IDENTIFIER_POINTER (yyvsp[0].ttype)); yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 139: -#line 904 "c-parse.y" +#line 915 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 140: -#line 906 "c-parse.y" +#line 917 "c-parse.y" { yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, NULL_TREE); ; break;} case 141: -#line 908 "c-parse.y" +#line 919 "c-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 142: -#line 910 "c-parse.y" +#line 921 "c-parse.y" { yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, yyvsp[-1].ttype); ; break;} case 143: -#line 915 "c-parse.y" +#line 926 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); TREE_STATIC (yyval.ttype) = 1; ; break;} case 144: -#line 918 "c-parse.y" +#line 929 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 145: -#line 920 "c-parse.y" +#line 931 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); TREE_STATIC (yyval.ttype) = 1; ; break;} case 146: -#line 923 "c-parse.y" +#line 934 "c-parse.y" { if (extra_warnings && TREE_STATIC (yyvsp[-1].ttype)) warning ("`%s' is not at beginning of declaration", IDENTIFIER_POINTER (yyvsp[0].ttype)); @@ -2546,138 +2555,138 @@ case 146: TREE_STATIC (yyval.ttype) = TREE_STATIC (yyvsp[-1].ttype); ; break;} case 147: -#line 937 "c-parse.y" +#line 948 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 148: -#line 939 "c-parse.y" +#line 950 "c-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ; break;} case 149: -#line 943 "c-parse.y" +#line 954 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 150: -#line 945 "c-parse.y" +#line 956 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 153: -#line 955 "c-parse.y" +#line 966 "c-parse.y" { /* For a typedef name, record the meaning, not the name. In case of `foo foo, bar;'. */ yyval.ttype = lookup_name (yyvsp[0].ttype); ; break;} case 154: -#line 959 "c-parse.y" +#line 970 "c-parse.y" { yyval.ttype = TREE_TYPE (yyvsp[-1].ttype); ; break;} case 155: -#line 961 "c-parse.y" +#line 972 "c-parse.y" { yyval.ttype = groktypename (yyvsp[-1].ttype); ; break;} case 163: -#line 983 "c-parse.y" +#line 994 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 164: -#line 985 "c-parse.y" +#line 996 "c-parse.y" { if (TREE_CHAIN (yyvsp[-1].ttype)) yyvsp[-1].ttype = combine_strings (yyvsp[-1].ttype); yyval.ttype = yyvsp[-1].ttype; ; break;} case 165: -#line 992 "c-parse.y" +#line 1003 "c-parse.y" { yyval.ttype = start_decl (yyvsp[-3].ttype, current_declspecs, 1, yyvsp[-1].ttype, prefix_attributes); start_init (yyval.ttype, yyvsp[-2].ttype, global_bindings_p ()); ; break;} case 166: -#line 997 "c-parse.y" +#line 1008 "c-parse.y" { finish_init (); finish_decl (yyvsp[-1].ttype, yyvsp[0].ttype, yyvsp[-4].ttype); ; break;} case 167: -#line 1000 "c-parse.y" +#line 1011 "c-parse.y" { tree d = start_decl (yyvsp[-2].ttype, current_declspecs, 0, yyvsp[0].ttype, prefix_attributes); finish_decl (d, NULL_TREE, yyvsp[-1].ttype); ; break;} case 168: -#line 1008 "c-parse.y" +#line 1019 "c-parse.y" { yyval.ttype = start_decl (yyvsp[-3].ttype, current_declspecs, 1, yyvsp[-1].ttype, prefix_attributes); start_init (yyval.ttype, yyvsp[-2].ttype, global_bindings_p ()); ; break;} case 169: -#line 1013 "c-parse.y" +#line 1024 "c-parse.y" { finish_init (); decl_attributes (yyvsp[-1].ttype, yyvsp[-3].ttype, prefix_attributes); finish_decl (yyvsp[-1].ttype, yyvsp[0].ttype, yyvsp[-4].ttype); ; break;} case 170: -#line 1017 "c-parse.y" +#line 1028 "c-parse.y" { tree d = start_decl (yyvsp[-2].ttype, current_declspecs, 0, yyvsp[0].ttype, prefix_attributes); finish_decl (d, NULL_TREE, yyvsp[-1].ttype); ; break;} case 171: -#line 1025 "c-parse.y" +#line 1036 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 172: -#line 1027 "c-parse.y" +#line 1038 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 173: -#line 1032 "c-parse.y" +#line 1043 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 174: -#line 1034 "c-parse.y" +#line 1045 "c-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 175: -#line 1039 "c-parse.y" +#line 1050 "c-parse.y" { yyval.ttype = yyvsp[-2].ttype; ; break;} case 176: -#line 1044 "c-parse.y" +#line 1055 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 177: -#line 1046 "c-parse.y" +#line 1057 "c-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 178: -#line 1051 "c-parse.y" +#line 1062 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 179: -#line 1053 "c-parse.y" +#line 1064 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[0].ttype, NULL_TREE); ; break;} case 180: -#line 1055 "c-parse.y" +#line 1066 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, build_tree_list (NULL_TREE, yyvsp[-1].ttype)); ; break;} case 181: -#line 1057 "c-parse.y" +#line 1068 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[-5].ttype, tree_cons (NULL_TREE, yyvsp[-3].ttype, yyvsp[-1].ttype)); ; break;} case 182: -#line 1059 "c-parse.y" +#line 1070 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 188: -#line 1077 "c-parse.y" +#line 1088 "c-parse.y" { really_start_incremental_init (NULL_TREE); /* Note that the call to clear_momentary is in process_init_element. */ push_momentary (); ; break;} case 189: -#line 1082 "c-parse.y" +#line 1093 "c-parse.y" { yyval.ttype = pop_init_level (0); if (yyval.ttype == error_mark_node && ! (yychar == STRING || yychar == CONSTANT)) @@ -2686,44 +2695,44 @@ case 189: pop_momentary_nofree (); ; break;} case 190: -#line 1090 "c-parse.y" +#line 1101 "c-parse.y" { yyval.ttype = error_mark_node; ; break;} case 191: -#line 1096 "c-parse.y" +#line 1107 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids empty initializer braces"); ; break;} case 197: -#line 1112 "c-parse.y" +#line 1123 "c-parse.y" { set_init_label (yyvsp[-1].ttype); ; break;} case 200: -#line 1119 "c-parse.y" +#line 1130 "c-parse.y" { push_init_level (0); ; break;} case 201: -#line 1121 "c-parse.y" +#line 1132 "c-parse.y" { process_init_element (pop_init_level (0)); ; break;} case 202: -#line 1123 "c-parse.y" +#line 1134 "c-parse.y" { process_init_element (yyvsp[0].ttype); ; break;} case 206: -#line 1134 "c-parse.y" +#line 1145 "c-parse.y" { set_init_label (yyvsp[0].ttype); ; break;} case 207: -#line 1139 "c-parse.y" +#line 1150 "c-parse.y" { set_init_index (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 208: -#line 1141 "c-parse.y" +#line 1152 "c-parse.y" { set_init_index (yyvsp[-1].ttype, NULL_TREE); ; break;} case 209: -#line 1146 "c-parse.y" +#line 1157 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids nested functions"); @@ -2737,16 +2746,16 @@ case 209: reinit_parse_for_function (); ; break;} case 210: -#line 1158 "c-parse.y" +#line 1169 "c-parse.y" { store_parm_decls (); ; break;} case 211: -#line 1166 "c-parse.y" +#line 1177 "c-parse.y" { finish_function (1); pop_function_context (); ; break;} case 212: -#line 1172 "c-parse.y" +#line 1183 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids nested functions"); @@ -2760,225 +2769,210 @@ case 212: reinit_parse_for_function (); ; break;} case 213: -#line 1184 "c-parse.y" +#line 1195 "c-parse.y" { store_parm_decls (); ; break;} case 214: -#line 1192 "c-parse.y" +#line 1203 "c-parse.y" { finish_function (1); pop_function_context (); ; break;} case 217: -#line 1208 "c-parse.y" +#line 1219 "c-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 218: -#line 1210 "c-parse.y" +#line 1221 "c-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 219: -#line 1215 "c-parse.y" +#line 1226 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 220: -#line 1217 "c-parse.y" +#line 1228 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 221: -#line 1219 "c-parse.y" +#line 1230 "c-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 222: -#line 1226 "c-parse.y" +#line 1237 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 224: -#line 1237 "c-parse.y" +#line 1248 "c-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 225: -#line 1242 "c-parse.y" +#line 1253 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, NULL_TREE); if (! flag_isoc9x) error ("`[*]' in parameter declaration only allowed in ISO C 9x"); ; break;} case 226: -#line 1247 "c-parse.y" +#line 1258 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 227: -#line 1249 "c-parse.y" +#line 1260 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 228: -#line 1251 "c-parse.y" +#line 1262 "c-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 229: -#line 1258 "c-parse.y" +#line 1269 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 231: -#line 1267 "c-parse.y" +#line 1278 "c-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 232: -#line 1272 "c-parse.y" +#line 1283 "c-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 233: -#line 1274 "c-parse.y" +#line 1285 "c-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 234: -#line 1276 "c-parse.y" +#line 1287 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, NULL_TREE); if (! flag_isoc9x) error ("`[*]' in parameter declaration only allowed in ISO C 9x"); ; break;} case 235: -#line 1281 "c-parse.y" +#line 1292 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 236: -#line 1283 "c-parse.y" +#line 1294 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 237: -#line 1290 "c-parse.y" +#line 1301 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 239: -#line 1296 "c-parse.y" +#line 1307 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 240: -#line 1298 "c-parse.y" +#line 1309 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 241: -#line 1303 "c-parse.y" +#line 1314 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 242: -#line 1305 "c-parse.y" +#line 1316 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 243: -#line 1310 "c-parse.y" +#line 1321 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 244: -#line 1312 "c-parse.y" +#line 1323 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 245: -#line 1317 "c-parse.y" +#line 1328 "c-parse.y" { yyval.ttype = start_struct (RECORD_TYPE, yyvsp[-1].ttype); /* Start scope of tag before parsing components. */ ; break;} case 246: -#line 1321 "c-parse.y" +#line 1332 "c-parse.y" { yyval.ttype = finish_struct (yyvsp[-3].ttype, yyvsp[-2].ttype, chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); ; break;} case 247: -#line 1323 "c-parse.y" +#line 1334 "c-parse.y" { yyval.ttype = finish_struct (start_struct (RECORD_TYPE, NULL_TREE), yyvsp[-2].ttype, chainon (yyvsp[-4].ttype, yyvsp[0].ttype)); ; break;} case 248: -#line 1327 "c-parse.y" +#line 1338 "c-parse.y" { yyval.ttype = xref_tag (RECORD_TYPE, yyvsp[0].ttype); ; break;} case 249: -#line 1329 "c-parse.y" +#line 1340 "c-parse.y" { yyval.ttype = start_struct (UNION_TYPE, yyvsp[-1].ttype); ; break;} case 250: -#line 1331 "c-parse.y" +#line 1342 "c-parse.y" { yyval.ttype = finish_struct (yyvsp[-3].ttype, yyvsp[-2].ttype, chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); ; break;} case 251: -#line 1333 "c-parse.y" +#line 1344 "c-parse.y" { yyval.ttype = finish_struct (start_struct (UNION_TYPE, NULL_TREE), yyvsp[-2].ttype, chainon (yyvsp[-4].ttype, yyvsp[0].ttype)); ; break;} case 252: -#line 1337 "c-parse.y" +#line 1348 "c-parse.y" { yyval.ttype = xref_tag (UNION_TYPE, yyvsp[0].ttype); ; break;} case 253: -#line 1339 "c-parse.y" +#line 1350 "c-parse.y" { yyvsp[0].itype = suspend_momentary (); yyval.ttype = start_enum (yyvsp[-1].ttype); ; break;} case 254: -#line 1342 "c-parse.y" +#line 1353 "c-parse.y" { yyval.ttype= finish_enum (yyvsp[-4].ttype, nreverse (yyvsp[-3].ttype), chainon (yyvsp[-7].ttype, yyvsp[0].ttype)); resume_momentary (yyvsp[-5].itype); ; break;} case 255: -#line 1345 "c-parse.y" +#line 1356 "c-parse.y" { yyvsp[0].itype = suspend_momentary (); yyval.ttype = start_enum (NULL_TREE); ; break;} case 256: -#line 1348 "c-parse.y" +#line 1359 "c-parse.y" { yyval.ttype= finish_enum (yyvsp[-4].ttype, nreverse (yyvsp[-3].ttype), chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); resume_momentary (yyvsp[-5].itype); ; break;} case 257: -#line 1351 "c-parse.y" +#line 1362 "c-parse.y" { yyval.ttype = xref_tag (ENUMERAL_TYPE, yyvsp[0].ttype); ; break;} case 261: -#line 1362 "c-parse.y" +#line 1373 "c-parse.y" { if (pedantic && ! flag_isoc9x) pedwarn ("comma at end of enumerator list"); ; break;} case 262: -#line 1368 "c-parse.y" +#line 1379 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 263: -#line 1370 "c-parse.y" +#line 1381 "c-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); pedwarn ("no semicolon at end of struct or union"); ; break;} case 264: -#line 1375 "c-parse.y" +#line 1386 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 265: -#line 1377 "c-parse.y" +#line 1388 "c-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[-1].ttype); ; break;} case 266: -#line 1379 "c-parse.y" +#line 1390 "c-parse.y" { if (pedantic) pedwarn ("extra semicolon in struct or union specified"); ; break;} case 267: -#line 1394 "c-parse.y" -{ yyval.ttype = yyvsp[0].ttype; - current_declspecs = TREE_VALUE (declspec_stack); - prefix_attributes = TREE_PURPOSE (declspec_stack); - declspec_stack = TREE_CHAIN (declspec_stack); - resume_momentary (yyvsp[-1].itype); ; - break;} -case 268: -#line 1400 "c-parse.y" -{ if (pedantic) - pedwarn ("ANSI C forbids member declarations with no members"); - shadow_tag(yyvsp[0].ttype); - yyval.ttype = NULL_TREE; ; - break;} -case 269: #line 1405 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; current_declspecs = TREE_VALUE (declspec_stack); @@ -2986,145 +2980,160 @@ case 269: declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-1].itype); ; break;} -case 270: +case 268: #line 1411 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids member declarations with no members"); shadow_tag(yyvsp[0].ttype); yyval.ttype = NULL_TREE; ; break;} -case 271: +case 269: #line 1416 "c-parse.y" +{ yyval.ttype = yyvsp[0].ttype; + current_declspecs = TREE_VALUE (declspec_stack); + prefix_attributes = TREE_PURPOSE (declspec_stack); + declspec_stack = TREE_CHAIN (declspec_stack); + resume_momentary (yyvsp[-1].itype); ; + break;} +case 270: +#line 1422 "c-parse.y" +{ if (pedantic) + pedwarn ("ANSI C forbids member declarations with no members"); + shadow_tag(yyvsp[0].ttype); + yyval.ttype = NULL_TREE; ; + break;} +case 271: +#line 1427 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 272: -#line 1418 "c-parse.y" +#line 1429 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; - pedantic = yyvsp[-1].itype; ; + RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 274: -#line 1425 "c-parse.y" +#line 1436 "c-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 275: -#line 1430 "c-parse.y" +#line 1441 "c-parse.y" { yyval.ttype = grokfield (yyvsp[-3].filename, yyvsp[-2].lineno, yyvsp[-1].ttype, current_declspecs, NULL_TREE); decl_attributes (yyval.ttype, yyvsp[0].ttype, prefix_attributes); ; break;} case 276: -#line 1434 "c-parse.y" +#line 1445 "c-parse.y" { yyval.ttype = grokfield (yyvsp[-5].filename, yyvsp[-4].lineno, yyvsp[-3].ttype, current_declspecs, yyvsp[-1].ttype); decl_attributes (yyval.ttype, yyvsp[0].ttype, prefix_attributes); ; break;} case 277: -#line 1437 "c-parse.y" +#line 1448 "c-parse.y" { yyval.ttype = grokfield (yyvsp[-4].filename, yyvsp[-3].lineno, NULL_TREE, current_declspecs, yyvsp[-1].ttype); decl_attributes (yyval.ttype, yyvsp[0].ttype, prefix_attributes); ; break;} case 279: -#line 1449 "c-parse.y" +#line 1460 "c-parse.y" { if (yyvsp[-2].ttype == error_mark_node) yyval.ttype = yyvsp[-2].ttype; else yyval.ttype = chainon (yyvsp[0].ttype, yyvsp[-2].ttype); ; break;} case 280: -#line 1454 "c-parse.y" +#line 1465 "c-parse.y" { yyval.ttype = error_mark_node; ; break;} case 281: -#line 1460 "c-parse.y" +#line 1471 "c-parse.y" { yyval.ttype = build_enumerator (yyvsp[0].ttype, NULL_TREE); ; break;} case 282: -#line 1462 "c-parse.y" +#line 1473 "c-parse.y" { yyval.ttype = build_enumerator (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 283: -#line 1467 "c-parse.y" +#line 1478 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 284: -#line 1469 "c-parse.y" +#line 1480 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 285: -#line 1474 "c-parse.y" +#line 1485 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 287: -#line 1480 "c-parse.y" +#line 1491 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 288: -#line 1482 "c-parse.y" +#line 1493 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 289: -#line 1487 "c-parse.y" +#line 1498 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 290: -#line 1489 "c-parse.y" +#line 1500 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 291: -#line 1494 "c-parse.y" +#line 1505 "c-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 292: -#line 1497 "c-parse.y" +#line 1508 "c-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 293: -#line 1499 "c-parse.y" +#line 1510 "c-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[0].ttype, NULL_TREE); ; break;} case 294: -#line 1501 "c-parse.y" +#line 1512 "c-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 295: -#line 1503 "c-parse.y" +#line 1514 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 296: -#line 1505 "c-parse.y" +#line 1516 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 297: -#line 1507 "c-parse.y" +#line 1518 "c-parse.y" { yyval.ttype = build_nt (CALL_EXPR, NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 298: -#line 1509 "c-parse.y" +#line 1520 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, NULL_TREE, yyvsp[-1].ttype); ; break;} case 299: -#line 1511 "c-parse.y" +#line 1522 "c-parse.y" { yyval.ttype = build_nt (ARRAY_REF, NULL_TREE, NULL_TREE); ; break;} case 300: -#line 1515 "c-parse.y" +#line 1526 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 301: -#line 1524 "c-parse.y" +#line 1535 "c-parse.y" { if (pedantic && yyvsp[0].ends_in_label) pedwarn ("ANSI C forbids label at end of compound statement"); ; break;} case 303: -#line 1533 "c-parse.y" +#line 1544 "c-parse.y" { yyval.ends_in_label = yyvsp[0].ends_in_label; ; break;} case 304: -#line 1535 "c-parse.y" +#line 1546 "c-parse.y" { yyval.ends_in_label = 0; ; break;} case 308: -#line 1547 "c-parse.y" +#line 1558 "c-parse.y" { emit_line_note (input_filename, lineno); pushlevel (0); clear_last_expr (); @@ -3133,12 +3142,12 @@ case 308: ; break;} case 310: -#line 1560 "c-parse.y" +#line 1571 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids label declarations"); ; break;} case 313: -#line 1571 "c-parse.y" +#line 1582 "c-parse.y" { tree link; for (link = yyvsp[-1].ttype; link; link = TREE_CHAIN (link)) { @@ -3149,19 +3158,19 @@ case 313: ; break;} case 314: -#line 1585 "c-parse.y" +#line 1596 "c-parse.y" {; break;} case 316: -#line 1589 "c-parse.y" +#line 1600 "c-parse.y" { compstmt_count++; ; break;} case 317: -#line 1592 "c-parse.y" +#line 1603 "c-parse.y" { yyval.ttype = convert (void_type_node, integer_zero_node); ; break;} case 318: -#line 1594 "c-parse.y" +#line 1605 "c-parse.y" { emit_line_note (input_filename, lineno); expand_end_bindings (getdecls (), 1, 0); yyval.ttype = poplevel (1, 1, 0); @@ -3171,7 +3180,7 @@ case 318: pop_momentary (); ; break;} case 319: -#line 1602 "c-parse.y" +#line 1613 "c-parse.y" { emit_line_note (input_filename, lineno); expand_end_bindings (getdecls (), kept_level_p (), 0); yyval.ttype = poplevel (kept_level_p (), 0, 0); @@ -3181,7 +3190,7 @@ case 319: pop_momentary (); ; break;} case 320: -#line 1610 "c-parse.y" +#line 1621 "c-parse.y" { emit_line_note (input_filename, lineno); expand_end_bindings (getdecls (), kept_level_p (), 0); yyval.ttype = poplevel (kept_level_p (), 0, 0); @@ -3191,7 +3200,7 @@ case 320: pop_momentary (); ; break;} case 321: -#line 1621 "c-parse.y" +#line 1632 "c-parse.y" { if (current_function_decl == 0) { error ("braced-group within expression allowed only inside a function"); @@ -3209,11 +3218,11 @@ case 321: ; break;} case 322: -#line 1638 "c-parse.y" +#line 1649 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 325: -#line 1652 "c-parse.y" +#line 1663 "c-parse.y" { emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno); c_expand_start_cond (truthvalue_conversion (yyvsp[-1].ttype), 0, compstmt_count); @@ -3223,7 +3232,7 @@ case 325: position_after_white_space (); ; break;} case 326: -#line 1666 "c-parse.y" +#line 1677 "c-parse.y" { stmt_count++; compstmt_count++; emit_line_note (yyvsp[-2].filename, yyvsp[-1].lineno); @@ -3233,43 +3242,43 @@ case 326: position_after_white_space (); ; break;} case 327: -#line 1674 "c-parse.y" +#line 1685 "c-parse.y" { expand_loop_continue_here (); ; break;} case 328: -#line 1678 "c-parse.y" +#line 1689 "c-parse.y" { yyval.filename = input_filename; ; break;} case 329: -#line 1682 "c-parse.y" +#line 1693 "c-parse.y" { yyval.lineno = lineno; ; break;} case 330: -#line 1687 "c-parse.y" +#line 1698 "c-parse.y" { ; break;} case 331: -#line 1692 "c-parse.y" +#line 1703 "c-parse.y" { ; break;} case 332: -#line 1697 "c-parse.y" +#line 1708 "c-parse.y" { yyval.ends_in_label = yyvsp[0].ends_in_label; ; break;} case 333: -#line 1702 "c-parse.y" +#line 1713 "c-parse.y" { yyval.ends_in_label = 0; ; break;} case 334: -#line 1704 "c-parse.y" +#line 1715 "c-parse.y" { yyval.ends_in_label = 1; ; break;} case 335: -#line 1710 "c-parse.y" +#line 1721 "c-parse.y" { stmt_count++; ; break;} case 337: -#line 1713 "c-parse.y" +#line 1724 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); /* It appears that this should not be done--that a non-lvalue array @@ -3288,19 +3297,19 @@ case 337: clear_momentary (); ; break;} case 338: -#line 1730 "c-parse.y" +#line 1741 "c-parse.y" { c_expand_start_else (); yyvsp[-1].itype = stmt_count; position_after_white_space (); ; break;} case 339: -#line 1734 "c-parse.y" +#line 1745 "c-parse.y" { c_expand_end_cond (); if (extra_warnings && stmt_count == yyvsp[-3].itype) warning ("empty body in an else-statement"); ; break;} case 340: -#line 1738 "c-parse.y" +#line 1749 "c-parse.y" { c_expand_end_cond (); /* This warning is here instead of in simple_if, because we do not want a warning if an empty if is followed by an @@ -3311,11 +3320,11 @@ case 340: "empty body in an if-statement"); ; break;} case 341: -#line 1750 "c-parse.y" +#line 1761 "c-parse.y" { c_expand_end_cond (); ; break;} case 342: -#line 1752 "c-parse.y" +#line 1763 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-2].filename, yyvsp[-1].lineno); /* The emit_nop used to come before emit_line_note, @@ -3327,7 +3336,7 @@ case 342: emit_nop (); ; break;} case 343: -#line 1762 "c-parse.y" +#line 1773 "c-parse.y" { /* Don't start the loop till we have succeeded in parsing the end test. This is to make sure that we end every loop we start. */ @@ -3338,11 +3347,11 @@ case 343: position_after_white_space (); ; break;} case 344: -#line 1771 "c-parse.y" +#line 1782 "c-parse.y" { expand_end_loop (); ; break;} case 345: -#line 1774 "c-parse.y" +#line 1785 "c-parse.y" { emit_line_note (input_filename, lineno); expand_exit_loop_if_false (NULL_PTR, truthvalue_conversion (yyvsp[-2].ttype)); @@ -3350,12 +3359,12 @@ case 345: clear_momentary (); ; break;} case 346: -#line 1781 "c-parse.y" +#line 1792 "c-parse.y" { expand_end_loop (); clear_momentary (); ; break;} case 347: -#line 1785 "c-parse.y" +#line 1796 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno); /* See comment in `while' alternative, above. */ @@ -3368,12 +3377,12 @@ case 347: ; break;} case 348: -#line 1797 "c-parse.y" +#line 1808 "c-parse.y" { yyvsp[0].lineno = lineno; yyval.filename = input_filename; ; break;} case 349: -#line 1800 "c-parse.y" +#line 1811 "c-parse.y" { /* Start the loop. Doing this after parsing all the expressions ensures we will end the loop. */ @@ -3391,7 +3400,7 @@ case 349: position_after_white_space (); ; break;} case 350: -#line 1816 "c-parse.y" +#line 1827 "c-parse.y" { /* Emit the increment expression, with a line number. */ emit_line_note (yyvsp[-4].filename, yyvsp[-5].lineno); expand_loop_continue_here (); @@ -3404,7 +3413,7 @@ case 350: expand_end_loop (); ; break;} case 351: -#line 1827 "c-parse.y" +#line 1838 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno); c_expand_start_case (yyvsp[-1].ttype); @@ -3414,7 +3423,7 @@ case 351: position_after_white_space (); ; break;} case 352: -#line 1835 "c-parse.y" +#line 1846 "c-parse.y" { expand_end_case (yyvsp[-3].ttype); if (yychar == CONSTANT || yychar == STRING) pop_momentary_nofree (); @@ -3422,33 +3431,33 @@ case 352: pop_momentary (); ; break;} case 353: -#line 1841 "c-parse.y" +#line 1852 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); if ( ! expand_exit_something ()) error ("break statement not within loop or switch"); ; break;} case 354: -#line 1846 "c-parse.y" +#line 1857 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); if (! expand_continue_loop (NULL_PTR)) error ("continue statement not within a loop"); ; break;} case 355: -#line 1851 "c-parse.y" +#line 1862 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); c_expand_return (NULL_TREE); ; break;} case 356: -#line 1855 "c-parse.y" +#line 1866 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-4].filename, yyvsp[-3].lineno); c_expand_return (yyvsp[-1].ttype); ; break;} case 357: -#line 1859 "c-parse.y" +#line 1870 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-7].filename, yyvsp[-6].lineno); STRIP_NOPS (yyvsp[-2].ttype); @@ -3460,7 +3469,7 @@ case 357: error ("argument of `asm' is not a constant string"); ; break;} case 358: -#line 1870 "c-parse.y" +#line 1881 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-9].filename, yyvsp[-8].lineno); c_expand_asm_operands (yyvsp[-4].ttype, yyvsp[-2].ttype, NULL_TREE, NULL_TREE, @@ -3468,7 +3477,7 @@ case 358: input_filename, lineno); ; break;} case 359: -#line 1877 "c-parse.y" +#line 1888 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-11].filename, yyvsp[-10].lineno); c_expand_asm_operands (yyvsp[-6].ttype, yyvsp[-4].ttype, yyvsp[-2].ttype, NULL_TREE, @@ -3476,7 +3485,7 @@ case 359: input_filename, lineno); ; break;} case 360: -#line 1885 "c-parse.y" +#line 1896 "c-parse.y" { stmt_count++; emit_line_note (yyvsp[-13].filename, yyvsp[-12].lineno); c_expand_asm_operands (yyvsp[-8].ttype, yyvsp[-6].ttype, yyvsp[-4].ttype, yyvsp[-2].ttype, @@ -3484,7 +3493,7 @@ case 360: input_filename, lineno); ; break;} case 361: -#line 1891 "c-parse.y" +#line 1902 "c-parse.y" { tree decl; stmt_count++; emit_line_note (yyvsp[-4].filename, yyvsp[-3].lineno); @@ -3497,7 +3506,7 @@ case 361: ; break;} case 362: -#line 1902 "c-parse.y" +#line 1913 "c-parse.y" { if (pedantic) pedwarn ("ANSI C forbids `goto *expr;'"); stmt_count++; @@ -3505,7 +3514,7 @@ case 362: expand_computed_goto (convert (ptr_type_node, yyvsp[-1].ttype)); ; break;} case 365: -#line 1917 "c-parse.y" +#line 1928 "c-parse.y" { /* The value returned by this action is */ /* 1 if everything is OK */ @@ -3528,14 +3537,14 @@ case 365: ; break;} case 366: -#line 1938 "c-parse.y" +#line 1949 "c-parse.y" { if (yyvsp[-1].itype) iterator_for_loop_end (yyvsp[-3].ttype); ; break;} case 367: -#line 1973 "c-parse.y" +#line 1984 "c-parse.y" { register tree value = check_case_value (yyvsp[-1].ttype); register tree label = build_decl (LABEL_DECL, NULL_TREE, NULL_TREE); @@ -3568,7 +3577,7 @@ case 367: position_after_white_space (); ; break;} case 368: -#line 2004 "c-parse.y" +#line 2015 "c-parse.y" { register tree value1 = check_case_value (yyvsp[-3].ttype); register tree value2 = check_case_value (yyvsp[-1].ttype); register tree label @@ -3601,7 +3610,7 @@ case 368: position_after_white_space (); ; break;} case 369: -#line 2035 "c-parse.y" +#line 2046 "c-parse.y" { tree duplicate; register tree label @@ -3618,7 +3627,7 @@ case 369: position_after_white_space (); ; break;} case 370: -#line 2050 "c-parse.y" +#line 2061 "c-parse.y" { tree label = define_label (input_filename, lineno, yyvsp[-2].ttype); stmt_count++; emit_nop (); @@ -3630,52 +3639,52 @@ case 370: position_after_white_space (); ; break;} case 371: -#line 2065 "c-parse.y" +#line 2076 "c-parse.y" { emit_line_note (input_filename, lineno); yyval.ttype = NULL_TREE; ; break;} case 372: -#line 2068 "c-parse.y" +#line 2079 "c-parse.y" { emit_line_note (input_filename, lineno); ; break;} case 373: -#line 2073 "c-parse.y" +#line 2084 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 375: -#line 2080 "c-parse.y" +#line 2091 "c-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 378: -#line 2087 "c-parse.y" +#line 2098 "c-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 379: -#line 2092 "c-parse.y" +#line 2103 "c-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 380: -#line 2097 "c-parse.y" +#line 2108 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, combine_strings (yyvsp[0].ttype), NULL_TREE); ; break;} case 381: -#line 2099 "c-parse.y" +#line 2110 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, combine_strings (yyvsp[0].ttype), yyvsp[-2].ttype); ; break;} case 382: -#line 2105 "c-parse.y" +#line 2116 "c-parse.y" { pushlevel (0); clear_parm_order (); declare_parm_level (0); ; break;} case 383: -#line 2109 "c-parse.y" +#line 2120 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; parmlist_tags_warning (); poplevel (0, 0, 0); ; break;} case 385: -#line 2117 "c-parse.y" +#line 2128 "c-parse.y" { tree parm; if (pedantic) pedwarn ("ANSI C forbids forward parameter declarations"); @@ -3685,19 +3694,19 @@ case 385: clear_parm_order (); ; break;} case 386: -#line 2125 "c-parse.y" +#line 2136 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 387: -#line 2127 "c-parse.y" +#line 2138 "c-parse.y" { yyval.ttype = tree_cons (NULL_TREE, NULL_TREE, NULL_TREE); ; break;} case 388: -#line 2133 "c-parse.y" +#line 2144 "c-parse.y" { yyval.ttype = get_parm_info (0); ; break;} case 389: -#line 2135 "c-parse.y" +#line 2146 "c-parse.y" { yyval.ttype = get_parm_info (0); /* Gcc used to allow this as an extension. However, it does not work for all targets, and thus has been disabled. @@ -3709,23 +3718,23 @@ case 389: ; break;} case 390: -#line 2145 "c-parse.y" +#line 2156 "c-parse.y" { yyval.ttype = get_parm_info (1); ; break;} case 391: -#line 2147 "c-parse.y" +#line 2158 "c-parse.y" { yyval.ttype = get_parm_info (0); ; break;} case 392: -#line 2152 "c-parse.y" +#line 2163 "c-parse.y" { push_parm_decl (yyvsp[0].ttype); ; break;} case 393: -#line 2154 "c-parse.y" +#line 2165 "c-parse.y" { push_parm_decl (yyvsp[0].ttype); ; break;} case 394: -#line 2161 "c-parse.y" +#line 2172 "c-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -3736,7 +3745,7 @@ case 394: resume_momentary (yyvsp[-2].itype); ; break;} case 395: -#line 2170 "c-parse.y" +#line 2181 "c-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -3747,7 +3756,7 @@ case 395: resume_momentary (yyvsp[-2].itype); ; break;} case 396: -#line 2179 "c-parse.y" +#line 2190 "c-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -3758,7 +3767,7 @@ case 396: resume_momentary (yyvsp[-2].itype); ; break;} case 397: -#line 2188 "c-parse.y" +#line 2199 "c-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -3769,7 +3778,7 @@ case 397: resume_momentary (yyvsp[-2].itype); ; break;} case 398: -#line 2198 "c-parse.y" +#line 2209 "c-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -3780,19 +3789,19 @@ case 398: resume_momentary (yyvsp[-2].itype); ; break;} case 399: -#line 2212 "c-parse.y" +#line 2223 "c-parse.y" { pushlevel (0); clear_parm_order (); declare_parm_level (1); ; break;} case 400: -#line 2216 "c-parse.y" +#line 2227 "c-parse.y" { yyval.ttype = yyvsp[0].ttype; parmlist_tags_warning (); poplevel (0, 0, 0); ; break;} case 402: -#line 2224 "c-parse.y" +#line 2235 "c-parse.y" { tree t; for (t = yyvsp[-1].ttype; t; t = TREE_CHAIN (t)) if (TREE_VALUE (t) == NULL_TREE) @@ -3800,29 +3809,30 @@ case 402: yyval.ttype = tree_cons (NULL_TREE, NULL_TREE, yyvsp[-1].ttype); ; break;} case 403: -#line 2234 "c-parse.y" +#line 2245 "c-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 404: -#line 2236 "c-parse.y" +#line 2247 "c-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 405: -#line 2242 "c-parse.y" +#line 2253 "c-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 406: -#line 2244 "c-parse.y" +#line 2255 "c-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 407: -#line 2249 "c-parse.y" -{ yyval.itype = pedantic; - pedantic = 0; ; +#line 2260 "c-parse.y" +{ yyval.itype = SAVE_WARN_FLAGS(); + pedantic = 0; + warn_pointer_arith = 0; ; break;} } /* the action file gets copied in in place of this dollarsign */ -#line 498 "bison.simple" +#line 498 "/usr/cygnus/TBD-TBD/share/bison.simple" yyvsp -= yylen; yyssp -= yylen; @@ -4018,5 +4028,5 @@ yyerrhandle: yystate = yyn; goto yynewstate; } -#line 2253 "c-parse.y" +#line 2265 "c-parse.y" diff --git a/gcc/c-parse.in b/gcc/c-parse.in index d9bfcf26ac5..92b50cc22b3 100644 --- a/gcc/c-parse.in +++ b/gcc/c-parse.in @@ -185,6 +185,8 @@ end ifc %type parmlist_or_identifiers parmlist_or_identifiers_1 %type identifiers_or_typenames +%type extension + %type setspecs %type lineno_stmt_or_label lineno_stmt_or_labels stmt_or_label @@ -227,6 +229,15 @@ static tree declspec_stack; /* 1 if we explained undeclared var errors. */ static int undeclared_variable_notice; +/* For __extension__, save/restore the warning flags which are + controlled by __extension__. */ +#define SAVE_WARN_FLAGS() (pedantic | (warn_pointer_arith << 1)) +#define RESTORE_WARN_FLAGS(val) \ + do { \ + pedantic = val & 1; \ + warn_pointer_arith = (val >> 1) & 1; \ + } while (0) + ifobjc /* Objective-C specific information */ @@ -297,7 +308,7 @@ end ifobjc else error ("argument of `asm' is not a constant string"); } | extension extdef - { pedantic = $1; } + { RESTORE_WARN_FLAGS ($1); } ; datadef: @@ -438,7 +449,7 @@ unary_expr: /* __extension__ turns off -pedantic for following primary. */ | extension cast_expr %prec UNARY { $$ = $2; - pedantic = $1; } + RESTORE_WARN_FLAGS ($1); } | unop cast_expr %prec UNARY { $$ = build_unary_op ($1, $2, 0); overflow_warning ($$); } @@ -1002,7 +1013,7 @@ decl: | declmods ';' { pedwarn ("empty declaration"); } | extension decl - { pedantic = $1; } + { RESTORE_WARN_FLAGS ($1); } ; /* Declspecs which contain at least one type specifier or typedef name. @@ -1607,7 +1618,7 @@ component_decl: { $$ = NULL_TREE; } | extension component_decl { $$ = $2; - pedantic = $1; } + RESTORE_WARN_FLAGS ($1); } ; components: @@ -2441,8 +2452,9 @@ identifiers_or_typenames: extension: EXTENSION - { $$ = pedantic; - pedantic = 0; } + { $$ = SAVE_WARN_FLAGS(); + pedantic = 0; + warn_pointer_arith = 0; } ; ifobjc diff --git a/gcc/c-parse.y b/gcc/c-parse.y index 9736b283df1..7d4e2c69213 100644 --- a/gcc/c-parse.y +++ b/gcc/c-parse.y @@ -173,6 +173,8 @@ const char * const language_string = "GNU C"; %type parmlist_or_identifiers parmlist_or_identifiers_1 %type identifiers_or_typenames +%type extension + %type setspecs %type lineno_stmt_or_label lineno_stmt_or_labels stmt_or_label @@ -202,6 +204,15 @@ static tree declspec_stack; /* 1 if we explained undeclared var errors. */ static int undeclared_variable_notice; +/* For __extension__, save/restore the warning flags which are + controlled by __extension__. */ +#define SAVE_WARN_FLAGS() (pedantic | (warn_pointer_arith << 1)) +#define RESTORE_WARN_FLAGS(val) \ + do { \ + pedantic = val & 1; \ + warn_pointer_arith = (val >> 1) & 1; \ + } while (0) + /* Tell yyparse how to print a token's value, if yydebug is set. */ @@ -256,7 +267,7 @@ extdef: else error ("argument of `asm' is not a constant string"); } | extension extdef - { pedantic = $1; } + { RESTORE_WARN_FLAGS ($1); } ; datadef: @@ -393,7 +404,7 @@ unary_expr: /* __extension__ turns off -pedantic for following primary. */ | extension cast_expr %prec UNARY { $$ = $2; - pedantic = $1; } + RESTORE_WARN_FLAGS ($1); } | unop cast_expr %prec UNARY { $$ = build_unary_op ($1, $2, 0); overflow_warning ($$); } @@ -847,7 +858,7 @@ decl: | declmods ';' { pedwarn ("empty declaration"); } | extension decl - { pedantic = $1; } + { RESTORE_WARN_FLAGS ($1); } ; /* Declspecs which contain at least one type specifier or typedef name. @@ -1416,7 +1427,7 @@ component_decl: { $$ = NULL_TREE; } | extension component_decl { $$ = $2; - pedantic = $1; } + RESTORE_WARN_FLAGS ($1); } ; components: @@ -2246,8 +2257,9 @@ identifiers_or_typenames: extension: EXTENSION - { $$ = pedantic; - pedantic = 0; } + { $$ = SAVE_WARN_FLAGS(); + pedantic = 0; + warn_pointer_arith = 0; } ; %% diff --git a/gcc/objc/objc-parse.c b/gcc/objc/objc-parse.c index aaaa344a9ac..f414ae665c5 100644 --- a/gcc/objc/objc-parse.c +++ b/gcc/objc/objc-parse.c @@ -100,7 +100,7 @@ const char * const language_string = "GNU Obj-C"; #line 65 "objc-parse.y" typedef union {long itype; tree ttype; enum tree_code code; char *filename; int lineno; int ends_in_label; } YYSTYPE; -#line 196 "objc-parse.y" +#line 198 "objc-parse.y" /* Number of statements (loosely speaking) and compound statements seen so far. */ @@ -122,6 +122,15 @@ static tree declspec_stack; /* 1 if we explained undeclared var errors. */ static int undeclared_variable_notice; +/* For __extension__, save/restore the warning flags which are + controlled by __extension__. */ +#define SAVE_WARN_FLAGS() (pedantic | (warn_pointer_arith << 1)) +#define RESTORE_WARN_FLAGS(val) \ + do { \ + pedantic = val & 1; \ + warn_pointer_arith = (val >> 1) & 1; \ + } while (0) + /* Objective-C specific information */ tree objc_interface_context; @@ -444,63 +453,63 @@ static const short yyrhs[] = { -1, #if YYDEBUG != 0 static const short yyrline[] = { 0, - 246, 251, 265, 267, 267, 268, 270, 272, 273, 274, - 282, 286, 297, 302, 307, 309, 311, 312, 313, 318, - 325, 327, 332, 337, 343, 345, 350, 355, 361, 363, - 368, 375, 377, 378, 379, 382, 384, 386, 388, 390, - 392, 394, 398, 402, 405, 408, 411, 415, 417, 420, - 423, 427, 455, 461, 464, 467, 470, 472, 474, 478, - 482, 486, 488, 491, 495, 522, 524, 526, 528, 530, - 532, 534, 536, 538, 540, 542, 544, 546, 548, 552, - 554, 558, 560, 563, 567, 569, 576, 579, 587, 598, - 758, 759, 761, 767, 769, 792, 801, 803, 805, 817, - 831, 833, 835, 837, 839, 841, 843, 848, 850, 856, - 858, 862, 864, 865, 875, 880, 882, 883, 884, 891, - 897, 902, 905, 913, 918, 920, 921, 922, 929, 940, - 944, 950, 955, 960, 965, 967, 969, 978, 981, 985, - 987, 989, 994, 998, 1001, 1005, 1008, 1010, 1022, 1025, - 1027, 1029, 1033, 1037, 1039, 1042, 1055, 1058, 1062, 1064, - 1072, 1073, 1074, 1078, 1080, 1085, 1087, 1089, 1095, 1096, - 1097, 1100, 1102, 1105, 1107, 1110, 1113, 1119, 1126, 1128, - 1135, 1142, 1145, 1152, 1155, 1159, 1162, 1166, 1171, 1174, - 1178, 1181, 1183, 1185, 1187, 1194, 1196, 1197, 1198, 1203, - 1205, 1210, 1218, 1223, 1227, 1230, 1232, 1237, 1239, 1240, - 1243, 1243, 1246, 1249, 1251, 1253, 1256, 1258, 1261, 1269, - 1283, 1291, 1295, 1309, 1317, 1324, 1326, 1331, 1334, 1339, - 1341, 1343, 1350, 1352, 1353, 1361, 1367, 1369, 1371, 1378, - 1380, 1386, 1392, 1394, 1396, 1398, 1405, 1407, 1410, 1413, - 1417, 1420, 1424, 1427, 1431, 1436, 1438, 1442, 1444, 1446, - 1448, 1452, 1454, 1457, 1460, 1463, 1466, 1470, 1472, 1475, - 1477, 1482, 1485, 1490, 1492, 1494, 1498, 1522, 1529, 1534, - 1540, 1545, 1547, 1552, 1554, 1558, 1562, 1566, 1576, 1578, - 1583, 1588, 1591, 1595, 1598, 1602, 1605, 1608, 1611, 1615, - 1618, 1622, 1626, 1628, 1630, 1632, 1634, 1636, 1638, 1640, - 1644, 1652, 1660, 1662, 1664, 1668, 1670, 1673, 1676, 1689, - 1691, 1696, 1698, 1701, 1715, 1718, 1721, 1723, 1725, 1733, - 1741, 1751, 1769, 1774, 1779, 1782, 1796, 1805, 1809, 1813, - 1817, 1823, 1827, 1832, 1835, 1840, 1843, 1844, 1861, 1866, - 1869, 1881, 1883, 1893, 1903, 1904, 1912, 1915, 1927, 1931, - 1948, 1958, 1967, 1972, 1977, 1982, 1986, 1990, 2001, 2008, - 2015, 2022, 2033, 2039, 2042, 2047, 2070, 2104, 2135, 2166, - 2181, 2195, 2199, 2203, 2206, 2211, 2213, 2216, 2218, 2222, - 2227, 2230, 2236, 2241, 2246, 2248, 2257, 2258, 2264, 2266, - 2276, 2278, 2282, 2285, 2291, 2301, 2310, 2319, 2329, 2343, - 2348, 2353, 2355, 2364, 2367, 2372, 2375, 2379, 2387, 2389, - 2390, 2391, 2392, 2393, 2407, 2410, 2414, 2420, 2426, 2433, - 2438, 2444, 2451, 2457, 2463, 2468, 2474, 2481, 2487, 2493, - 2499, 2507, 2513, 2519, 2527, 2534, 2540, 2549, 2556, 2564, - 2569, 2572, 2582, 2584, 2587, 2589, 2590, 2593, 2598, 2599, - 2616, 2623, 2629, 2633, 2636, 2637, 2640, 2648, 2654, 2663, - 2673, 2680, 2684, 2689, 2698, 2705, 2709, 2719, 2721, 2722, - 2724, 2726, 2727, 2728, 2729, 2731, 2733, 2736, 2744, 2751, - 2751, 2758, 2764, 2766, 2772, 2777, 2782, 2791, 2793, 2799, - 2801, 2804, 2806, 2807, 2808, 2811, 2817, 2819, 2823, 2826, - 2833, 2839, 2844, 2851, 2856, 2861, 2866, 2873, 2877, 2880, - 2886, 2888, 2889, 2890, 2893, 2895, 2896, 2897, 2898, 2899, - 2900, 2901, 2902, 2903, 2904, 2905, 2906, 2907, 2908, 2909, - 2910, 2911, 2912, 2913, 2913, 2916, 2922, 2927, 2932, 2938, - 2940, 2943, 2945, 2952, 2964, 2969, 2975, 2977, 2983, 2987, - 2988, 2994, 2996, 2999, 3001, 3007, 3012, 3018, 3025, 3034 + 257, 262, 276, 278, 278, 279, 281, 283, 284, 285, + 293, 297, 308, 313, 318, 320, 322, 323, 324, 329, + 336, 338, 343, 348, 354, 356, 361, 366, 372, 374, + 379, 386, 388, 389, 390, 393, 395, 397, 399, 401, + 403, 405, 409, 413, 416, 419, 422, 426, 428, 431, + 434, 438, 466, 472, 475, 478, 481, 483, 485, 489, + 493, 497, 499, 502, 506, 533, 535, 537, 539, 541, + 543, 545, 547, 549, 551, 553, 555, 557, 559, 563, + 565, 569, 571, 574, 578, 580, 587, 590, 598, 609, + 769, 770, 772, 778, 780, 803, 812, 814, 816, 828, + 842, 844, 846, 848, 850, 852, 854, 859, 861, 867, + 869, 873, 875, 876, 886, 891, 893, 894, 895, 902, + 908, 913, 916, 924, 929, 931, 932, 933, 940, 951, + 955, 961, 966, 971, 976, 978, 980, 989, 992, 996, + 998, 1000, 1005, 1009, 1012, 1016, 1019, 1021, 1033, 1036, + 1038, 1040, 1044, 1048, 1050, 1053, 1066, 1069, 1073, 1075, + 1083, 1084, 1085, 1089, 1091, 1096, 1098, 1100, 1106, 1107, + 1108, 1111, 1113, 1116, 1118, 1121, 1124, 1130, 1137, 1139, + 1146, 1153, 1156, 1163, 1166, 1170, 1173, 1177, 1182, 1185, + 1189, 1192, 1194, 1196, 1198, 1205, 1207, 1208, 1209, 1214, + 1216, 1221, 1229, 1234, 1238, 1241, 1243, 1248, 1250, 1251, + 1254, 1254, 1257, 1260, 1262, 1264, 1267, 1269, 1272, 1280, + 1294, 1302, 1306, 1320, 1328, 1335, 1337, 1342, 1345, 1350, + 1352, 1354, 1361, 1363, 1364, 1372, 1378, 1380, 1382, 1389, + 1391, 1397, 1403, 1405, 1407, 1409, 1416, 1418, 1421, 1424, + 1428, 1431, 1435, 1438, 1442, 1447, 1449, 1453, 1455, 1457, + 1459, 1463, 1465, 1468, 1471, 1474, 1477, 1481, 1483, 1486, + 1488, 1493, 1496, 1501, 1503, 1505, 1509, 1533, 1540, 1545, + 1551, 1556, 1558, 1563, 1565, 1569, 1573, 1577, 1587, 1589, + 1594, 1599, 1602, 1606, 1609, 1613, 1616, 1619, 1622, 1626, + 1629, 1633, 1637, 1639, 1641, 1643, 1645, 1647, 1649, 1651, + 1655, 1663, 1671, 1673, 1675, 1679, 1681, 1684, 1687, 1700, + 1702, 1707, 1709, 1712, 1726, 1729, 1732, 1734, 1736, 1744, + 1752, 1762, 1780, 1785, 1790, 1793, 1807, 1816, 1820, 1824, + 1828, 1834, 1838, 1843, 1846, 1851, 1854, 1855, 1872, 1877, + 1880, 1892, 1894, 1904, 1914, 1915, 1923, 1926, 1938, 1942, + 1959, 1969, 1978, 1983, 1988, 1993, 1997, 2001, 2012, 2019, + 2026, 2033, 2044, 2050, 2053, 2058, 2081, 2115, 2146, 2177, + 2192, 2206, 2210, 2214, 2217, 2222, 2224, 2227, 2229, 2233, + 2238, 2241, 2247, 2252, 2257, 2259, 2268, 2269, 2275, 2277, + 2287, 2289, 2293, 2296, 2302, 2312, 2321, 2330, 2340, 2354, + 2359, 2364, 2366, 2375, 2378, 2383, 2386, 2390, 2399, 2401, + 2402, 2403, 2404, 2405, 2419, 2422, 2426, 2432, 2438, 2445, + 2450, 2456, 2463, 2469, 2475, 2480, 2486, 2493, 2499, 2505, + 2511, 2519, 2525, 2531, 2539, 2546, 2552, 2561, 2568, 2576, + 2581, 2584, 2594, 2596, 2599, 2601, 2602, 2605, 2610, 2611, + 2628, 2635, 2641, 2645, 2648, 2649, 2652, 2660, 2666, 2675, + 2685, 2692, 2696, 2701, 2710, 2717, 2721, 2731, 2733, 2734, + 2736, 2738, 2739, 2740, 2741, 2743, 2745, 2748, 2756, 2763, + 2763, 2770, 2776, 2778, 2784, 2789, 2794, 2803, 2805, 2811, + 2813, 2816, 2818, 2819, 2820, 2823, 2829, 2831, 2835, 2838, + 2845, 2851, 2856, 2863, 2868, 2873, 2878, 2885, 2889, 2892, + 2898, 2900, 2901, 2902, 2905, 2907, 2908, 2909, 2910, 2911, + 2912, 2913, 2914, 2915, 2916, 2917, 2918, 2919, 2920, 2921, + 2922, 2923, 2924, 2925, 2925, 2928, 2934, 2939, 2944, 2950, + 2952, 2955, 2957, 2964, 2976, 2981, 2987, 2989, 2995, 2999, + 3000, 3006, 3008, 3011, 3013, 3019, 3024, 3030, 3037, 3046 }; #endif @@ -1734,7 +1743,7 @@ static const short yycheck[] = { 56, 46, 47, 48, 49, 50, 51, 52, 53, 54 }; /* -*-C-*- Note some compilers choke on comments on `#line' lines. */ -#line 3 "/usr/share/bison.simple" +#line 3 "/usr/cygnus/TBD-TBD/share/bison.simple" /* Skeleton output parser for bison, Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc. @@ -1927,7 +1936,7 @@ __yy_memcpy (char *to, char *from, int count) #endif #endif -#line 196 "/usr/share/bison.simple" +#line 196 "/usr/cygnus/TBD-TBD/share/bison.simple" /* The user can define YYPARSE_PARAM as the name of an argument to be passed into yyparse. The argument should have type void *. @@ -2232,14 +2241,14 @@ yyreduce: switch (yyn) { case 1: -#line 247 "objc-parse.y" +#line 258 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids an empty source file"); finish_file (); ; break;} case 2: -#line 252 "objc-parse.y" +#line 263 "objc-parse.y" { /* In case there were missing closebraces, get us back to the global binding level. */ @@ -2249,15 +2258,15 @@ case 2: ; break;} case 3: -#line 266 "objc-parse.y" +#line 277 "objc-parse.y" {yyval.ttype = NULL_TREE; ; break;} case 5: -#line 267 "objc-parse.y" +#line 278 "objc-parse.y" {yyval.ttype = NULL_TREE; ; break;} case 10: -#line 275 "objc-parse.y" +#line 286 "objc-parse.y" { STRIP_NOPS (yyvsp[-2].ttype); if ((TREE_CODE (yyvsp[-2].ttype) == ADDR_EXPR && TREE_CODE (TREE_OPERAND (yyvsp[-2].ttype, 0)) == STRING_CST) @@ -2267,11 +2276,11 @@ case 10: error ("argument of `asm' is not a constant string"); ; break;} case 11: -#line 283 "objc-parse.y" -{ pedantic = yyvsp[-1].itype; ; +#line 294 "objc-parse.y" +{ RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 12: -#line 288 "objc-parse.y" +#line 299 "objc-parse.y" { if (pedantic) error ("ANSI C forbids data definition with no type or storage class"); else if (!flag_traditional) @@ -2283,45 +2292,45 @@ case 12: resume_momentary (yyvsp[-2].itype); ; break;} case 13: -#line 298 "objc-parse.y" +#line 309 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 14: -#line 303 "objc-parse.y" +#line 314 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 15: -#line 308 "objc-parse.y" +#line 319 "objc-parse.y" { pedwarn ("empty declaration"); ; break;} case 16: -#line 310 "objc-parse.y" +#line 321 "objc-parse.y" { shadow_tag (yyvsp[-1].ttype); ; break;} case 19: -#line 314 "objc-parse.y" +#line 325 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C does not allow extra `;' outside of a function"); ; break;} case 20: -#line 320 "objc-parse.y" +#line 331 "objc-parse.y" { if (! start_function (current_declspecs, yyvsp[0].ttype, prefix_attributes, NULL_TREE, 0)) YYERROR1; reinit_parse_for_function (); ; break;} case 21: -#line 325 "objc-parse.y" +#line 336 "objc-parse.y" { store_parm_decls (); ; break;} case 22: -#line 327 "objc-parse.y" +#line 338 "objc-parse.y" { finish_function (0); current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -2329,25 +2338,25 @@ case 22: resume_momentary (yyvsp[-5].itype); ; break;} case 23: -#line 333 "objc-parse.y" +#line 344 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 24: -#line 338 "objc-parse.y" +#line 349 "objc-parse.y" { if (! start_function (current_declspecs, yyvsp[0].ttype, prefix_attributes, NULL_TREE, 0)) YYERROR1; reinit_parse_for_function (); ; break;} case 25: -#line 343 "objc-parse.y" +#line 354 "objc-parse.y" { store_parm_decls (); ; break;} case 26: -#line 345 "objc-parse.y" +#line 356 "objc-parse.y" { finish_function (0); current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -2355,25 +2364,25 @@ case 26: resume_momentary (yyvsp[-5].itype); ; break;} case 27: -#line 351 "objc-parse.y" +#line 362 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 28: -#line 356 "objc-parse.y" +#line 367 "objc-parse.y" { if (! start_function (NULL_TREE, yyvsp[0].ttype, prefix_attributes, NULL_TREE, 0)) YYERROR1; reinit_parse_for_function (); ; break;} case 29: -#line 361 "objc-parse.y" +#line 372 "objc-parse.y" { store_parm_decls (); ; break;} case 30: -#line 363 "objc-parse.y" +#line 374 "objc-parse.y" { finish_function (0); current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -2381,72 +2390,72 @@ case 30: resume_momentary (yyvsp[-5].itype); ; break;} case 31: -#line 369 "objc-parse.y" +#line 380 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 36: -#line 383 "objc-parse.y" +#line 394 "objc-parse.y" { yyval.code = ADDR_EXPR; ; break;} case 37: -#line 385 "objc-parse.y" +#line 396 "objc-parse.y" { yyval.code = NEGATE_EXPR; ; break;} case 38: -#line 387 "objc-parse.y" +#line 398 "objc-parse.y" { yyval.code = CONVERT_EXPR; ; break;} case 39: -#line 389 "objc-parse.y" +#line 400 "objc-parse.y" { yyval.code = PREINCREMENT_EXPR; ; break;} case 40: -#line 391 "objc-parse.y" +#line 402 "objc-parse.y" { yyval.code = PREDECREMENT_EXPR; ; break;} case 41: -#line 393 "objc-parse.y" +#line 404 "objc-parse.y" { yyval.code = BIT_NOT_EXPR; ; break;} case 42: -#line 395 "objc-parse.y" +#line 406 "objc-parse.y" { yyval.code = TRUTH_NOT_EXPR; ; break;} case 43: -#line 399 "objc-parse.y" +#line 410 "objc-parse.y" { yyval.ttype = build_compound_expr (yyvsp[0].ttype); ; break;} case 44: -#line 404 "objc-parse.y" +#line 415 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 46: -#line 410 "objc-parse.y" +#line 421 "objc-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 47: -#line 412 "objc-parse.y" +#line 423 "objc-parse.y" { chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 49: -#line 418 "objc-parse.y" +#line 429 "objc-parse.y" { yyval.ttype = build_indirect_ref (yyvsp[0].ttype, "unary *"); ; break;} case 50: -#line 421 "objc-parse.y" +#line 432 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; - pedantic = yyvsp[-1].itype; ; + RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 51: -#line 424 "objc-parse.y" +#line 435 "objc-parse.y" { yyval.ttype = build_unary_op (yyvsp[-1].code, yyvsp[0].ttype, 0); overflow_warning (yyval.ttype); ; break;} case 52: -#line 428 "objc-parse.y" +#line 439 "objc-parse.y" { tree label = lookup_label (yyvsp[0].ttype); if (pedantic) pedwarn ("ANSI C forbids `&&'"); @@ -2461,7 +2470,7 @@ case 52: ; break;} case 53: -#line 456 "objc-parse.y" +#line 467 "objc-parse.y" { skip_evaluation--; if (TREE_CODE (yyvsp[0].ttype) == COMPONENT_REF && DECL_C_BIT_FIELD (TREE_OPERAND (yyvsp[0].ttype, 1))) @@ -2469,53 +2478,53 @@ case 53: yyval.ttype = c_sizeof (TREE_TYPE (yyvsp[0].ttype)); ; break;} case 54: -#line 462 "objc-parse.y" +#line 473 "objc-parse.y" { skip_evaluation--; yyval.ttype = c_sizeof (groktypename (yyvsp[-1].ttype)); ; break;} case 55: -#line 465 "objc-parse.y" +#line 476 "objc-parse.y" { skip_evaluation--; yyval.ttype = c_alignof_expr (yyvsp[0].ttype); ; break;} case 56: -#line 468 "objc-parse.y" +#line 479 "objc-parse.y" { skip_evaluation--; yyval.ttype = c_alignof (groktypename (yyvsp[-1].ttype)); ; break;} case 57: -#line 471 "objc-parse.y" +#line 482 "objc-parse.y" { yyval.ttype = build_unary_op (REALPART_EXPR, yyvsp[0].ttype, 0); ; break;} case 58: -#line 473 "objc-parse.y" +#line 484 "objc-parse.y" { yyval.ttype = build_unary_op (IMAGPART_EXPR, yyvsp[0].ttype, 0); ; break;} case 59: -#line 475 "objc-parse.y" +#line 486 "objc-parse.y" { yyval.ttype = build_va_arg (yyvsp[-3].ttype, groktypename (yyvsp[-1].ttype)); ; break;} case 60: -#line 479 "objc-parse.y" +#line 490 "objc-parse.y" { skip_evaluation++; ; break;} case 61: -#line 483 "objc-parse.y" +#line 494 "objc-parse.y" { skip_evaluation++; ; break;} case 63: -#line 489 "objc-parse.y" +#line 500 "objc-parse.y" { tree type = groktypename (yyvsp[-2].ttype); yyval.ttype = build_c_cast (type, yyvsp[0].ttype); ; break;} case 64: -#line 492 "objc-parse.y" +#line 503 "objc-parse.y" { start_init (NULL_TREE, NULL, 0); yyvsp[-2].ttype = groktypename (yyvsp[-2].ttype); really_start_incremental_init (yyvsp[-2].ttype); ; break;} case 65: -#line 496 "objc-parse.y" +#line 507 "objc-parse.y" { char *name; tree result = pop_init_level (0); tree type = yyvsp[-5].ttype; @@ -2542,90 +2551,90 @@ case 65: ; break;} case 67: -#line 525 "objc-parse.y" +#line 536 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 68: -#line 527 "objc-parse.y" +#line 538 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 69: -#line 529 "objc-parse.y" +#line 540 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 70: -#line 531 "objc-parse.y" +#line 542 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 71: -#line 533 "objc-parse.y" +#line 544 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 72: -#line 535 "objc-parse.y" +#line 546 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 73: -#line 537 "objc-parse.y" +#line 548 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 74: -#line 539 "objc-parse.y" +#line 550 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 75: -#line 541 "objc-parse.y" +#line 552 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 76: -#line 543 "objc-parse.y" +#line 554 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 77: -#line 545 "objc-parse.y" +#line 556 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 78: -#line 547 "objc-parse.y" +#line 558 "objc-parse.y" { yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 79: -#line 549 "objc-parse.y" +#line 560 "objc-parse.y" { yyvsp[-1].ttype = truthvalue_conversion (default_conversion (yyvsp[-1].ttype)); skip_evaluation += yyvsp[-1].ttype == boolean_false_node; ; break;} case 80: -#line 552 "objc-parse.y" +#line 563 "objc-parse.y" { skip_evaluation -= yyvsp[-3].ttype == boolean_false_node; yyval.ttype = parser_build_binary_op (TRUTH_ANDIF_EXPR, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 81: -#line 555 "objc-parse.y" +#line 566 "objc-parse.y" { yyvsp[-1].ttype = truthvalue_conversion (default_conversion (yyvsp[-1].ttype)); skip_evaluation += yyvsp[-1].ttype == boolean_true_node; ; break;} case 82: -#line 558 "objc-parse.y" +#line 569 "objc-parse.y" { skip_evaluation -= yyvsp[-3].ttype == boolean_true_node; yyval.ttype = parser_build_binary_op (TRUTH_ORIF_EXPR, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 83: -#line 561 "objc-parse.y" +#line 572 "objc-parse.y" { yyvsp[-1].ttype = truthvalue_conversion (default_conversion (yyvsp[-1].ttype)); skip_evaluation += yyvsp[-1].ttype == boolean_false_node; ; break;} case 84: -#line 564 "objc-parse.y" +#line 575 "objc-parse.y" { skip_evaluation += ((yyvsp[-4].ttype == boolean_true_node) - (yyvsp[-4].ttype == boolean_false_node)); ; break;} case 85: -#line 567 "objc-parse.y" +#line 578 "objc-parse.y" { skip_evaluation -= yyvsp[-6].ttype == boolean_true_node; yyval.ttype = build_conditional_expr (yyvsp[-6].ttype, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 86: -#line 570 "objc-parse.y" +#line 581 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids omitting the middle term of a ?: expression"); /* Make sure first operand is calculated only once. */ @@ -2634,12 +2643,12 @@ case 86: skip_evaluation += yyvsp[-1].ttype == boolean_true_node; ; break;} case 87: -#line 577 "objc-parse.y" +#line 588 "objc-parse.y" { skip_evaluation -= yyvsp[-4].ttype == boolean_true_node; yyval.ttype = build_conditional_expr (yyvsp[-4].ttype, yyvsp[-3].ttype, yyvsp[0].ttype); ; break;} case 88: -#line 580 "objc-parse.y" +#line 591 "objc-parse.y" { char class; yyval.ttype = build_modify_expr (yyvsp[-2].ttype, NOP_EXPR, yyvsp[0].ttype); class = TREE_CODE_CLASS (TREE_CODE (yyval.ttype)); @@ -2649,7 +2658,7 @@ case 88: ; break;} case 89: -#line 588 "objc-parse.y" +#line 599 "objc-parse.y" { char class; yyval.ttype = build_modify_expr (yyvsp[-2].ttype, yyvsp[-1].code, yyvsp[0].ttype); /* This inhibits warnings in truthvalue_conversion. */ @@ -2660,7 +2669,7 @@ case 89: ; break;} case 90: -#line 600 "objc-parse.y" +#line 611 "objc-parse.y" { yyval.ttype = lastiddecl; if (!yyval.ttype || yyval.ttype == error_mark_node) @@ -2821,11 +2830,11 @@ case 90: ; break;} case 92: -#line 760 "objc-parse.y" +#line 771 "objc-parse.y" { yyval.ttype = combine_strings (yyvsp[0].ttype); ; break;} case 93: -#line 762 "objc-parse.y" +#line 773 "objc-parse.y" { char class = TREE_CODE_CLASS (TREE_CODE (yyvsp[-1].ttype)); if (class == 'e' || class == '1' || class == '2' || class == '<') @@ -2833,11 +2842,11 @@ case 93: yyval.ttype = yyvsp[-1].ttype; ; break;} case 94: -#line 768 "objc-parse.y" +#line 779 "objc-parse.y" { yyval.ttype = error_mark_node; ; break;} case 95: -#line 770 "objc-parse.y" +#line 781 "objc-parse.y" { tree rtl_exp; if (pedantic) pedwarn ("ANSI C forbids braced-groups within expressions"); @@ -2862,7 +2871,7 @@ case 95: ; break;} case 96: -#line 793 "objc-parse.y" +#line 804 "objc-parse.y" { /* Make sure we call expand_end_stmt_expr. Otherwise we are likely to lose sequences and crash later. */ @@ -2873,15 +2882,15 @@ case 96: ; break;} case 97: -#line 802 "objc-parse.y" +#line 813 "objc-parse.y" { yyval.ttype = build_function_call (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 98: -#line 804 "objc-parse.y" +#line 815 "objc-parse.y" { yyval.ttype = build_array_ref (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 99: -#line 806 "objc-parse.y" +#line 817 "objc-parse.y" { if (doing_objc_thang) { @@ -2895,7 +2904,7 @@ case 99: ; break;} case 100: -#line 818 "objc-parse.y" +#line 829 "objc-parse.y" { tree expr = build_indirect_ref (yyvsp[-2].ttype, "->"); @@ -2911,80 +2920,80 @@ case 100: ; break;} case 101: -#line 832 "objc-parse.y" +#line 843 "objc-parse.y" { yyval.ttype = build_unary_op (POSTINCREMENT_EXPR, yyvsp[-1].ttype, 0); ; break;} case 102: -#line 834 "objc-parse.y" +#line 845 "objc-parse.y" { yyval.ttype = build_unary_op (POSTDECREMENT_EXPR, yyvsp[-1].ttype, 0); ; break;} case 103: -#line 836 "objc-parse.y" +#line 847 "objc-parse.y" { yyval.ttype = build_message_expr (yyvsp[0].ttype); ; break;} case 104: -#line 838 "objc-parse.y" +#line 849 "objc-parse.y" { yyval.ttype = build_selector_expr (yyvsp[0].ttype); ; break;} case 105: -#line 840 "objc-parse.y" +#line 851 "objc-parse.y" { yyval.ttype = build_protocol_expr (yyvsp[0].ttype); ; break;} case 106: -#line 842 "objc-parse.y" +#line 853 "objc-parse.y" { yyval.ttype = build_encode_expr (yyvsp[0].ttype); ; break;} case 107: -#line 844 "objc-parse.y" +#line 855 "objc-parse.y" { yyval.ttype = build_objc_string_object (yyvsp[0].ttype); ; break;} case 109: -#line 851 "objc-parse.y" +#line 862 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 111: -#line 859 "objc-parse.y" +#line 870 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 114: -#line 867 "objc-parse.y" +#line 878 "objc-parse.y" { c_mark_varargs (); if (pedantic) pedwarn ("ANSI C does not permit use of `varargs.h'"); ; break;} case 115: -#line 877 "objc-parse.y" +#line 888 "objc-parse.y" { ; break;} case 120: -#line 893 "objc-parse.y" +#line 904 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 121: -#line 898 "objc-parse.y" +#line 909 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 122: -#line 903 "objc-parse.y" +#line 914 "objc-parse.y" { shadow_tag_warned (yyvsp[-1].ttype, 1); pedwarn ("empty declaration"); ; break;} case 123: -#line 906 "objc-parse.y" +#line 917 "objc-parse.y" { pedwarn ("empty declaration"); ; break;} case 124: -#line 915 "objc-parse.y" +#line 926 "objc-parse.y" { ; break;} case 129: -#line 930 "objc-parse.y" +#line 941 "objc-parse.y" { yyval.itype = suspend_momentary (); pending_xref_error (); declspec_stack = tree_cons (prefix_attributes, @@ -2994,131 +3003,131 @@ case 129: ¤t_declspecs, &prefix_attributes); ; break;} case 130: -#line 941 "objc-parse.y" +#line 952 "objc-parse.y" { prefix_attributes = chainon (prefix_attributes, yyvsp[0].ttype); ; break;} case 131: -#line 946 "objc-parse.y" +#line 957 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 132: -#line 951 "objc-parse.y" +#line 962 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 133: -#line 956 "objc-parse.y" +#line 967 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-1].itype); ; break;} case 134: -#line 961 "objc-parse.y" +#line 972 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-1].itype); ; break;} case 135: -#line 966 "objc-parse.y" +#line 977 "objc-parse.y" { shadow_tag (yyvsp[-1].ttype); ; break;} case 136: -#line 968 "objc-parse.y" +#line 979 "objc-parse.y" { pedwarn ("empty declaration"); ; break;} case 137: -#line 970 "objc-parse.y" -{ pedantic = yyvsp[-1].itype; ; +#line 981 "objc-parse.y" +{ RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 138: -#line 980 "objc-parse.y" +#line 991 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 139: -#line 982 "objc-parse.y" +#line 993 "objc-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ; break;} case 140: -#line 986 "objc-parse.y" +#line 997 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 141: -#line 988 "objc-parse.y" +#line 999 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 142: -#line 990 "objc-parse.y" +#line 1001 "objc-parse.y" { if (extra_warnings) warning ("`%s' is not at beginning of declaration", IDENTIFIER_POINTER (yyvsp[0].ttype)); yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 143: -#line 995 "objc-parse.y" +#line 1006 "objc-parse.y" { yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, yyvsp[-1].ttype); ; break;} case 144: -#line 1000 "objc-parse.y" +#line 1011 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 145: -#line 1002 "objc-parse.y" +#line 1013 "objc-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ; break;} case 146: -#line 1007 "objc-parse.y" +#line 1018 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 147: -#line 1009 "objc-parse.y" +#line 1020 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 148: -#line 1011 "objc-parse.y" +#line 1022 "objc-parse.y" { if (extra_warnings) warning ("`%s' is not at beginning of declaration", IDENTIFIER_POINTER (yyvsp[0].ttype)); yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 149: -#line 1024 "objc-parse.y" +#line 1035 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 150: -#line 1026 "objc-parse.y" +#line 1037 "objc-parse.y" { yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, NULL_TREE); ; break;} case 151: -#line 1028 "objc-parse.y" +#line 1039 "objc-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 152: -#line 1030 "objc-parse.y" +#line 1041 "objc-parse.y" { yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, yyvsp[-1].ttype); ; break;} case 153: -#line 1035 "objc-parse.y" +#line 1046 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); TREE_STATIC (yyval.ttype) = 1; ; break;} case 154: -#line 1038 "objc-parse.y" +#line 1049 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 155: -#line 1040 "objc-parse.y" +#line 1051 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); TREE_STATIC (yyval.ttype) = 1; ; break;} case 156: -#line 1043 "objc-parse.y" +#line 1054 "objc-parse.y" { if (extra_warnings && TREE_STATIC (yyvsp[-1].ttype)) warning ("`%s' is not at beginning of declaration", IDENTIFIER_POINTER (yyvsp[0].ttype)); @@ -3126,150 +3135,150 @@ case 156: TREE_STATIC (yyval.ttype) = TREE_STATIC (yyvsp[-1].ttype); ; break;} case 157: -#line 1057 "objc-parse.y" +#line 1068 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 158: -#line 1059 "objc-parse.y" +#line 1070 "objc-parse.y" { yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ; break;} case 159: -#line 1063 "objc-parse.y" +#line 1074 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 160: -#line 1065 "objc-parse.y" +#line 1076 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 163: -#line 1075 "objc-parse.y" +#line 1086 "objc-parse.y" { /* For a typedef name, record the meaning, not the name. In case of `foo foo, bar;'. */ yyval.ttype = lookup_name (yyvsp[0].ttype); ; break;} case 164: -#line 1079 "objc-parse.y" +#line 1090 "objc-parse.y" { yyval.ttype = get_static_reference (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 165: -#line 1081 "objc-parse.y" +#line 1092 "objc-parse.y" { yyval.ttype = get_object_reference (yyvsp[0].ttype); ; break;} case 166: -#line 1086 "objc-parse.y" +#line 1097 "objc-parse.y" { yyval.ttype = get_object_reference (yyvsp[0].ttype); ; break;} case 167: -#line 1088 "objc-parse.y" +#line 1099 "objc-parse.y" { yyval.ttype = TREE_TYPE (yyvsp[-1].ttype); ; break;} case 168: -#line 1090 "objc-parse.y" +#line 1101 "objc-parse.y" { yyval.ttype = groktypename (yyvsp[-1].ttype); ; break;} case 176: -#line 1112 "objc-parse.y" +#line 1123 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 177: -#line 1114 "objc-parse.y" +#line 1125 "objc-parse.y" { if (TREE_CHAIN (yyvsp[-1].ttype)) yyvsp[-1].ttype = combine_strings (yyvsp[-1].ttype); yyval.ttype = yyvsp[-1].ttype; ; break;} case 178: -#line 1121 "objc-parse.y" +#line 1132 "objc-parse.y" { yyval.ttype = start_decl (yyvsp[-3].ttype, current_declspecs, 1, yyvsp[-1].ttype, prefix_attributes); start_init (yyval.ttype, yyvsp[-2].ttype, global_bindings_p ()); ; break;} case 179: -#line 1126 "objc-parse.y" +#line 1137 "objc-parse.y" { finish_init (); finish_decl (yyvsp[-1].ttype, yyvsp[0].ttype, yyvsp[-4].ttype); ; break;} case 180: -#line 1129 "objc-parse.y" +#line 1140 "objc-parse.y" { tree d = start_decl (yyvsp[-2].ttype, current_declspecs, 0, yyvsp[0].ttype, prefix_attributes); finish_decl (d, NULL_TREE, yyvsp[-1].ttype); ; break;} case 181: -#line 1137 "objc-parse.y" +#line 1148 "objc-parse.y" { yyval.ttype = start_decl (yyvsp[-3].ttype, current_declspecs, 1, yyvsp[-1].ttype, prefix_attributes); start_init (yyval.ttype, yyvsp[-2].ttype, global_bindings_p ()); ; break;} case 182: -#line 1142 "objc-parse.y" +#line 1153 "objc-parse.y" { finish_init (); decl_attributes (yyvsp[-1].ttype, yyvsp[-3].ttype, prefix_attributes); finish_decl (yyvsp[-1].ttype, yyvsp[0].ttype, yyvsp[-4].ttype); ; break;} case 183: -#line 1146 "objc-parse.y" +#line 1157 "objc-parse.y" { tree d = start_decl (yyvsp[-2].ttype, current_declspecs, 0, yyvsp[0].ttype, prefix_attributes); finish_decl (d, NULL_TREE, yyvsp[-1].ttype); ; break;} case 184: -#line 1154 "objc-parse.y" +#line 1165 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 185: -#line 1156 "objc-parse.y" +#line 1167 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 186: -#line 1161 "objc-parse.y" +#line 1172 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 187: -#line 1163 "objc-parse.y" +#line 1174 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 188: -#line 1168 "objc-parse.y" +#line 1179 "objc-parse.y" { yyval.ttype = yyvsp[-2].ttype; ; break;} case 189: -#line 1173 "objc-parse.y" +#line 1184 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 190: -#line 1175 "objc-parse.y" +#line 1186 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 191: -#line 1180 "objc-parse.y" +#line 1191 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 192: -#line 1182 "objc-parse.y" +#line 1193 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[0].ttype, NULL_TREE); ; break;} case 193: -#line 1184 "objc-parse.y" +#line 1195 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, build_tree_list (NULL_TREE, yyvsp[-1].ttype)); ; break;} case 194: -#line 1186 "objc-parse.y" +#line 1197 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-5].ttype, tree_cons (NULL_TREE, yyvsp[-3].ttype, yyvsp[-1].ttype)); ; break;} case 195: -#line 1188 "objc-parse.y" +#line 1199 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 201: -#line 1206 "objc-parse.y" +#line 1217 "objc-parse.y" { really_start_incremental_init (NULL_TREE); /* Note that the call to clear_momentary is in process_init_element. */ push_momentary (); ; break;} case 202: -#line 1211 "objc-parse.y" +#line 1222 "objc-parse.y" { yyval.ttype = pop_init_level (0); if (yyval.ttype == error_mark_node && ! (yychar == STRING || yychar == CONSTANT)) @@ -3278,36 +3287,36 @@ case 202: pop_momentary_nofree (); ; break;} case 203: -#line 1219 "objc-parse.y" +#line 1230 "objc-parse.y" { yyval.ttype = error_mark_node; ; break;} case 204: -#line 1225 "objc-parse.y" +#line 1236 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids empty initializer braces"); ; break;} case 210: -#line 1241 "objc-parse.y" +#line 1252 "objc-parse.y" { set_init_label (yyvsp[-1].ttype); ; break;} case 213: -#line 1248 "objc-parse.y" +#line 1259 "objc-parse.y" { push_init_level (0); ; break;} case 214: -#line 1250 "objc-parse.y" +#line 1261 "objc-parse.y" { process_init_element (pop_init_level (0)); ; break;} case 215: -#line 1252 "objc-parse.y" +#line 1263 "objc-parse.y" { process_init_element (yyvsp[0].ttype); ; break;} case 219: -#line 1263 "objc-parse.y" +#line 1274 "objc-parse.y" { set_init_label (yyvsp[0].ttype); ; break;} case 220: -#line 1271 "objc-parse.y" +#line 1282 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids nested functions"); @@ -3321,16 +3330,16 @@ case 220: reinit_parse_for_function (); ; break;} case 221: -#line 1283 "objc-parse.y" +#line 1294 "objc-parse.y" { store_parm_decls (); ; break;} case 222: -#line 1291 "objc-parse.y" +#line 1302 "objc-parse.y" { finish_function (1); pop_function_context (); ; break;} case 223: -#line 1297 "objc-parse.y" +#line 1308 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids nested functions"); @@ -3344,197 +3353,197 @@ case 223: reinit_parse_for_function (); ; break;} case 224: -#line 1309 "objc-parse.y" +#line 1320 "objc-parse.y" { store_parm_decls (); ; break;} case 225: -#line 1317 "objc-parse.y" +#line 1328 "objc-parse.y" { finish_function (1); pop_function_context (); ; break;} case 228: -#line 1333 "objc-parse.y" +#line 1344 "objc-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 229: -#line 1335 "objc-parse.y" +#line 1346 "objc-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 230: -#line 1340 "objc-parse.y" +#line 1351 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 231: -#line 1342 "objc-parse.y" +#line 1353 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 232: -#line 1344 "objc-parse.y" +#line 1355 "objc-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 233: -#line 1351 "objc-parse.y" +#line 1362 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 236: -#line 1363 "objc-parse.y" +#line 1374 "objc-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 237: -#line 1368 "objc-parse.y" +#line 1379 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 238: -#line 1370 "objc-parse.y" +#line 1381 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 239: -#line 1372 "objc-parse.y" +#line 1383 "objc-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 240: -#line 1379 "objc-parse.y" +#line 1390 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 242: -#line 1388 "objc-parse.y" +#line 1399 "objc-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 243: -#line 1393 "objc-parse.y" +#line 1404 "objc-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 244: -#line 1395 "objc-parse.y" +#line 1406 "objc-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 245: -#line 1397 "objc-parse.y" +#line 1408 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 246: -#line 1399 "objc-parse.y" +#line 1410 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 247: -#line 1406 "objc-parse.y" +#line 1417 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 249: -#line 1412 "objc-parse.y" +#line 1423 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 250: -#line 1414 "objc-parse.y" +#line 1425 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 251: -#line 1419 "objc-parse.y" +#line 1430 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 252: -#line 1421 "objc-parse.y" +#line 1432 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 253: -#line 1426 "objc-parse.y" +#line 1437 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 254: -#line 1428 "objc-parse.y" +#line 1439 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 255: -#line 1433 "objc-parse.y" +#line 1444 "objc-parse.y" { yyval.ttype = start_struct (RECORD_TYPE, yyvsp[-1].ttype); /* Start scope of tag before parsing components. */ ; break;} case 256: -#line 1437 "objc-parse.y" +#line 1448 "objc-parse.y" { yyval.ttype = finish_struct (yyvsp[-3].ttype, yyvsp[-2].ttype, chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); ; break;} case 257: -#line 1439 "objc-parse.y" +#line 1450 "objc-parse.y" { yyval.ttype = finish_struct (start_struct (RECORD_TYPE, NULL_TREE), yyvsp[-2].ttype, chainon (yyvsp[-4].ttype, yyvsp[0].ttype)); ; break;} case 258: -#line 1443 "objc-parse.y" +#line 1454 "objc-parse.y" { yyval.ttype = xref_tag (RECORD_TYPE, yyvsp[0].ttype); ; break;} case 259: -#line 1445 "objc-parse.y" +#line 1456 "objc-parse.y" { yyval.ttype = start_struct (UNION_TYPE, yyvsp[-1].ttype); ; break;} case 260: -#line 1447 "objc-parse.y" +#line 1458 "objc-parse.y" { yyval.ttype = finish_struct (yyvsp[-3].ttype, yyvsp[-2].ttype, chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); ; break;} case 261: -#line 1449 "objc-parse.y" +#line 1460 "objc-parse.y" { yyval.ttype = finish_struct (start_struct (UNION_TYPE, NULL_TREE), yyvsp[-2].ttype, chainon (yyvsp[-4].ttype, yyvsp[0].ttype)); ; break;} case 262: -#line 1453 "objc-parse.y" +#line 1464 "objc-parse.y" { yyval.ttype = xref_tag (UNION_TYPE, yyvsp[0].ttype); ; break;} case 263: -#line 1455 "objc-parse.y" +#line 1466 "objc-parse.y" { yyvsp[0].itype = suspend_momentary (); yyval.ttype = start_enum (yyvsp[-1].ttype); ; break;} case 264: -#line 1458 "objc-parse.y" +#line 1469 "objc-parse.y" { yyval.ttype= finish_enum (yyvsp[-4].ttype, nreverse (yyvsp[-3].ttype), chainon (yyvsp[-7].ttype, yyvsp[0].ttype)); resume_momentary (yyvsp[-5].itype); ; break;} case 265: -#line 1461 "objc-parse.y" +#line 1472 "objc-parse.y" { yyvsp[0].itype = suspend_momentary (); yyval.ttype = start_enum (NULL_TREE); ; break;} case 266: -#line 1464 "objc-parse.y" +#line 1475 "objc-parse.y" { yyval.ttype= finish_enum (yyvsp[-4].ttype, nreverse (yyvsp[-3].ttype), chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); resume_momentary (yyvsp[-5].itype); ; break;} case 267: -#line 1467 "objc-parse.y" +#line 1478 "objc-parse.y" { yyval.ttype = xref_tag (ENUMERAL_TYPE, yyvsp[0].ttype); ; break;} case 271: -#line 1478 "objc-parse.y" +#line 1489 "objc-parse.y" { if (pedantic && ! flag_isoc9x) pedwarn ("comma at end of enumerator list"); ; break;} case 272: -#line 1484 "objc-parse.y" +#line 1495 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 273: -#line 1486 "objc-parse.y" +#line 1497 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); pedwarn ("no semicolon at end of struct or union"); ; break;} case 274: -#line 1491 "objc-parse.y" +#line 1502 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 275: -#line 1493 "objc-parse.y" +#line 1504 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[-1].ttype); ; break;} case 276: -#line 1495 "objc-parse.y" +#line 1506 "objc-parse.y" { if (pedantic) pedwarn ("extra semicolon in struct or union specified"); ; break;} case 277: -#line 1499 "objc-parse.y" +#line 1510 "objc-parse.y" { tree interface = lookup_interface (yyvsp[-1].ttype); @@ -3549,21 +3558,6 @@ case 277: ; break;} case 278: -#line 1524 "objc-parse.y" -{ yyval.ttype = yyvsp[0].ttype; - current_declspecs = TREE_VALUE (declspec_stack); - prefix_attributes = TREE_PURPOSE (declspec_stack); - declspec_stack = TREE_CHAIN (declspec_stack); - resume_momentary (yyvsp[-1].itype); ; - break;} -case 279: -#line 1530 "objc-parse.y" -{ if (pedantic) - pedwarn ("ANSI C forbids member declarations with no members"); - shadow_tag(yyvsp[0].ttype); - yyval.ttype = NULL_TREE; ; - break;} -case 280: #line 1535 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; current_declspecs = TREE_VALUE (declspec_stack); @@ -3571,145 +3565,160 @@ case 280: declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-1].itype); ; break;} -case 281: +case 279: #line 1541 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids member declarations with no members"); shadow_tag(yyvsp[0].ttype); yyval.ttype = NULL_TREE; ; break;} -case 282: +case 280: #line 1546 "objc-parse.y" +{ yyval.ttype = yyvsp[0].ttype; + current_declspecs = TREE_VALUE (declspec_stack); + prefix_attributes = TREE_PURPOSE (declspec_stack); + declspec_stack = TREE_CHAIN (declspec_stack); + resume_momentary (yyvsp[-1].itype); ; + break;} +case 281: +#line 1552 "objc-parse.y" +{ if (pedantic) + pedwarn ("ANSI C forbids member declarations with no members"); + shadow_tag(yyvsp[0].ttype); + yyval.ttype = NULL_TREE; ; + break;} +case 282: +#line 1557 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 283: -#line 1548 "objc-parse.y" +#line 1559 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; - pedantic = yyvsp[-1].itype; ; + RESTORE_WARN_FLAGS (yyvsp[-1].itype); ; break;} case 285: -#line 1555 "objc-parse.y" +#line 1566 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 286: -#line 1560 "objc-parse.y" +#line 1571 "objc-parse.y" { yyval.ttype = grokfield (yyvsp[-3].filename, yyvsp[-2].lineno, yyvsp[-1].ttype, current_declspecs, NULL_TREE); decl_attributes (yyval.ttype, yyvsp[0].ttype, prefix_attributes); ; break;} case 287: -#line 1564 "objc-parse.y" +#line 1575 "objc-parse.y" { yyval.ttype = grokfield (yyvsp[-5].filename, yyvsp[-4].lineno, yyvsp[-3].ttype, current_declspecs, yyvsp[-1].ttype); decl_attributes (yyval.ttype, yyvsp[0].ttype, prefix_attributes); ; break;} case 288: -#line 1567 "objc-parse.y" +#line 1578 "objc-parse.y" { yyval.ttype = grokfield (yyvsp[-4].filename, yyvsp[-3].lineno, NULL_TREE, current_declspecs, yyvsp[-1].ttype); decl_attributes (yyval.ttype, yyvsp[0].ttype, prefix_attributes); ; break;} case 290: -#line 1579 "objc-parse.y" +#line 1590 "objc-parse.y" { if (yyvsp[-2].ttype == error_mark_node) yyval.ttype = yyvsp[-2].ttype; else yyval.ttype = chainon (yyvsp[0].ttype, yyvsp[-2].ttype); ; break;} case 291: -#line 1584 "objc-parse.y" +#line 1595 "objc-parse.y" { yyval.ttype = error_mark_node; ; break;} case 292: -#line 1590 "objc-parse.y" +#line 1601 "objc-parse.y" { yyval.ttype = build_enumerator (yyvsp[0].ttype, NULL_TREE); ; break;} case 293: -#line 1592 "objc-parse.y" +#line 1603 "objc-parse.y" { yyval.ttype = build_enumerator (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 294: -#line 1597 "objc-parse.y" +#line 1608 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 295: -#line 1599 "objc-parse.y" +#line 1610 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 296: -#line 1604 "objc-parse.y" +#line 1615 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 298: -#line 1610 "objc-parse.y" +#line 1621 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 299: -#line 1612 "objc-parse.y" +#line 1623 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 300: -#line 1617 "objc-parse.y" +#line 1628 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 301: -#line 1619 "objc-parse.y" +#line 1630 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ; break;} case 302: -#line 1624 "objc-parse.y" +#line 1635 "objc-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 303: -#line 1627 "objc-parse.y" +#line 1638 "objc-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 304: -#line 1629 "objc-parse.y" +#line 1640 "objc-parse.y" { yyval.ttype = make_pointer_declarator (yyvsp[0].ttype, NULL_TREE); ; break;} case 305: -#line 1631 "objc-parse.y" +#line 1642 "objc-parse.y" { yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 306: -#line 1633 "objc-parse.y" +#line 1644 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 307: -#line 1635 "objc-parse.y" +#line 1646 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ; break;} case 308: -#line 1637 "objc-parse.y" +#line 1648 "objc-parse.y" { yyval.ttype = build_nt (CALL_EXPR, NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 309: -#line 1639 "objc-parse.y" +#line 1650 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, NULL_TREE, yyvsp[-1].ttype); ; break;} case 310: -#line 1641 "objc-parse.y" +#line 1652 "objc-parse.y" { yyval.ttype = build_nt (ARRAY_REF, NULL_TREE, NULL_TREE); ; break;} case 311: -#line 1645 "objc-parse.y" +#line 1656 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 312: -#line 1654 "objc-parse.y" +#line 1665 "objc-parse.y" { if (pedantic && yyvsp[0].ends_in_label) pedwarn ("ANSI C forbids label at end of compound statement"); ; break;} case 314: -#line 1663 "objc-parse.y" +#line 1674 "objc-parse.y" { yyval.ends_in_label = yyvsp[0].ends_in_label; ; break;} case 315: -#line 1665 "objc-parse.y" +#line 1676 "objc-parse.y" { yyval.ends_in_label = 0; ; break;} case 319: -#line 1677 "objc-parse.y" +#line 1688 "objc-parse.y" { emit_line_note (input_filename, lineno); pushlevel (0); clear_last_expr (); @@ -3720,12 +3729,12 @@ case 319: ; break;} case 321: -#line 1692 "objc-parse.y" +#line 1703 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids label declarations"); ; break;} case 324: -#line 1703 "objc-parse.y" +#line 1714 "objc-parse.y" { tree link; for (link = yyvsp[-1].ttype; link; link = TREE_CHAIN (link)) { @@ -3736,19 +3745,19 @@ case 324: ; break;} case 325: -#line 1717 "objc-parse.y" +#line 1728 "objc-parse.y" {; break;} case 327: -#line 1721 "objc-parse.y" +#line 1732 "objc-parse.y" { compstmt_count++; ; break;} case 328: -#line 1724 "objc-parse.y" +#line 1735 "objc-parse.y" { yyval.ttype = convert (void_type_node, integer_zero_node); ; break;} case 329: -#line 1726 "objc-parse.y" +#line 1737 "objc-parse.y" { emit_line_note (input_filename, lineno); expand_end_bindings (getdecls (), 1, 0); yyval.ttype = poplevel (1, 1, 0); @@ -3758,7 +3767,7 @@ case 329: pop_momentary (); ; break;} case 330: -#line 1734 "objc-parse.y" +#line 1745 "objc-parse.y" { emit_line_note (input_filename, lineno); expand_end_bindings (getdecls (), kept_level_p (), 0); yyval.ttype = poplevel (kept_level_p (), 0, 0); @@ -3768,7 +3777,7 @@ case 330: pop_momentary (); ; break;} case 331: -#line 1742 "objc-parse.y" +#line 1753 "objc-parse.y" { emit_line_note (input_filename, lineno); expand_end_bindings (getdecls (), kept_level_p (), 0); yyval.ttype = poplevel (kept_level_p (), 0, 0); @@ -3778,7 +3787,7 @@ case 331: pop_momentary (); ; break;} case 332: -#line 1753 "objc-parse.y" +#line 1764 "objc-parse.y" { if (current_function_decl == 0) { error ("braced-group within expression allowed only inside a function"); @@ -3796,11 +3805,11 @@ case 332: ; break;} case 333: -#line 1770 "objc-parse.y" +#line 1781 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 336: -#line 1784 "objc-parse.y" +#line 1795 "objc-parse.y" { emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno); c_expand_start_cond (truthvalue_conversion (yyvsp[-1].ttype), 0, compstmt_count); @@ -3810,7 +3819,7 @@ case 336: position_after_white_space (); ; break;} case 337: -#line 1798 "objc-parse.y" +#line 1809 "objc-parse.y" { stmt_count++; compstmt_count++; emit_line_note (yyvsp[-2].filename, yyvsp[-1].lineno); @@ -3820,43 +3829,43 @@ case 337: position_after_white_space (); ; break;} case 338: -#line 1806 "objc-parse.y" +#line 1817 "objc-parse.y" { expand_loop_continue_here (); ; break;} case 339: -#line 1810 "objc-parse.y" +#line 1821 "objc-parse.y" { yyval.filename = input_filename; ; break;} case 340: -#line 1814 "objc-parse.y" +#line 1825 "objc-parse.y" { yyval.lineno = lineno; ; break;} case 341: -#line 1819 "objc-parse.y" +#line 1830 "objc-parse.y" { ; break;} case 342: -#line 1824 "objc-parse.y" +#line 1835 "objc-parse.y" { ; break;} case 343: -#line 1829 "objc-parse.y" +#line 1840 "objc-parse.y" { yyval.ends_in_label = yyvsp[0].ends_in_label; ; break;} case 344: -#line 1834 "objc-parse.y" +#line 1845 "objc-parse.y" { yyval.ends_in_label = 0; ; break;} case 345: -#line 1836 "objc-parse.y" +#line 1847 "objc-parse.y" { yyval.ends_in_label = 1; ; break;} case 346: -#line 1842 "objc-parse.y" +#line 1853 "objc-parse.y" { stmt_count++; ; break;} case 348: -#line 1845 "objc-parse.y" +#line 1856 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); /* It appears that this should not be done--that a non-lvalue array @@ -3875,19 +3884,19 @@ case 348: clear_momentary (); ; break;} case 349: -#line 1862 "objc-parse.y" +#line 1873 "objc-parse.y" { c_expand_start_else (); yyvsp[-1].itype = stmt_count; position_after_white_space (); ; break;} case 350: -#line 1866 "objc-parse.y" +#line 1877 "objc-parse.y" { c_expand_end_cond (); if (extra_warnings && stmt_count == yyvsp[-3].itype) warning ("empty body in an else-statement"); ; break;} case 351: -#line 1870 "objc-parse.y" +#line 1881 "objc-parse.y" { c_expand_end_cond (); /* This warning is here instead of in simple_if, because we do not want a warning if an empty if is followed by an @@ -3898,11 +3907,11 @@ case 351: "empty body in an if-statement"); ; break;} case 352: -#line 1882 "objc-parse.y" +#line 1893 "objc-parse.y" { c_expand_end_cond (); ; break;} case 353: -#line 1884 "objc-parse.y" +#line 1895 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-2].filename, yyvsp[-1].lineno); /* The emit_nop used to come before emit_line_note, @@ -3914,7 +3923,7 @@ case 353: emit_nop (); ; break;} case 354: -#line 1894 "objc-parse.y" +#line 1905 "objc-parse.y" { /* Don't start the loop till we have succeeded in parsing the end test. This is to make sure that we end every loop we start. */ @@ -3925,11 +3934,11 @@ case 354: position_after_white_space (); ; break;} case 355: -#line 1903 "objc-parse.y" +#line 1914 "objc-parse.y" { expand_end_loop (); ; break;} case 356: -#line 1906 "objc-parse.y" +#line 1917 "objc-parse.y" { emit_line_note (input_filename, lineno); expand_exit_loop_if_false (NULL_PTR, truthvalue_conversion (yyvsp[-2].ttype)); @@ -3937,12 +3946,12 @@ case 356: clear_momentary (); ; break;} case 357: -#line 1913 "objc-parse.y" +#line 1924 "objc-parse.y" { expand_end_loop (); clear_momentary (); ; break;} case 358: -#line 1917 "objc-parse.y" +#line 1928 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno); /* See comment in `while' alternative, above. */ @@ -3955,12 +3964,12 @@ case 358: ; break;} case 359: -#line 1929 "objc-parse.y" +#line 1940 "objc-parse.y" { yyvsp[0].lineno = lineno; yyval.filename = input_filename; ; break;} case 360: -#line 1932 "objc-parse.y" +#line 1943 "objc-parse.y" { /* Start the loop. Doing this after parsing all the expressions ensures we will end the loop. */ @@ -3978,7 +3987,7 @@ case 360: position_after_white_space (); ; break;} case 361: -#line 1948 "objc-parse.y" +#line 1959 "objc-parse.y" { /* Emit the increment expression, with a line number. */ emit_line_note (yyvsp[-4].filename, yyvsp[-5].lineno); expand_loop_continue_here (); @@ -3991,7 +4000,7 @@ case 361: expand_end_loop (); ; break;} case 362: -#line 1959 "objc-parse.y" +#line 1970 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno); c_expand_start_case (yyvsp[-1].ttype); @@ -4001,7 +4010,7 @@ case 362: position_after_white_space (); ; break;} case 363: -#line 1967 "objc-parse.y" +#line 1978 "objc-parse.y" { expand_end_case (yyvsp[-3].ttype); if (yychar == CONSTANT || yychar == STRING) pop_momentary_nofree (); @@ -4009,33 +4018,33 @@ case 363: pop_momentary (); ; break;} case 364: -#line 1973 "objc-parse.y" +#line 1984 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); if ( ! expand_exit_something ()) error ("break statement not within loop or switch"); ; break;} case 365: -#line 1978 "objc-parse.y" +#line 1989 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); if (! expand_continue_loop (NULL_PTR)) error ("continue statement not within a loop"); ; break;} case 366: -#line 1983 "objc-parse.y" +#line 1994 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno); c_expand_return (NULL_TREE); ; break;} case 367: -#line 1987 "objc-parse.y" +#line 1998 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-4].filename, yyvsp[-3].lineno); c_expand_return (yyvsp[-1].ttype); ; break;} case 368: -#line 1991 "objc-parse.y" +#line 2002 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-7].filename, yyvsp[-6].lineno); STRIP_NOPS (yyvsp[-2].ttype); @@ -4047,7 +4056,7 @@ case 368: error ("argument of `asm' is not a constant string"); ; break;} case 369: -#line 2002 "objc-parse.y" +#line 2013 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-9].filename, yyvsp[-8].lineno); c_expand_asm_operands (yyvsp[-4].ttype, yyvsp[-2].ttype, NULL_TREE, NULL_TREE, @@ -4055,7 +4064,7 @@ case 369: input_filename, lineno); ; break;} case 370: -#line 2009 "objc-parse.y" +#line 2020 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-11].filename, yyvsp[-10].lineno); c_expand_asm_operands (yyvsp[-6].ttype, yyvsp[-4].ttype, yyvsp[-2].ttype, NULL_TREE, @@ -4063,7 +4072,7 @@ case 370: input_filename, lineno); ; break;} case 371: -#line 2017 "objc-parse.y" +#line 2028 "objc-parse.y" { stmt_count++; emit_line_note (yyvsp[-13].filename, yyvsp[-12].lineno); c_expand_asm_operands (yyvsp[-8].ttype, yyvsp[-6].ttype, yyvsp[-4].ttype, yyvsp[-2].ttype, @@ -4071,7 +4080,7 @@ case 371: input_filename, lineno); ; break;} case 372: -#line 2023 "objc-parse.y" +#line 2034 "objc-parse.y" { tree decl; stmt_count++; emit_line_note (yyvsp[-4].filename, yyvsp[-3].lineno); @@ -4084,7 +4093,7 @@ case 372: ; break;} case 373: -#line 2034 "objc-parse.y" +#line 2045 "objc-parse.y" { if (pedantic) pedwarn ("ANSI C forbids `goto *expr;'"); stmt_count++; @@ -4092,7 +4101,7 @@ case 373: expand_computed_goto (convert (ptr_type_node, yyvsp[-1].ttype)); ; break;} case 376: -#line 2049 "objc-parse.y" +#line 2060 "objc-parse.y" { /* The value returned by this action is */ /* 1 if everything is OK */ @@ -4115,14 +4124,14 @@ case 376: ; break;} case 377: -#line 2070 "objc-parse.y" +#line 2081 "objc-parse.y" { if (yyvsp[-1].itype) iterator_for_loop_end (yyvsp[-3].ttype); ; break;} case 378: -#line 2105 "objc-parse.y" +#line 2116 "objc-parse.y" { register tree value = check_case_value (yyvsp[-1].ttype); register tree label = build_decl (LABEL_DECL, NULL_TREE, NULL_TREE); @@ -4155,7 +4164,7 @@ case 378: position_after_white_space (); ; break;} case 379: -#line 2136 "objc-parse.y" +#line 2147 "objc-parse.y" { register tree value1 = check_case_value (yyvsp[-3].ttype); register tree value2 = check_case_value (yyvsp[-1].ttype); register tree label @@ -4188,7 +4197,7 @@ case 379: position_after_white_space (); ; break;} case 380: -#line 2167 "objc-parse.y" +#line 2178 "objc-parse.y" { tree duplicate; register tree label @@ -4205,7 +4214,7 @@ case 380: position_after_white_space (); ; break;} case 381: -#line 2182 "objc-parse.y" +#line 2193 "objc-parse.y" { tree label = define_label (input_filename, lineno, yyvsp[-2].ttype); stmt_count++; emit_nop (); @@ -4217,52 +4226,52 @@ case 381: position_after_white_space (); ; break;} case 382: -#line 2197 "objc-parse.y" +#line 2208 "objc-parse.y" { emit_line_note (input_filename, lineno); yyval.ttype = NULL_TREE; ; break;} case 383: -#line 2200 "objc-parse.y" +#line 2211 "objc-parse.y" { emit_line_note (input_filename, lineno); ; break;} case 384: -#line 2205 "objc-parse.y" +#line 2216 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 386: -#line 2212 "objc-parse.y" +#line 2223 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 389: -#line 2219 "objc-parse.y" +#line 2230 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 390: -#line 2224 "objc-parse.y" +#line 2235 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 391: -#line 2229 "objc-parse.y" +#line 2240 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, combine_strings (yyvsp[0].ttype), NULL_TREE); ; break;} case 392: -#line 2231 "objc-parse.y" +#line 2242 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, combine_strings (yyvsp[0].ttype), yyvsp[-2].ttype); ; break;} case 393: -#line 2237 "objc-parse.y" +#line 2248 "objc-parse.y" { pushlevel (0); clear_parm_order (); declare_parm_level (0); ; break;} case 394: -#line 2241 "objc-parse.y" +#line 2252 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; parmlist_tags_warning (); poplevel (0, 0, 0); ; break;} case 396: -#line 2249 "objc-parse.y" +#line 2260 "objc-parse.y" { tree parm; if (pedantic) pedwarn ("ANSI C forbids forward parameter declarations"); @@ -4272,19 +4281,19 @@ case 396: clear_parm_order (); ; break;} case 397: -#line 2257 "objc-parse.y" +#line 2268 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; ; break;} case 398: -#line 2259 "objc-parse.y" +#line 2270 "objc-parse.y" { yyval.ttype = tree_cons (NULL_TREE, NULL_TREE, NULL_TREE); ; break;} case 399: -#line 2265 "objc-parse.y" +#line 2276 "objc-parse.y" { yyval.ttype = get_parm_info (0); ; break;} case 400: -#line 2267 "objc-parse.y" +#line 2278 "objc-parse.y" { yyval.ttype = get_parm_info (0); /* Gcc used to allow this as an extension. However, it does not work for all targets, and thus has been disabled. @@ -4296,23 +4305,23 @@ case 400: ; break;} case 401: -#line 2277 "objc-parse.y" +#line 2288 "objc-parse.y" { yyval.ttype = get_parm_info (1); ; break;} case 402: -#line 2279 "objc-parse.y" +#line 2290 "objc-parse.y" { yyval.ttype = get_parm_info (0); ; break;} case 403: -#line 2284 "objc-parse.y" +#line 2295 "objc-parse.y" { push_parm_decl (yyvsp[0].ttype); ; break;} case 404: -#line 2286 "objc-parse.y" +#line 2297 "objc-parse.y" { push_parm_decl (yyvsp[0].ttype); ; break;} case 405: -#line 2293 "objc-parse.y" +#line 2304 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -4323,7 +4332,7 @@ case 405: resume_momentary (yyvsp[-2].itype); ; break;} case 406: -#line 2302 "objc-parse.y" +#line 2313 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -4334,7 +4343,7 @@ case 406: resume_momentary (yyvsp[-2].itype); ; break;} case 407: -#line 2311 "objc-parse.y" +#line 2322 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -4345,7 +4354,7 @@ case 407: resume_momentary (yyvsp[-2].itype); ; break;} case 408: -#line 2320 "objc-parse.y" +#line 2331 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -4356,7 +4365,7 @@ case 408: resume_momentary (yyvsp[-2].itype); ; break;} case 409: -#line 2330 "objc-parse.y" +#line 2341 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, @@ -4367,19 +4376,19 @@ case 409: resume_momentary (yyvsp[-2].itype); ; break;} case 410: -#line 2344 "objc-parse.y" +#line 2355 "objc-parse.y" { pushlevel (0); clear_parm_order (); declare_parm_level (1); ; break;} case 411: -#line 2348 "objc-parse.y" +#line 2359 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; parmlist_tags_warning (); poplevel (0, 0, 0); ; break;} case 413: -#line 2356 "objc-parse.y" +#line 2367 "objc-parse.y" { tree t; for (t = yyvsp[-1].ttype; t; t = TREE_CHAIN (t)) if (TREE_VALUE (t) == NULL_TREE) @@ -4387,28 +4396,29 @@ case 413: yyval.ttype = tree_cons (NULL_TREE, NULL_TREE, yyvsp[-1].ttype); ; break;} case 414: -#line 2366 "objc-parse.y" +#line 2377 "objc-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 415: -#line 2368 "objc-parse.y" +#line 2379 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 416: -#line 2374 "objc-parse.y" +#line 2385 "objc-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 417: -#line 2376 "objc-parse.y" +#line 2387 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 418: -#line 2381 "objc-parse.y" -{ yyval.itype = pedantic; - pedantic = 0; ; +#line 2392 "objc-parse.y" +{ yyval.itype = SAVE_WARN_FLAGS(); + pedantic = 0; + warn_pointer_arith = 0; ; break;} case 424: -#line 2394 "objc-parse.y" +#line 2406 "objc-parse.y" { if (objc_implementation_context) { @@ -4421,27 +4431,27 @@ case 424: ; break;} case 425: -#line 2409 "objc-parse.y" +#line 2421 "objc-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 426: -#line 2411 "objc-parse.y" +#line 2423 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ; break;} case 427: -#line 2416 "objc-parse.y" +#line 2428 "objc-parse.y" { objc_declare_class (yyvsp[-1].ttype); ; break;} case 428: -#line 2422 "objc-parse.y" +#line 2434 "objc-parse.y" { objc_declare_alias (yyvsp[-2].ttype, yyvsp[-1].ttype); ; break;} case 429: -#line 2428 "objc-parse.y" +#line 2440 "objc-parse.y" { objc_interface_context = objc_ivar_context = start_class (CLASS_INTERFACE_TYPE, yyvsp[-2].ttype, NULL_TREE, yyvsp[-1].ttype); @@ -4449,20 +4459,20 @@ case 429: ; break;} case 430: -#line 2434 "objc-parse.y" +#line 2446 "objc-parse.y" { continue_class (objc_interface_context); ; break;} case 431: -#line 2439 "objc-parse.y" +#line 2451 "objc-parse.y" { finish_class (objc_interface_context); objc_interface_context = NULL_TREE; ; break;} case 432: -#line 2445 "objc-parse.y" +#line 2457 "objc-parse.y" { objc_interface_context = start_class (CLASS_INTERFACE_TYPE, yyvsp[-1].ttype, NULL_TREE, yyvsp[0].ttype); @@ -4470,14 +4480,14 @@ case 432: ; break;} case 433: -#line 2452 "objc-parse.y" +#line 2464 "objc-parse.y" { finish_class (objc_interface_context); objc_interface_context = NULL_TREE; ; break;} case 434: -#line 2458 "objc-parse.y" +#line 2470 "objc-parse.y" { objc_interface_context = objc_ivar_context = start_class (CLASS_INTERFACE_TYPE, yyvsp[-4].ttype, yyvsp[-2].ttype, yyvsp[-1].ttype); @@ -4485,20 +4495,20 @@ case 434: ; break;} case 435: -#line 2464 "objc-parse.y" +#line 2476 "objc-parse.y" { continue_class (objc_interface_context); ; break;} case 436: -#line 2469 "objc-parse.y" +#line 2481 "objc-parse.y" { finish_class (objc_interface_context); objc_interface_context = NULL_TREE; ; break;} case 437: -#line 2475 "objc-parse.y" +#line 2487 "objc-parse.y" { objc_interface_context = start_class (CLASS_INTERFACE_TYPE, yyvsp[-3].ttype, yyvsp[-1].ttype, yyvsp[0].ttype); @@ -4506,14 +4516,14 @@ case 437: ; break;} case 438: -#line 2482 "objc-parse.y" +#line 2494 "objc-parse.y" { finish_class (objc_interface_context); objc_interface_context = NULL_TREE; ; break;} case 439: -#line 2488 "objc-parse.y" +#line 2500 "objc-parse.y" { objc_implementation_context = objc_ivar_context = start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[-1].ttype, NULL_TREE, NULL_TREE); @@ -4521,14 +4531,14 @@ case 439: ; break;} case 440: -#line 2494 "objc-parse.y" +#line 2506 "objc-parse.y" { objc_ivar_chain = continue_class (objc_implementation_context); ; break;} case 441: -#line 2500 "objc-parse.y" +#line 2512 "objc-parse.y" { objc_implementation_context = start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[0].ttype, NULL_TREE, NULL_TREE); @@ -4537,7 +4547,7 @@ case 441: ; break;} case 442: -#line 2508 "objc-parse.y" +#line 2520 "objc-parse.y" { objc_implementation_context = objc_ivar_context = start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[-3].ttype, yyvsp[-1].ttype, NULL_TREE); @@ -4545,14 +4555,14 @@ case 442: ; break;} case 443: -#line 2514 "objc-parse.y" +#line 2526 "objc-parse.y" { objc_ivar_chain = continue_class (objc_implementation_context); ; break;} case 444: -#line 2520 "objc-parse.y" +#line 2532 "objc-parse.y" { objc_implementation_context = start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); @@ -4561,7 +4571,7 @@ case 444: ; break;} case 445: -#line 2528 "objc-parse.y" +#line 2540 "objc-parse.y" { objc_interface_context = start_class (CATEGORY_INTERFACE_TYPE, yyvsp[-4].ttype, yyvsp[-2].ttype, yyvsp[0].ttype); @@ -4569,14 +4579,14 @@ case 445: ; break;} case 446: -#line 2535 "objc-parse.y" +#line 2547 "objc-parse.y" { finish_class (objc_interface_context); objc_interface_context = NULL_TREE; ; break;} case 447: -#line 2541 "objc-parse.y" +#line 2553 "objc-parse.y" { objc_implementation_context = start_class (CATEGORY_IMPLEMENTATION_TYPE, yyvsp[-3].ttype, yyvsp[-1].ttype, NULL_TREE); @@ -4585,7 +4595,7 @@ case 447: ; break;} case 448: -#line 2551 "objc-parse.y" +#line 2563 "objc-parse.y" { remember_protocol_qualifiers (); objc_interface_context @@ -4593,7 +4603,7 @@ case 448: ; break;} case 449: -#line 2557 "objc-parse.y" +#line 2569 "objc-parse.y" { forget_protocol_qualifiers(); finish_protocol(objc_interface_context); @@ -4601,13 +4611,13 @@ case 449: ; break;} case 450: -#line 2566 "objc-parse.y" +#line 2578 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 452: -#line 2574 "objc-parse.y" +#line 2586 "objc-parse.y" { if (yyvsp[-2].code == LT_EXPR && yyvsp[0].code == GT_EXPR) yyval.ttype = yyvsp[-1].ttype; @@ -4616,32 +4626,32 @@ case 452: ; break;} case 455: -#line 2588 "objc-parse.y" +#line 2600 "objc-parse.y" { objc_public_flag = 2; ; break;} case 456: -#line 2589 "objc-parse.y" +#line 2601 "objc-parse.y" { objc_public_flag = 0; ; break;} case 457: -#line 2590 "objc-parse.y" +#line 2602 "objc-parse.y" { objc_public_flag = 1; ; break;} case 458: -#line 2595 "objc-parse.y" +#line 2607 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 460: -#line 2600 "objc-parse.y" +#line 2612 "objc-parse.y" { if (pedantic) pedwarn ("extra semicolon in struct or union specified"); ; break;} case 461: -#line 2618 "objc-parse.y" +#line 2630 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -4649,7 +4659,7 @@ case 461: resume_momentary (yyvsp[-1].itype); ; break;} case 462: -#line 2624 "objc-parse.y" +#line 2636 "objc-parse.y" { yyval.ttype = yyvsp[0].ttype; current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); @@ -4657,15 +4667,15 @@ case 462: resume_momentary (yyvsp[-1].itype); ; break;} case 463: -#line 2630 "objc-parse.y" +#line 2642 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 464: -#line 2635 "objc-parse.y" +#line 2647 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 467: -#line 2642 "objc-parse.y" +#line 2654 "objc-parse.y" { yyval.ttype = add_instance_variable (objc_ivar_context, objc_public_flag, @@ -4674,7 +4684,7 @@ case 467: ; break;} case 468: -#line 2649 "objc-parse.y" +#line 2661 "objc-parse.y" { yyval.ttype = add_instance_variable (objc_ivar_context, objc_public_flag, @@ -4682,7 +4692,7 @@ case 468: ; break;} case 469: -#line 2655 "objc-parse.y" +#line 2667 "objc-parse.y" { yyval.ttype = add_instance_variable (objc_ivar_context, objc_public_flag, @@ -4691,7 +4701,7 @@ case 469: ; break;} case 470: -#line 2665 "objc-parse.y" +#line 2677 "objc-parse.y" { remember_protocol_qualifiers (); if (objc_implementation_context) @@ -4701,7 +4711,7 @@ case 470: ; break;} case 471: -#line 2673 "objc-parse.y" +#line 2685 "objc-parse.y" { forget_protocol_qualifiers (); add_class_method (objc_implementation_context, yyvsp[0].ttype); @@ -4710,20 +4720,20 @@ case 471: ; break;} case 472: -#line 2680 "objc-parse.y" +#line 2692 "objc-parse.y" { continue_method_def (); ; break;} case 473: -#line 2684 "objc-parse.y" +#line 2696 "objc-parse.y" { finish_method_def (); objc_method_context = NULL_TREE; ; break;} case 474: -#line 2690 "objc-parse.y" +#line 2702 "objc-parse.y" { remember_protocol_qualifiers (); if (objc_implementation_context) @@ -4733,7 +4743,7 @@ case 474: ; break;} case 475: -#line 2698 "objc-parse.y" +#line 2710 "objc-parse.y" { forget_protocol_qualifiers (); add_instance_method (objc_implementation_context, yyvsp[0].ttype); @@ -4742,28 +4752,28 @@ case 475: ; break;} case 476: -#line 2705 "objc-parse.y" +#line 2717 "objc-parse.y" { continue_method_def (); ; break;} case 477: -#line 2709 "objc-parse.y" +#line 2721 "objc-parse.y" { finish_method_def (); objc_method_context = NULL_TREE; ; break;} case 479: -#line 2721 "objc-parse.y" +#line 2733 "objc-parse.y" {yyval.ttype = NULL_TREE; ; break;} case 484: -#line 2728 "objc-parse.y" +#line 2740 "objc-parse.y" {yyval.ttype = NULL_TREE; ; break;} case 488: -#line 2738 "objc-parse.y" +#line 2750 "objc-parse.y" { /* Remember protocol qualifiers in prototypes. */ remember_protocol_qualifiers (); @@ -4771,7 +4781,7 @@ case 488: ; break;} case 489: -#line 2744 "objc-parse.y" +#line 2756 "objc-parse.y" { /* Forget protocol qualifiers here. */ forget_protocol_qualifiers (); @@ -4779,7 +4789,7 @@ case 489: ; break;} case 491: -#line 2752 "objc-parse.y" +#line 2764 "objc-parse.y" { /* Remember protocol qualifiers in prototypes. */ remember_protocol_qualifiers (); @@ -4787,7 +4797,7 @@ case 491: ; break;} case 492: -#line 2758 "objc-parse.y" +#line 2770 "objc-parse.y" { /* Forget protocol qualifiers here. */ forget_protocol_qualifiers (); @@ -4795,94 +4805,94 @@ case 492: ; break;} case 494: -#line 2768 "objc-parse.y" +#line 2780 "objc-parse.y" { yyval.ttype = build_method_decl (objc_inherit_code, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ; break;} case 495: -#line 2773 "objc-parse.y" +#line 2785 "objc-parse.y" { yyval.ttype = build_method_decl (objc_inherit_code, NULL_TREE, yyvsp[0].ttype, NULL_TREE); ; break;} case 496: -#line 2778 "objc-parse.y" +#line 2790 "objc-parse.y" { yyval.ttype = build_method_decl (objc_inherit_code, yyvsp[-3].ttype, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 497: -#line 2783 "objc-parse.y" +#line 2795 "objc-parse.y" { yyval.ttype = build_method_decl (objc_inherit_code, NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 506: -#line 2813 "objc-parse.y" +#line 2825 "objc-parse.y" { current_declspecs = TREE_VALUE (declspec_stack); prefix_attributes = TREE_PURPOSE (declspec_stack); declspec_stack = TREE_CHAIN (declspec_stack); resume_momentary (yyvsp[-2].itype); ; break;} case 507: -#line 2818 "objc-parse.y" +#line 2830 "objc-parse.y" { shadow_tag (yyvsp[-1].ttype); ; break;} case 508: -#line 2820 "objc-parse.y" +#line 2832 "objc-parse.y" { pedwarn ("empty declaration"); ; break;} case 509: -#line 2825 "objc-parse.y" +#line 2837 "objc-parse.y" { push_parm_decl (yyvsp[0].ttype); ; break;} case 510: -#line 2827 "objc-parse.y" +#line 2839 "objc-parse.y" { push_parm_decl (yyvsp[0].ttype); ; break;} case 511: -#line 2835 "objc-parse.y" +#line 2847 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, yyvsp[0].ttype)); ; break;} case 512: -#line 2840 "objc-parse.y" +#line 2852 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, yyvsp[0].ttype)); ; break;} case 513: -#line 2845 "objc-parse.y" +#line 2857 "objc-parse.y" { yyval.ttype = build_tree_list (build_tree_list (current_declspecs, yyvsp[-1].ttype), build_tree_list (prefix_attributes, yyvsp[0].ttype)); ; break;} case 514: -#line 2853 "objc-parse.y" +#line 2865 "objc-parse.y" { yyval.ttype = NULL_TREE; ; break;} case 515: -#line 2857 "objc-parse.y" +#line 2869 "objc-parse.y" { /* oh what a kludge! */ yyval.ttype = (tree)1; ; break;} case 516: -#line 2862 "objc-parse.y" +#line 2874 "objc-parse.y" { pushlevel (0); ; break;} case 517: -#line 2866 "objc-parse.y" +#line 2878 "objc-parse.y" { /* returns a tree list node generated by get_parm_info */ yyval.ttype = yyvsp[0].ttype; @@ -4890,119 +4900,119 @@ case 517: ; break;} case 520: -#line 2881 "objc-parse.y" +#line 2893 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 525: -#line 2894 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 526: -#line 2895 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 527: -#line 2896 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 528: -#line 2897 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 529: -#line 2898 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 530: -#line 2899 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 531: -#line 2900 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 532: -#line 2901 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 533: -#line 2902 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 534: -#line 2903 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 535: -#line 2904 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 536: -#line 2905 "objc-parse.y" -{ yyval.ttype = get_identifier (token_buffer); ; - break;} -case 537: #line 2906 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 538: +case 526: #line 2907 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 539: +case 527: #line 2908 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 540: +case 528: #line 2909 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 541: +case 529: #line 2910 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 542: +case 530: #line 2911 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 543: +case 531: #line 2912 "objc-parse.y" { yyval.ttype = get_identifier (token_buffer); ; break;} -case 546: +case 532: +#line 2913 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 533: +#line 2914 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 534: +#line 2915 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 535: +#line 2916 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 536: +#line 2917 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 537: #line 2918 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 538: +#line 2919 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 539: +#line 2920 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 540: +#line 2921 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 541: +#line 2922 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 542: +#line 2923 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 543: +#line 2924 "objc-parse.y" +{ yyval.ttype = get_identifier (token_buffer); ; + break;} +case 546: +#line 2930 "objc-parse.y" { yyval.ttype = build_keyword_decl (yyvsp[-5].ttype, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 547: -#line 2923 "objc-parse.y" +#line 2935 "objc-parse.y" { yyval.ttype = build_keyword_decl (yyvsp[-2].ttype, NULL_TREE, yyvsp[0].ttype); ; break;} case 548: -#line 2928 "objc-parse.y" +#line 2940 "objc-parse.y" { yyval.ttype = build_keyword_decl (NULL_TREE, yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 549: -#line 2933 "objc-parse.y" +#line 2945 "objc-parse.y" { yyval.ttype = build_keyword_decl (NULL_TREE, NULL_TREE, yyvsp[0].ttype); ; break;} case 553: -#line 2946 "objc-parse.y" +#line 2958 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 554: -#line 2954 "objc-parse.y" +#line 2966 "objc-parse.y" { if (TREE_CHAIN (yyvsp[0].ttype) == NULL_TREE) /* just return the expr., remove a level of indirection */ @@ -5013,76 +5023,76 @@ case 554: ; break;} case 555: -#line 2966 "objc-parse.y" +#line 2978 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-2].ttype, yyvsp[0].ttype); ; break;} case 556: -#line 2970 "objc-parse.y" +#line 2982 "objc-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ; break;} case 558: -#line 2978 "objc-parse.y" +#line 2990 "objc-parse.y" { yyval.ttype = get_class_reference (yyvsp[0].ttype); ; break;} case 559: -#line 2985 "objc-parse.y" +#line 2997 "objc-parse.y" { objc_receiver_context = 1; ; break;} case 560: -#line 2987 "objc-parse.y" +#line 2999 "objc-parse.y" { objc_receiver_context = 0; ; break;} case 561: -#line 2989 "objc-parse.y" +#line 3001 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ; break;} case 565: -#line 3002 "objc-parse.y" +#line 3014 "objc-parse.y" { yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ; break;} case 566: -#line 3009 "objc-parse.y" +#line 3021 "objc-parse.y" { yyval.ttype = build_tree_list (yyvsp[-1].ttype, NULL_TREE); ; break;} case 567: -#line 3013 "objc-parse.y" +#line 3025 "objc-parse.y" { yyval.ttype = build_tree_list (NULL_TREE, NULL_TREE); ; break;} case 568: -#line 3020 "objc-parse.y" +#line 3032 "objc-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 569: -#line 3027 "objc-parse.y" +#line 3039 "objc-parse.y" { yyval.ttype = yyvsp[-1].ttype; ; break;} case 570: -#line 3036 "objc-parse.y" +#line 3048 "objc-parse.y" { yyval.ttype = groktypename (yyvsp[-1].ttype); ; break;} } /* the action file gets copied in in place of this dollarsign */ -#line 498 "/usr/share/bison.simple" +#line 498 "/usr/cygnus/TBD-TBD/share/bison.simple" yyvsp -= yylen; yyssp -= yylen; @@ -5278,5 +5288,5 @@ yyerrhandle: yystate = yyn; goto yynewstate; } -#line 3041 "objc-parse.y" +#line 3053 "objc-parse.y" diff --git a/gcc/objc/objc-parse.y b/gcc/objc/objc-parse.y index 812f831dcee..f22926f2d2c 100644 --- a/gcc/objc/objc-parse.y +++ b/gcc/objc/objc-parse.y @@ -174,6 +174,8 @@ const char * const language_string = "GNU Obj-C"; %type parmlist_or_identifiers parmlist_or_identifiers_1 %type identifiers_or_typenames +%type extension + %type setspecs %type lineno_stmt_or_label lineno_stmt_or_labels stmt_or_label @@ -214,6 +216,15 @@ static tree declspec_stack; /* 1 if we explained undeclared var errors. */ static int undeclared_variable_notice; +/* For __extension__, save/restore the warning flags which are + controlled by __extension__. */ +#define SAVE_WARN_FLAGS() (pedantic | (warn_pointer_arith << 1)) +#define RESTORE_WARN_FLAGS(val) \ + do { \ + pedantic = val & 1; \ + warn_pointer_arith = (val >> 1) & 1; \ + } while (0) + /* Objective-C specific information */ tree objc_interface_context; @@ -280,7 +291,7 @@ extdef: else error ("argument of `asm' is not a constant string"); } | extension extdef - { pedantic = $1; } + { RESTORE_WARN_FLAGS ($1); } ; datadef: @@ -419,7 +430,7 @@ unary_expr: /* __extension__ turns off -pedantic for following primary. */ | extension cast_expr %prec UNARY { $$ = $2; - pedantic = $1; } + RESTORE_WARN_FLAGS ($1); } | unop cast_expr %prec UNARY { $$ = build_unary_op ($1, $2, 0); overflow_warning ($$); } @@ -967,7 +978,7 @@ decl: | declmods ';' { pedwarn ("empty declaration"); } | extension decl - { pedantic = $1; } + { RESTORE_WARN_FLAGS ($1); } ; /* Declspecs which contain at least one type specifier or typedef name. @@ -1546,7 +1557,7 @@ component_decl: { $$ = NULL_TREE; } | extension component_decl { $$ = $2; - pedantic = $1; } + RESTORE_WARN_FLAGS ($1); } ; components: @@ -2378,8 +2389,9 @@ identifiers_or_typenames: extension: EXTENSION - { $$ = pedantic; - pedantic = 0; } + { $$ = SAVE_WARN_FLAGS(); + pedantic = 0; + warn_pointer_arith = 0; } ; /* Objective-C productions. */