Commit afe3d090 by Bernd Schmidt

Commit parts that were missing in Mark's last commit

From-SVN: r29164
parent 6bc2c8c8
......@@ -2393,6 +2393,7 @@ mark_eh_state (eh)
struct eh_status *eh;
{
mark_eh_stack (&eh->x_ehstack);
mark_eh_stack (&eh->x_catchstack);
mark_eh_queue (&eh->x_ehqueue);
ggc_mark_rtx (eh->x_catch_clauses);
......@@ -2401,6 +2402,7 @@ mark_eh_state (eh)
ggc_mark_tree (eh->x_protect_list);
ggc_mark_rtx (eh->ehc);
ggc_mark_rtx (eh->x_eh_return_stub_label);
}
/* This group of functions initializes the exception handling data
......
......@@ -6714,6 +6714,7 @@ mark_function_state (p)
}
ggc_mark_rtx (p->x_nonlocal_goto_handler_slots);
ggc_mark_rtx (p->x_nonlocal_goto_handler_labels);
ggc_mark_rtx (p->x_nonlocal_goto_stack_level);
ggc_mark_tree (p->x_nonlocal_labels);
}
......
......@@ -133,7 +133,7 @@ ggc_alloc_rtvec (nelt)
int nelt;
{
struct ggc_rtvec *v;
int size = sizeof (*v) + (nelt - 1) * sizeof (rtunion);
int size = sizeof (*v) + (nelt - 1) * sizeof (rtx);
v = (struct ggc_rtvec *) xmalloc (size);
bzero ((char *) v, size);
......@@ -195,7 +195,7 @@ ggc_alloc_string (contents, length)
strings = s;
#ifdef GGC_DUMP
fprintf(dump, "alloc string %p\n", &n->tree);
fprintf(dump, "alloc string %p\n", &s->string);
#endif
bytes_alloced_since_gc += size;
......
......@@ -79,7 +79,8 @@
#include "flags.h"
#include "output.h"
#include "toplev.h"
#include "ggc.h"
#ifdef MULTIBYTE_CHARS
#include <locale.h>
#endif
......@@ -96,10 +97,10 @@ const char * const language_string = "GNU Obj-C";
/* Cause the `yydebug' variable to be defined. */
#define YYDEBUG 1
#line 64 "objc-parse.y"
#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 195 "objc-parse.y"
#line 196 "objc-parse.y"
/* Number of statements (loosely speaking) and compound statements
seen so far. */
......@@ -137,6 +138,16 @@ int objc_public_flag;
#define YYPRINT(FILE,YYCHAR,YYLVAL) yyprint(FILE,YYCHAR,YYLVAL)
extern void yyprint PROTO ((FILE *, int, YYSTYPE));
/* Add GC roots for variables local to this file. */
void
c_parse_init ()
{
ggc_add_tree_root (&declspec_stack, 1);
ggc_add_tree_root (&current_declspecs, 1);
ggc_add_tree_root (&prefix_attributes, 1);
}
#include <stdio.h>
#ifndef __cplusplus
......@@ -433,63 +444,63 @@ static const short yyrhs[] = { -1,
#if YYDEBUG != 0
static const short yyrline[] = { 0,
235, 240, 254, 256, 256, 257, 259, 261, 262, 263,
271, 275, 286, 291, 296, 298, 300, 301, 302, 307,
314, 316, 321, 326, 332, 334, 339, 344, 350, 352,
357, 364, 366, 367, 368, 371, 373, 375, 377, 379,
381, 383, 387, 391, 394, 397, 400, 404, 406, 409,
412, 416, 444, 450, 453, 456, 459, 461, 463, 467,
471, 475, 477, 480, 484, 511, 513, 515, 517, 519,
521, 523, 525, 527, 529, 531, 533, 535, 537, 541,
543, 547, 549, 552, 556, 558, 565, 568, 576, 587,
747, 748, 750, 756, 758, 781, 790, 792, 794, 806,
820, 822, 824, 826, 828, 830, 832, 837, 839, 845,
847, 851, 853, 854, 864, 869, 871, 872, 873, 880,
886, 891, 894, 902, 907, 909, 910, 911, 918, 929,
933, 939, 944, 949, 954, 956, 958, 967, 970, 974,
976, 978, 983, 987, 990, 994, 997, 999, 1011, 1014,
1016, 1018, 1022, 1026, 1028, 1031, 1044, 1047, 1051, 1053,
1061, 1062, 1063, 1067, 1069, 1074, 1076, 1078, 1084, 1085,
1086, 1089, 1091, 1094, 1096, 1099, 1102, 1108, 1115, 1117,
1124, 1131, 1134, 1141, 1144, 1148, 1151, 1155, 1160, 1163,
1167, 1170, 1172, 1174, 1176, 1183, 1185, 1186, 1187, 1192,
1194, 1199, 1207, 1212, 1216, 1219, 1221, 1226, 1228, 1229,
1232, 1232, 1235, 1238, 1240, 1242, 1245, 1247, 1250, 1258,
1272, 1280, 1284, 1298, 1306, 1313, 1315, 1320, 1323, 1328,
1330, 1332, 1339, 1341, 1342, 1350, 1356, 1358, 1360, 1367,
1369, 1375, 1381, 1383, 1385, 1387, 1394, 1396, 1399, 1402,
1406, 1409, 1413, 1416, 1420, 1425, 1427, 1431, 1433, 1435,
1437, 1441, 1443, 1446, 1449, 1452, 1455, 1459, 1461, 1464,
1466, 1471, 1474, 1479, 1481, 1483, 1487, 1511, 1518, 1523,
1529, 1534, 1536, 1541, 1543, 1547, 1551, 1555, 1565, 1567,
1572, 1577, 1580, 1584, 1587, 1591, 1594, 1597, 1600, 1604,
1607, 1611, 1615, 1617, 1619, 1621, 1623, 1625, 1627, 1629,
1633, 1641, 1649, 1651, 1653, 1657, 1659, 1662, 1665, 1678,
1680, 1685, 1687, 1690, 1704, 1707, 1710, 1712, 1714, 1722,
1730, 1740, 1758, 1763, 1768, 1771, 1785, 1794, 1798, 1802,
1806, 1812, 1816, 1821, 1824, 1829, 1832, 1833, 1850, 1855,
1858, 1870, 1872, 1882, 1892, 1893, 1901, 1904, 1916, 1920,
1937, 1947, 1956, 1961, 1966, 1971, 1975, 1979, 1990, 1997,
2004, 2011, 2022, 2028, 2031, 2036, 2059, 2093, 2124, 2155,
2170, 2184, 2188, 2192, 2195, 2200, 2202, 2205, 2207, 2211,
2216, 2219, 2225, 2230, 2235, 2237, 2246, 2247, 2253, 2255,
2265, 2267, 2271, 2274, 2280, 2290, 2299, 2308, 2318, 2332,
2337, 2342, 2344, 2353, 2356, 2361, 2364, 2368, 2376, 2378,
2379, 2380, 2381, 2382, 2396, 2399, 2403, 2409, 2415, 2422,
2427, 2433, 2440, 2446, 2452, 2457, 2463, 2470, 2476, 2482,
2488, 2496, 2502, 2508, 2516, 2523, 2529, 2538, 2545, 2553,
2558, 2561, 2571, 2573, 2576, 2578, 2579, 2582, 2587, 2588,
2605, 2612, 2618, 2622, 2625, 2626, 2629, 2637, 2643, 2652,
2662, 2669, 2673, 2678, 2687, 2694, 2698, 2708, 2710, 2711,
2713, 2715, 2716, 2717, 2718, 2720, 2722, 2725, 2733, 2740,
2740, 2747, 2753, 2755, 2761, 2766, 2771, 2780, 2782, 2788,
2790, 2793, 2795, 2796, 2797, 2800, 2806, 2808, 2812, 2815,
2822, 2828, 2833, 2840, 2845, 2850, 2855, 2862, 2866, 2869,
2875, 2877, 2878, 2879, 2882, 2884, 2885, 2886, 2887, 2888,
2889, 2890, 2891, 2892, 2893, 2894, 2895, 2896, 2897, 2898,
2899, 2900, 2901, 2902, 2902, 2905, 2911, 2916, 2921, 2927,
2929, 2932, 2934, 2941, 2953, 2958, 2964, 2966, 2972, 2976,
2977, 2983, 2985, 2988, 2990, 2996, 3001, 3007, 3014, 3023
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
};
#endif
......@@ -1723,7 +1734,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/cygnus/TBD-TBD/share/bison.simple"
#line 3 "/usr/share/bison.simple"
/* Skeleton output parser for bison,
Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc.
......@@ -1916,7 +1927,7 @@ __yy_memcpy (char *to, char *from, int count)
#endif
#endif
#line 196 "/usr/cygnus/TBD-TBD/share/bison.simple"
#line 196 "/usr/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 *.
......@@ -2221,14 +2232,14 @@ yyreduce:
switch (yyn) {
case 1:
#line 236 "objc-parse.y"
#line 247 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids an empty source file");
finish_file ();
;
break;}
case 2:
#line 241 "objc-parse.y"
#line 252 "objc-parse.y"
{
/* In case there were missing closebraces,
get us back to the global binding level. */
......@@ -2238,15 +2249,15 @@ case 2:
;
break;}
case 3:
#line 255 "objc-parse.y"
#line 266 "objc-parse.y"
{yyval.ttype = NULL_TREE; ;
break;}
case 5:
#line 256 "objc-parse.y"
#line 267 "objc-parse.y"
{yyval.ttype = NULL_TREE; ;
break;}
case 10:
#line 264 "objc-parse.y"
#line 275 "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)
......@@ -2256,11 +2267,11 @@ case 10:
error ("argument of `asm' is not a constant string"); ;
break;}
case 11:
#line 272 "objc-parse.y"
#line 283 "objc-parse.y"
{ pedantic = yyvsp[-1].itype; ;
break;}
case 12:
#line 277 "objc-parse.y"
#line 288 "objc-parse.y"
{ if (pedantic)
error ("ANSI C forbids data definition with no type or storage class");
else if (!flag_traditional)
......@@ -2272,45 +2283,45 @@ case 12:
resume_momentary (yyvsp[-2].itype); ;
break;}
case 13:
#line 287 "objc-parse.y"
#line 298 "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 292 "objc-parse.y"
#line 303 "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 297 "objc-parse.y"
#line 308 "objc-parse.y"
{ pedwarn ("empty declaration"); ;
break;}
case 16:
#line 299 "objc-parse.y"
#line 310 "objc-parse.y"
{ shadow_tag (yyvsp[-1].ttype); ;
break;}
case 19:
#line 303 "objc-parse.y"
#line 314 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C does not allow extra `;' outside of a function"); ;
break;}
case 20:
#line 309 "objc-parse.y"
#line 320 "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 314 "objc-parse.y"
#line 325 "objc-parse.y"
{ store_parm_decls (); ;
break;}
case 22:
#line 316 "objc-parse.y"
#line 327 "objc-parse.y"
{ finish_function (0);
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -2318,25 +2329,25 @@ case 22:
resume_momentary (yyvsp[-5].itype); ;
break;}
case 23:
#line 322 "objc-parse.y"
#line 333 "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 327 "objc-parse.y"
#line 338 "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 332 "objc-parse.y"
#line 343 "objc-parse.y"
{ store_parm_decls (); ;
break;}
case 26:
#line 334 "objc-parse.y"
#line 345 "objc-parse.y"
{ finish_function (0);
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -2344,25 +2355,25 @@ case 26:
resume_momentary (yyvsp[-5].itype); ;
break;}
case 27:
#line 340 "objc-parse.y"
#line 351 "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 345 "objc-parse.y"
#line 356 "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 350 "objc-parse.y"
#line 361 "objc-parse.y"
{ store_parm_decls (); ;
break;}
case 30:
#line 352 "objc-parse.y"
#line 363 "objc-parse.y"
{ finish_function (0);
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -2370,72 +2381,72 @@ case 30:
resume_momentary (yyvsp[-5].itype); ;
break;}
case 31:
#line 358 "objc-parse.y"
#line 369 "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 372 "objc-parse.y"
#line 383 "objc-parse.y"
{ yyval.code = ADDR_EXPR; ;
break;}
case 37:
#line 374 "objc-parse.y"
#line 385 "objc-parse.y"
{ yyval.code = NEGATE_EXPR; ;
break;}
case 38:
#line 376 "objc-parse.y"
#line 387 "objc-parse.y"
{ yyval.code = CONVERT_EXPR; ;
break;}
case 39:
#line 378 "objc-parse.y"
#line 389 "objc-parse.y"
{ yyval.code = PREINCREMENT_EXPR; ;
break;}
case 40:
#line 380 "objc-parse.y"
#line 391 "objc-parse.y"
{ yyval.code = PREDECREMENT_EXPR; ;
break;}
case 41:
#line 382 "objc-parse.y"
#line 393 "objc-parse.y"
{ yyval.code = BIT_NOT_EXPR; ;
break;}
case 42:
#line 384 "objc-parse.y"
#line 395 "objc-parse.y"
{ yyval.code = TRUTH_NOT_EXPR; ;
break;}
case 43:
#line 388 "objc-parse.y"
#line 399 "objc-parse.y"
{ yyval.ttype = build_compound_expr (yyvsp[0].ttype); ;
break;}
case 44:
#line 393 "objc-parse.y"
#line 404 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 46:
#line 399 "objc-parse.y"
#line 410 "objc-parse.y"
{ yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ;
break;}
case 47:
#line 401 "objc-parse.y"
#line 412 "objc-parse.y"
{ chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ;
break;}
case 49:
#line 407 "objc-parse.y"
#line 418 "objc-parse.y"
{ yyval.ttype = build_indirect_ref (yyvsp[0].ttype, "unary *"); ;
break;}
case 50:
#line 410 "objc-parse.y"
#line 421 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
pedantic = yyvsp[-1].itype; ;
break;}
case 51:
#line 413 "objc-parse.y"
#line 424 "objc-parse.y"
{ yyval.ttype = build_unary_op (yyvsp[-1].code, yyvsp[0].ttype, 0);
overflow_warning (yyval.ttype); ;
break;}
case 52:
#line 417 "objc-parse.y"
#line 428 "objc-parse.y"
{ tree label = lookup_label (yyvsp[0].ttype);
if (pedantic)
pedwarn ("ANSI C forbids `&&'");
......@@ -2450,7 +2461,7 @@ case 52:
;
break;}
case 53:
#line 445 "objc-parse.y"
#line 456 "objc-parse.y"
{ skip_evaluation--;
if (TREE_CODE (yyvsp[0].ttype) == COMPONENT_REF
&& DECL_C_BIT_FIELD (TREE_OPERAND (yyvsp[0].ttype, 1)))
......@@ -2458,53 +2469,53 @@ case 53:
yyval.ttype = c_sizeof (TREE_TYPE (yyvsp[0].ttype)); ;
break;}
case 54:
#line 451 "objc-parse.y"
#line 462 "objc-parse.y"
{ skip_evaluation--;
yyval.ttype = c_sizeof (groktypename (yyvsp[-1].ttype)); ;
break;}
case 55:
#line 454 "objc-parse.y"
#line 465 "objc-parse.y"
{ skip_evaluation--;
yyval.ttype = c_alignof_expr (yyvsp[0].ttype); ;
break;}
case 56:
#line 457 "objc-parse.y"
#line 468 "objc-parse.y"
{ skip_evaluation--;
yyval.ttype = c_alignof (groktypename (yyvsp[-1].ttype)); ;
break;}
case 57:
#line 460 "objc-parse.y"
#line 471 "objc-parse.y"
{ yyval.ttype = build_unary_op (REALPART_EXPR, yyvsp[0].ttype, 0); ;
break;}
case 58:
#line 462 "objc-parse.y"
#line 473 "objc-parse.y"
{ yyval.ttype = build_unary_op (IMAGPART_EXPR, yyvsp[0].ttype, 0); ;
break;}
case 59:
#line 464 "objc-parse.y"
#line 475 "objc-parse.y"
{ yyval.ttype = build_va_arg (yyvsp[-3].ttype, groktypename (yyvsp[-1].ttype)); ;
break;}
case 60:
#line 468 "objc-parse.y"
#line 479 "objc-parse.y"
{ skip_evaluation++; ;
break;}
case 61:
#line 472 "objc-parse.y"
#line 483 "objc-parse.y"
{ skip_evaluation++; ;
break;}
case 63:
#line 478 "objc-parse.y"
#line 489 "objc-parse.y"
{ tree type = groktypename (yyvsp[-2].ttype);
yyval.ttype = build_c_cast (type, yyvsp[0].ttype); ;
break;}
case 64:
#line 481 "objc-parse.y"
#line 492 "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 485 "objc-parse.y"
#line 496 "objc-parse.y"
{ char *name;
tree result = pop_init_level (0);
tree type = yyvsp[-5].ttype;
......@@ -2531,90 +2542,90 @@ case 65:
;
break;}
case 67:
#line 514 "objc-parse.y"
#line 525 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 68:
#line 516 "objc-parse.y"
#line 527 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 69:
#line 518 "objc-parse.y"
#line 529 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 70:
#line 520 "objc-parse.y"
#line 531 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 71:
#line 522 "objc-parse.y"
#line 533 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 72:
#line 524 "objc-parse.y"
#line 535 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 73:
#line 526 "objc-parse.y"
#line 537 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 74:
#line 528 "objc-parse.y"
#line 539 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 75:
#line 530 "objc-parse.y"
#line 541 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 76:
#line 532 "objc-parse.y"
#line 543 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 77:
#line 534 "objc-parse.y"
#line 545 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 78:
#line 536 "objc-parse.y"
#line 547 "objc-parse.y"
{ yyval.ttype = parser_build_binary_op (yyvsp[-1].code, yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 79:
#line 538 "objc-parse.y"
#line 549 "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 541 "objc-parse.y"
#line 552 "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 544 "objc-parse.y"
#line 555 "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 547 "objc-parse.y"
#line 558 "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 550 "objc-parse.y"
#line 561 "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 553 "objc-parse.y"
#line 564 "objc-parse.y"
{ skip_evaluation += ((yyvsp[-4].ttype == boolean_true_node)
- (yyvsp[-4].ttype == boolean_false_node)); ;
break;}
case 85:
#line 556 "objc-parse.y"
#line 567 "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 559 "objc-parse.y"
#line 570 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids omitting the middle term of a ?: expression");
/* Make sure first operand is calculated only once. */
......@@ -2623,12 +2634,12 @@ case 86:
skip_evaluation += yyvsp[-1].ttype == boolean_true_node; ;
break;}
case 87:
#line 566 "objc-parse.y"
#line 577 "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 569 "objc-parse.y"
#line 580 "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));
......@@ -2638,7 +2649,7 @@ case 88:
;
break;}
case 89:
#line 577 "objc-parse.y"
#line 588 "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. */
......@@ -2649,7 +2660,7 @@ case 89:
;
break;}
case 90:
#line 589 "objc-parse.y"
#line 600 "objc-parse.y"
{
yyval.ttype = lastiddecl;
if (!yyval.ttype || yyval.ttype == error_mark_node)
......@@ -2810,11 +2821,11 @@ case 90:
;
break;}
case 92:
#line 749 "objc-parse.y"
#line 760 "objc-parse.y"
{ yyval.ttype = combine_strings (yyvsp[0].ttype); ;
break;}
case 93:
#line 751 "objc-parse.y"
#line 762 "objc-parse.y"
{ char class = TREE_CODE_CLASS (TREE_CODE (yyvsp[-1].ttype));
if (class == 'e' || class == '1'
|| class == '2' || class == '<')
......@@ -2822,11 +2833,11 @@ case 93:
yyval.ttype = yyvsp[-1].ttype; ;
break;}
case 94:
#line 757 "objc-parse.y"
#line 768 "objc-parse.y"
{ yyval.ttype = error_mark_node; ;
break;}
case 95:
#line 759 "objc-parse.y"
#line 770 "objc-parse.y"
{ tree rtl_exp;
if (pedantic)
pedwarn ("ANSI C forbids braced-groups within expressions");
......@@ -2851,7 +2862,7 @@ case 95:
;
break;}
case 96:
#line 782 "objc-parse.y"
#line 793 "objc-parse.y"
{
/* Make sure we call expand_end_stmt_expr. Otherwise
we are likely to lose sequences and crash later. */
......@@ -2862,15 +2873,15 @@ case 96:
;
break;}
case 97:
#line 791 "objc-parse.y"
#line 802 "objc-parse.y"
{ yyval.ttype = build_function_call (yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 98:
#line 793 "objc-parse.y"
#line 804 "objc-parse.y"
{ yyval.ttype = build_array_ref (yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 99:
#line 795 "objc-parse.y"
#line 806 "objc-parse.y"
{
if (doing_objc_thang)
{
......@@ -2884,7 +2895,7 @@ case 99:
;
break;}
case 100:
#line 807 "objc-parse.y"
#line 818 "objc-parse.y"
{
tree expr = build_indirect_ref (yyvsp[-2].ttype, "->");
......@@ -2900,80 +2911,80 @@ case 100:
;
break;}
case 101:
#line 821 "objc-parse.y"
#line 832 "objc-parse.y"
{ yyval.ttype = build_unary_op (POSTINCREMENT_EXPR, yyvsp[-1].ttype, 0); ;
break;}
case 102:
#line 823 "objc-parse.y"
#line 834 "objc-parse.y"
{ yyval.ttype = build_unary_op (POSTDECREMENT_EXPR, yyvsp[-1].ttype, 0); ;
break;}
case 103:
#line 825 "objc-parse.y"
#line 836 "objc-parse.y"
{ yyval.ttype = build_message_expr (yyvsp[0].ttype); ;
break;}
case 104:
#line 827 "objc-parse.y"
#line 838 "objc-parse.y"
{ yyval.ttype = build_selector_expr (yyvsp[0].ttype); ;
break;}
case 105:
#line 829 "objc-parse.y"
#line 840 "objc-parse.y"
{ yyval.ttype = build_protocol_expr (yyvsp[0].ttype); ;
break;}
case 106:
#line 831 "objc-parse.y"
#line 842 "objc-parse.y"
{ yyval.ttype = build_encode_expr (yyvsp[0].ttype); ;
break;}
case 107:
#line 833 "objc-parse.y"
#line 844 "objc-parse.y"
{ yyval.ttype = build_objc_string_object (yyvsp[0].ttype); ;
break;}
case 109:
#line 840 "objc-parse.y"
#line 851 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 111:
#line 848 "objc-parse.y"
#line 859 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 114:
#line 856 "objc-parse.y"
#line 867 "objc-parse.y"
{ c_mark_varargs ();
if (pedantic)
pedwarn ("ANSI C does not permit use of `varargs.h'"); ;
break;}
case 115:
#line 866 "objc-parse.y"
#line 877 "objc-parse.y"
{ ;
break;}
case 120:
#line 882 "objc-parse.y"
#line 893 "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 887 "objc-parse.y"
#line 898 "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 892 "objc-parse.y"
#line 903 "objc-parse.y"
{ shadow_tag_warned (yyvsp[-1].ttype, 1);
pedwarn ("empty declaration"); ;
break;}
case 123:
#line 895 "objc-parse.y"
#line 906 "objc-parse.y"
{ pedwarn ("empty declaration"); ;
break;}
case 124:
#line 904 "objc-parse.y"
#line 915 "objc-parse.y"
{ ;
break;}
case 129:
#line 919 "objc-parse.y"
#line 930 "objc-parse.y"
{ yyval.itype = suspend_momentary ();
pending_xref_error ();
declspec_stack = tree_cons (prefix_attributes,
......@@ -2983,131 +2994,131 @@ case 129:
&current_declspecs, &prefix_attributes); ;
break;}
case 130:
#line 930 "objc-parse.y"
#line 941 "objc-parse.y"
{ prefix_attributes = chainon (prefix_attributes, yyvsp[0].ttype); ;
break;}
case 131:
#line 935 "objc-parse.y"
#line 946 "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 940 "objc-parse.y"
#line 951 "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 945 "objc-parse.y"
#line 956 "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 950 "objc-parse.y"
#line 961 "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 955 "objc-parse.y"
#line 966 "objc-parse.y"
{ shadow_tag (yyvsp[-1].ttype); ;
break;}
case 136:
#line 957 "objc-parse.y"
#line 968 "objc-parse.y"
{ pedwarn ("empty declaration"); ;
break;}
case 137:
#line 959 "objc-parse.y"
#line 970 "objc-parse.y"
{ pedantic = yyvsp[-1].itype; ;
break;}
case 138:
#line 969 "objc-parse.y"
#line 980 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 139:
#line 971 "objc-parse.y"
#line 982 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ;
break;}
case 140:
#line 975 "objc-parse.y"
#line 986 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 141:
#line 977 "objc-parse.y"
#line 988 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ;
break;}
case 142:
#line 979 "objc-parse.y"
#line 990 "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 984 "objc-parse.y"
#line 995 "objc-parse.y"
{ yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, yyvsp[-1].ttype); ;
break;}
case 144:
#line 989 "objc-parse.y"
#line 1000 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 145:
#line 991 "objc-parse.y"
#line 1002 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ;
break;}
case 146:
#line 996 "objc-parse.y"
#line 1007 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 147:
#line 998 "objc-parse.y"
#line 1009 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ;
break;}
case 148:
#line 1000 "objc-parse.y"
#line 1011 "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 1013 "objc-parse.y"
#line 1024 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 150:
#line 1015 "objc-parse.y"
#line 1026 "objc-parse.y"
{ yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, NULL_TREE); ;
break;}
case 151:
#line 1017 "objc-parse.y"
#line 1028 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[0].ttype, yyvsp[-1].ttype); ;
break;}
case 152:
#line 1019 "objc-parse.y"
#line 1030 "objc-parse.y"
{ yyval.ttype = tree_cons (yyvsp[0].ttype, NULL_TREE, yyvsp[-1].ttype); ;
break;}
case 153:
#line 1024 "objc-parse.y"
#line 1035 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE);
TREE_STATIC (yyval.ttype) = 1; ;
break;}
case 154:
#line 1027 "objc-parse.y"
#line 1038 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 155:
#line 1029 "objc-parse.y"
#line 1040 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype);
TREE_STATIC (yyval.ttype) = 1; ;
break;}
case 156:
#line 1032 "objc-parse.y"
#line 1043 "objc-parse.y"
{ if (extra_warnings && TREE_STATIC (yyvsp[-1].ttype))
warning ("`%s' is not at beginning of declaration",
IDENTIFIER_POINTER (yyvsp[0].ttype));
......@@ -3115,150 +3126,150 @@ case 156:
TREE_STATIC (yyval.ttype) = TREE_STATIC (yyvsp[-1].ttype); ;
break;}
case 157:
#line 1046 "objc-parse.y"
#line 1057 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 158:
#line 1048 "objc-parse.y"
#line 1059 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[0].ttype, tree_cons (NULL_TREE, yyvsp[-1].ttype, yyvsp[-2].ttype)); ;
break;}
case 159:
#line 1052 "objc-parse.y"
#line 1063 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 160:
#line 1054 "objc-parse.y"
#line 1065 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ;
break;}
case 163:
#line 1064 "objc-parse.y"
#line 1075 "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 1068 "objc-parse.y"
#line 1079 "objc-parse.y"
{ yyval.ttype = get_static_reference (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 165:
#line 1070 "objc-parse.y"
#line 1081 "objc-parse.y"
{ yyval.ttype = get_object_reference (yyvsp[0].ttype); ;
break;}
case 166:
#line 1075 "objc-parse.y"
#line 1086 "objc-parse.y"
{ yyval.ttype = get_object_reference (yyvsp[0].ttype); ;
break;}
case 167:
#line 1077 "objc-parse.y"
#line 1088 "objc-parse.y"
{ yyval.ttype = TREE_TYPE (yyvsp[-1].ttype); ;
break;}
case 168:
#line 1079 "objc-parse.y"
#line 1090 "objc-parse.y"
{ yyval.ttype = groktypename (yyvsp[-1].ttype); ;
break;}
case 176:
#line 1101 "objc-parse.y"
#line 1112 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 177:
#line 1103 "objc-parse.y"
#line 1114 "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 1110 "objc-parse.y"
#line 1121 "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 1115 "objc-parse.y"
#line 1126 "objc-parse.y"
{ finish_init ();
finish_decl (yyvsp[-1].ttype, yyvsp[0].ttype, yyvsp[-4].ttype); ;
break;}
case 180:
#line 1118 "objc-parse.y"
#line 1129 "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 1126 "objc-parse.y"
#line 1137 "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 1131 "objc-parse.y"
#line 1142 "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 1135 "objc-parse.y"
#line 1146 "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 1143 "objc-parse.y"
#line 1154 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 185:
#line 1145 "objc-parse.y"
#line 1156 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 186:
#line 1150 "objc-parse.y"
#line 1161 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 187:
#line 1152 "objc-parse.y"
#line 1163 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 188:
#line 1157 "objc-parse.y"
#line 1168 "objc-parse.y"
{ yyval.ttype = yyvsp[-2].ttype; ;
break;}
case 189:
#line 1162 "objc-parse.y"
#line 1173 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 190:
#line 1164 "objc-parse.y"
#line 1175 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 191:
#line 1169 "objc-parse.y"
#line 1180 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 192:
#line 1171 "objc-parse.y"
#line 1182 "objc-parse.y"
{ yyval.ttype = build_tree_list (yyvsp[0].ttype, NULL_TREE); ;
break;}
case 193:
#line 1173 "objc-parse.y"
#line 1184 "objc-parse.y"
{ yyval.ttype = build_tree_list (yyvsp[-3].ttype, build_tree_list (NULL_TREE, yyvsp[-1].ttype)); ;
break;}
case 194:
#line 1175 "objc-parse.y"
#line 1186 "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 1177 "objc-parse.y"
#line 1188 "objc-parse.y"
{ yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 201:
#line 1195 "objc-parse.y"
#line 1206 "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 1200 "objc-parse.y"
#line 1211 "objc-parse.y"
{ yyval.ttype = pop_init_level (0);
if (yyval.ttype == error_mark_node
&& ! (yychar == STRING || yychar == CONSTANT))
......@@ -3267,36 +3278,36 @@ case 202:
pop_momentary_nofree (); ;
break;}
case 203:
#line 1208 "objc-parse.y"
#line 1219 "objc-parse.y"
{ yyval.ttype = error_mark_node; ;
break;}
case 204:
#line 1214 "objc-parse.y"
#line 1225 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids empty initializer braces"); ;
break;}
case 210:
#line 1230 "objc-parse.y"
#line 1241 "objc-parse.y"
{ set_init_label (yyvsp[-1].ttype); ;
break;}
case 213:
#line 1237 "objc-parse.y"
#line 1248 "objc-parse.y"
{ push_init_level (0); ;
break;}
case 214:
#line 1239 "objc-parse.y"
#line 1250 "objc-parse.y"
{ process_init_element (pop_init_level (0)); ;
break;}
case 215:
#line 1241 "objc-parse.y"
#line 1252 "objc-parse.y"
{ process_init_element (yyvsp[0].ttype); ;
break;}
case 219:
#line 1252 "objc-parse.y"
#line 1263 "objc-parse.y"
{ set_init_label (yyvsp[0].ttype); ;
break;}
case 220:
#line 1260 "objc-parse.y"
#line 1271 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids nested functions");
......@@ -3310,16 +3321,16 @@ case 220:
reinit_parse_for_function (); ;
break;}
case 221:
#line 1272 "objc-parse.y"
#line 1283 "objc-parse.y"
{ store_parm_decls (); ;
break;}
case 222:
#line 1280 "objc-parse.y"
#line 1291 "objc-parse.y"
{ finish_function (1);
pop_function_context (); ;
break;}
case 223:
#line 1286 "objc-parse.y"
#line 1297 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids nested functions");
......@@ -3333,197 +3344,197 @@ case 223:
reinit_parse_for_function (); ;
break;}
case 224:
#line 1298 "objc-parse.y"
#line 1309 "objc-parse.y"
{ store_parm_decls (); ;
break;}
case 225:
#line 1306 "objc-parse.y"
#line 1317 "objc-parse.y"
{ finish_function (1);
pop_function_context (); ;
break;}
case 228:
#line 1322 "objc-parse.y"
#line 1333 "objc-parse.y"
{ yyval.ttype = yyvsp[-1].ttype; ;
break;}
case 229:
#line 1324 "objc-parse.y"
#line 1335 "objc-parse.y"
{ yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 230:
#line 1329 "objc-parse.y"
#line 1340 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 231:
#line 1331 "objc-parse.y"
#line 1342 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ;
break;}
case 232:
#line 1333 "objc-parse.y"
#line 1344 "objc-parse.y"
{ yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 233:
#line 1340 "objc-parse.y"
#line 1351 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 236:
#line 1352 "objc-parse.y"
#line 1363 "objc-parse.y"
{ yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 237:
#line 1357 "objc-parse.y"
#line 1368 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 238:
#line 1359 "objc-parse.y"
#line 1370 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ;
break;}
case 239:
#line 1361 "objc-parse.y"
#line 1372 "objc-parse.y"
{ yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 240:
#line 1368 "objc-parse.y"
#line 1379 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 242:
#line 1377 "objc-parse.y"
#line 1388 "objc-parse.y"
{ yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 243:
#line 1382 "objc-parse.y"
#line 1393 "objc-parse.y"
{ yyval.ttype = yyvsp[-1].ttype; ;
break;}
case 244:
#line 1384 "objc-parse.y"
#line 1395 "objc-parse.y"
{ yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 245:
#line 1386 "objc-parse.y"
#line 1397 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 246:
#line 1388 "objc-parse.y"
#line 1399 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ;
break;}
case 247:
#line 1395 "objc-parse.y"
#line 1406 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 249:
#line 1401 "objc-parse.y"
#line 1412 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 250:
#line 1403 "objc-parse.y"
#line 1414 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 251:
#line 1408 "objc-parse.y"
#line 1419 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 252:
#line 1410 "objc-parse.y"
#line 1421 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 253:
#line 1415 "objc-parse.y"
#line 1426 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 254:
#line 1417 "objc-parse.y"
#line 1428 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 255:
#line 1422 "objc-parse.y"
#line 1433 "objc-parse.y"
{ yyval.ttype = start_struct (RECORD_TYPE, yyvsp[-1].ttype);
/* Start scope of tag before parsing components. */
;
break;}
case 256:
#line 1426 "objc-parse.y"
#line 1437 "objc-parse.y"
{ yyval.ttype = finish_struct (yyvsp[-3].ttype, yyvsp[-2].ttype, chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); ;
break;}
case 257:
#line 1428 "objc-parse.y"
#line 1439 "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 1432 "objc-parse.y"
#line 1443 "objc-parse.y"
{ yyval.ttype = xref_tag (RECORD_TYPE, yyvsp[0].ttype); ;
break;}
case 259:
#line 1434 "objc-parse.y"
#line 1445 "objc-parse.y"
{ yyval.ttype = start_struct (UNION_TYPE, yyvsp[-1].ttype); ;
break;}
case 260:
#line 1436 "objc-parse.y"
#line 1447 "objc-parse.y"
{ yyval.ttype = finish_struct (yyvsp[-3].ttype, yyvsp[-2].ttype, chainon (yyvsp[-6].ttype, yyvsp[0].ttype)); ;
break;}
case 261:
#line 1438 "objc-parse.y"
#line 1449 "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 1442 "objc-parse.y"
#line 1453 "objc-parse.y"
{ yyval.ttype = xref_tag (UNION_TYPE, yyvsp[0].ttype); ;
break;}
case 263:
#line 1444 "objc-parse.y"
#line 1455 "objc-parse.y"
{ yyvsp[0].itype = suspend_momentary ();
yyval.ttype = start_enum (yyvsp[-1].ttype); ;
break;}
case 264:
#line 1447 "objc-parse.y"
#line 1458 "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 1450 "objc-parse.y"
#line 1461 "objc-parse.y"
{ yyvsp[0].itype = suspend_momentary ();
yyval.ttype = start_enum (NULL_TREE); ;
break;}
case 266:
#line 1453 "objc-parse.y"
#line 1464 "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 1456 "objc-parse.y"
#line 1467 "objc-parse.y"
{ yyval.ttype = xref_tag (ENUMERAL_TYPE, yyvsp[0].ttype); ;
break;}
case 271:
#line 1467 "objc-parse.y"
#line 1478 "objc-parse.y"
{ if (pedantic && ! flag_isoc9x)
pedwarn ("comma at end of enumerator list"); ;
break;}
case 272:
#line 1473 "objc-parse.y"
#line 1484 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 273:
#line 1475 "objc-parse.y"
#line 1486 "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 1480 "objc-parse.y"
#line 1491 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 275:
#line 1482 "objc-parse.y"
#line 1493 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[-1].ttype); ;
break;}
case 276:
#line 1484 "objc-parse.y"
#line 1495 "objc-parse.y"
{ if (pedantic)
pedwarn ("extra semicolon in struct or union specified"); ;
break;}
case 277:
#line 1488 "objc-parse.y"
#line 1499 "objc-parse.y"
{
tree interface = lookup_interface (yyvsp[-1].ttype);
......@@ -3538,7 +3549,7 @@ case 277:
;
break;}
case 278:
#line 1513 "objc-parse.y"
#line 1524 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -3546,14 +3557,14 @@ case 278:
resume_momentary (yyvsp[-1].itype); ;
break;}
case 279:
#line 1519 "objc-parse.y"
#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 1524 "objc-parse.y"
#line 1535 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -3561,144 +3572,144 @@ case 280:
resume_momentary (yyvsp[-1].itype); ;
break;}
case 281:
#line 1530 "objc-parse.y"
#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:
#line 1535 "objc-parse.y"
#line 1546 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 283:
#line 1537 "objc-parse.y"
#line 1548 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
pedantic = yyvsp[-1].itype; ;
break;}
case 285:
#line 1544 "objc-parse.y"
#line 1555 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 286:
#line 1549 "objc-parse.y"
#line 1560 "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 1553 "objc-parse.y"
#line 1564 "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 1556 "objc-parse.y"
#line 1567 "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 1568 "objc-parse.y"
#line 1579 "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 1573 "objc-parse.y"
#line 1584 "objc-parse.y"
{ yyval.ttype = error_mark_node; ;
break;}
case 292:
#line 1579 "objc-parse.y"
#line 1590 "objc-parse.y"
{ yyval.ttype = build_enumerator (yyvsp[0].ttype, NULL_TREE); ;
break;}
case 293:
#line 1581 "objc-parse.y"
#line 1592 "objc-parse.y"
{ yyval.ttype = build_enumerator (yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 294:
#line 1586 "objc-parse.y"
#line 1597 "objc-parse.y"
{ yyval.ttype = build_tree_list (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 295:
#line 1588 "objc-parse.y"
#line 1599 "objc-parse.y"
{ yyval.ttype = build_tree_list (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 296:
#line 1593 "objc-parse.y"
#line 1604 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 298:
#line 1599 "objc-parse.y"
#line 1610 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 299:
#line 1601 "objc-parse.y"
#line 1612 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ;
break;}
case 300:
#line 1606 "objc-parse.y"
#line 1617 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 301:
#line 1608 "objc-parse.y"
#line 1619 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, yyvsp[0].ttype, yyvsp[-1].ttype); ;
break;}
case 302:
#line 1613 "objc-parse.y"
#line 1624 "objc-parse.y"
{ yyval.ttype = yyvsp[-1].ttype; ;
break;}
case 303:
#line 1616 "objc-parse.y"
#line 1627 "objc-parse.y"
{ yyval.ttype = make_pointer_declarator (yyvsp[-1].ttype, yyvsp[0].ttype); ;
break;}
case 304:
#line 1618 "objc-parse.y"
#line 1629 "objc-parse.y"
{ yyval.ttype = make_pointer_declarator (yyvsp[0].ttype, NULL_TREE); ;
break;}
case 305:
#line 1620 "objc-parse.y"
#line 1631 "objc-parse.y"
{ yyval.ttype = build_nt (CALL_EXPR, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 306:
#line 1622 "objc-parse.y"
#line 1633 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 307:
#line 1624 "objc-parse.y"
#line 1635 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, yyvsp[-2].ttype, NULL_TREE); ;
break;}
case 308:
#line 1626 "objc-parse.y"
#line 1637 "objc-parse.y"
{ yyval.ttype = build_nt (CALL_EXPR, NULL_TREE, yyvsp[0].ttype, NULL_TREE); ;
break;}
case 309:
#line 1628 "objc-parse.y"
#line 1639 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, NULL_TREE, yyvsp[-1].ttype); ;
break;}
case 310:
#line 1630 "objc-parse.y"
#line 1641 "objc-parse.y"
{ yyval.ttype = build_nt (ARRAY_REF, NULL_TREE, NULL_TREE); ;
break;}
case 311:
#line 1634 "objc-parse.y"
#line 1645 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 312:
#line 1643 "objc-parse.y"
#line 1654 "objc-parse.y"
{
if (pedantic && yyvsp[0].ends_in_label)
pedwarn ("ANSI C forbids label at end of compound statement");
;
break;}
case 314:
#line 1652 "objc-parse.y"
#line 1663 "objc-parse.y"
{ yyval.ends_in_label = yyvsp[0].ends_in_label; ;
break;}
case 315:
#line 1654 "objc-parse.y"
#line 1665 "objc-parse.y"
{ yyval.ends_in_label = 0; ;
break;}
case 319:
#line 1666 "objc-parse.y"
#line 1677 "objc-parse.y"
{ emit_line_note (input_filename, lineno);
pushlevel (0);
clear_last_expr ();
......@@ -3709,12 +3720,12 @@ case 319:
;
break;}
case 321:
#line 1681 "objc-parse.y"
#line 1692 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids label declarations"); ;
break;}
case 324:
#line 1692 "objc-parse.y"
#line 1703 "objc-parse.y"
{ tree link;
for (link = yyvsp[-1].ttype; link; link = TREE_CHAIN (link))
{
......@@ -3725,19 +3736,19 @@ case 324:
;
break;}
case 325:
#line 1706 "objc-parse.y"
#line 1717 "objc-parse.y"
{;
break;}
case 327:
#line 1710 "objc-parse.y"
#line 1721 "objc-parse.y"
{ compstmt_count++; ;
break;}
case 328:
#line 1713 "objc-parse.y"
#line 1724 "objc-parse.y"
{ yyval.ttype = convert (void_type_node, integer_zero_node); ;
break;}
case 329:
#line 1715 "objc-parse.y"
#line 1726 "objc-parse.y"
{ emit_line_note (input_filename, lineno);
expand_end_bindings (getdecls (), 1, 0);
yyval.ttype = poplevel (1, 1, 0);
......@@ -3747,7 +3758,7 @@ case 329:
pop_momentary (); ;
break;}
case 330:
#line 1723 "objc-parse.y"
#line 1734 "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);
......@@ -3757,7 +3768,7 @@ case 330:
pop_momentary (); ;
break;}
case 331:
#line 1731 "objc-parse.y"
#line 1742 "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);
......@@ -3767,7 +3778,7 @@ case 331:
pop_momentary (); ;
break;}
case 332:
#line 1742 "objc-parse.y"
#line 1753 "objc-parse.y"
{ if (current_function_decl == 0)
{
error ("braced-group within expression allowed only inside a function");
......@@ -3785,11 +3796,11 @@ case 332:
;
break;}
case 333:
#line 1759 "objc-parse.y"
#line 1770 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 336:
#line 1773 "objc-parse.y"
#line 1784 "objc-parse.y"
{ emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno);
c_expand_start_cond (truthvalue_conversion (yyvsp[-1].ttype), 0,
compstmt_count);
......@@ -3799,7 +3810,7 @@ case 336:
position_after_white_space (); ;
break;}
case 337:
#line 1787 "objc-parse.y"
#line 1798 "objc-parse.y"
{ stmt_count++;
compstmt_count++;
emit_line_note (yyvsp[-2].filename, yyvsp[-1].lineno);
......@@ -3809,43 +3820,43 @@ case 337:
position_after_white_space (); ;
break;}
case 338:
#line 1795 "objc-parse.y"
#line 1806 "objc-parse.y"
{ expand_loop_continue_here (); ;
break;}
case 339:
#line 1799 "objc-parse.y"
#line 1810 "objc-parse.y"
{ yyval.filename = input_filename; ;
break;}
case 340:
#line 1803 "objc-parse.y"
#line 1814 "objc-parse.y"
{ yyval.lineno = lineno; ;
break;}
case 341:
#line 1808 "objc-parse.y"
#line 1819 "objc-parse.y"
{ ;
break;}
case 342:
#line 1813 "objc-parse.y"
#line 1824 "objc-parse.y"
{ ;
break;}
case 343:
#line 1818 "objc-parse.y"
#line 1829 "objc-parse.y"
{ yyval.ends_in_label = yyvsp[0].ends_in_label; ;
break;}
case 344:
#line 1823 "objc-parse.y"
#line 1834 "objc-parse.y"
{ yyval.ends_in_label = 0; ;
break;}
case 345:
#line 1825 "objc-parse.y"
#line 1836 "objc-parse.y"
{ yyval.ends_in_label = 1; ;
break;}
case 346:
#line 1831 "objc-parse.y"
#line 1842 "objc-parse.y"
{ stmt_count++; ;
break;}
case 348:
#line 1834 "objc-parse.y"
#line 1845 "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
......@@ -3864,19 +3875,19 @@ case 348:
clear_momentary (); ;
break;}
case 349:
#line 1851 "objc-parse.y"
#line 1862 "objc-parse.y"
{ c_expand_start_else ();
yyvsp[-1].itype = stmt_count;
position_after_white_space (); ;
break;}
case 350:
#line 1855 "objc-parse.y"
#line 1866 "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 1859 "objc-parse.y"
#line 1870 "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
......@@ -3887,11 +3898,11 @@ case 351:
"empty body in an if-statement"); ;
break;}
case 352:
#line 1871 "objc-parse.y"
#line 1882 "objc-parse.y"
{ c_expand_end_cond (); ;
break;}
case 353:
#line 1873 "objc-parse.y"
#line 1884 "objc-parse.y"
{ stmt_count++;
emit_line_note (yyvsp[-2].filename, yyvsp[-1].lineno);
/* The emit_nop used to come before emit_line_note,
......@@ -3903,7 +3914,7 @@ case 353:
emit_nop (); ;
break;}
case 354:
#line 1883 "objc-parse.y"
#line 1894 "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. */
......@@ -3914,11 +3925,11 @@ case 354:
position_after_white_space (); ;
break;}
case 355:
#line 1892 "objc-parse.y"
#line 1903 "objc-parse.y"
{ expand_end_loop (); ;
break;}
case 356:
#line 1895 "objc-parse.y"
#line 1906 "objc-parse.y"
{ emit_line_note (input_filename, lineno);
expand_exit_loop_if_false (NULL_PTR,
truthvalue_conversion (yyvsp[-2].ttype));
......@@ -3926,12 +3937,12 @@ case 356:
clear_momentary (); ;
break;}
case 357:
#line 1902 "objc-parse.y"
#line 1913 "objc-parse.y"
{ expand_end_loop ();
clear_momentary (); ;
break;}
case 358:
#line 1906 "objc-parse.y"
#line 1917 "objc-parse.y"
{ stmt_count++;
emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno);
/* See comment in `while' alternative, above. */
......@@ -3944,12 +3955,12 @@ case 358:
;
break;}
case 359:
#line 1918 "objc-parse.y"
#line 1929 "objc-parse.y"
{ yyvsp[0].lineno = lineno;
yyval.filename = input_filename; ;
break;}
case 360:
#line 1921 "objc-parse.y"
#line 1932 "objc-parse.y"
{
/* Start the loop. Doing this after parsing
all the expressions ensures we will end the loop. */
......@@ -3967,7 +3978,7 @@ case 360:
position_after_white_space (); ;
break;}
case 361:
#line 1937 "objc-parse.y"
#line 1948 "objc-parse.y"
{ /* Emit the increment expression, with a line number. */
emit_line_note (yyvsp[-4].filename, yyvsp[-5].lineno);
expand_loop_continue_here ();
......@@ -3980,7 +3991,7 @@ case 361:
expand_end_loop (); ;
break;}
case 362:
#line 1948 "objc-parse.y"
#line 1959 "objc-parse.y"
{ stmt_count++;
emit_line_note (yyvsp[-5].filename, yyvsp[-4].lineno);
c_expand_start_case (yyvsp[-1].ttype);
......@@ -3990,7 +4001,7 @@ case 362:
position_after_white_space (); ;
break;}
case 363:
#line 1956 "objc-parse.y"
#line 1967 "objc-parse.y"
{ expand_end_case (yyvsp[-3].ttype);
if (yychar == CONSTANT || yychar == STRING)
pop_momentary_nofree ();
......@@ -3998,33 +4009,33 @@ case 363:
pop_momentary (); ;
break;}
case 364:
#line 1962 "objc-parse.y"
#line 1973 "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 1967 "objc-parse.y"
#line 1978 "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 1972 "objc-parse.y"
#line 1983 "objc-parse.y"
{ stmt_count++;
emit_line_note (yyvsp[-3].filename, yyvsp[-2].lineno);
c_expand_return (NULL_TREE); ;
break;}
case 367:
#line 1976 "objc-parse.y"
#line 1987 "objc-parse.y"
{ stmt_count++;
emit_line_note (yyvsp[-4].filename, yyvsp[-3].lineno);
c_expand_return (yyvsp[-1].ttype); ;
break;}
case 368:
#line 1980 "objc-parse.y"
#line 1991 "objc-parse.y"
{ stmt_count++;
emit_line_note (yyvsp[-7].filename, yyvsp[-6].lineno);
STRIP_NOPS (yyvsp[-2].ttype);
......@@ -4036,7 +4047,7 @@ case 368:
error ("argument of `asm' is not a constant string"); ;
break;}
case 369:
#line 1991 "objc-parse.y"
#line 2002 "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,
......@@ -4044,7 +4055,7 @@ case 369:
input_filename, lineno); ;
break;}
case 370:
#line 1998 "objc-parse.y"
#line 2009 "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,
......@@ -4052,7 +4063,7 @@ case 370:
input_filename, lineno); ;
break;}
case 371:
#line 2006 "objc-parse.y"
#line 2017 "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,
......@@ -4060,7 +4071,7 @@ case 371:
input_filename, lineno); ;
break;}
case 372:
#line 2012 "objc-parse.y"
#line 2023 "objc-parse.y"
{ tree decl;
stmt_count++;
emit_line_note (yyvsp[-4].filename, yyvsp[-3].lineno);
......@@ -4073,7 +4084,7 @@ case 372:
;
break;}
case 373:
#line 2023 "objc-parse.y"
#line 2034 "objc-parse.y"
{ if (pedantic)
pedwarn ("ANSI C forbids `goto *expr;'");
stmt_count++;
......@@ -4081,7 +4092,7 @@ case 373:
expand_computed_goto (convert (ptr_type_node, yyvsp[-1].ttype)); ;
break;}
case 376:
#line 2038 "objc-parse.y"
#line 2049 "objc-parse.y"
{
/* The value returned by this action is */
/* 1 if everything is OK */
......@@ -4104,14 +4115,14 @@ case 376:
;
break;}
case 377:
#line 2059 "objc-parse.y"
#line 2070 "objc-parse.y"
{
if (yyvsp[-1].itype)
iterator_for_loop_end (yyvsp[-3].ttype);
;
break;}
case 378:
#line 2094 "objc-parse.y"
#line 2105 "objc-parse.y"
{ register tree value = check_case_value (yyvsp[-1].ttype);
register tree label
= build_decl (LABEL_DECL, NULL_TREE, NULL_TREE);
......@@ -4144,7 +4155,7 @@ case 378:
position_after_white_space (); ;
break;}
case 379:
#line 2125 "objc-parse.y"
#line 2136 "objc-parse.y"
{ register tree value1 = check_case_value (yyvsp[-3].ttype);
register tree value2 = check_case_value (yyvsp[-1].ttype);
register tree label
......@@ -4177,7 +4188,7 @@ case 379:
position_after_white_space (); ;
break;}
case 380:
#line 2156 "objc-parse.y"
#line 2167 "objc-parse.y"
{
tree duplicate;
register tree label
......@@ -4194,7 +4205,7 @@ case 380:
position_after_white_space (); ;
break;}
case 381:
#line 2171 "objc-parse.y"
#line 2182 "objc-parse.y"
{ tree label = define_label (input_filename, lineno, yyvsp[-2].ttype);
stmt_count++;
emit_nop ();
......@@ -4206,52 +4217,52 @@ case 381:
position_after_white_space (); ;
break;}
case 382:
#line 2186 "objc-parse.y"
#line 2197 "objc-parse.y"
{ emit_line_note (input_filename, lineno);
yyval.ttype = NULL_TREE; ;
break;}
case 383:
#line 2189 "objc-parse.y"
#line 2200 "objc-parse.y"
{ emit_line_note (input_filename, lineno); ;
break;}
case 384:
#line 2194 "objc-parse.y"
#line 2205 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 386:
#line 2201 "objc-parse.y"
#line 2212 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 389:
#line 2208 "objc-parse.y"
#line 2219 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, yyvsp[0].ttype); ;
break;}
case 390:
#line 2213 "objc-parse.y"
#line 2224 "objc-parse.y"
{ yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype); ;
break;}
case 391:
#line 2218 "objc-parse.y"
#line 2229 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, combine_strings (yyvsp[0].ttype), NULL_TREE); ;
break;}
case 392:
#line 2220 "objc-parse.y"
#line 2231 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, combine_strings (yyvsp[0].ttype), yyvsp[-2].ttype); ;
break;}
case 393:
#line 2226 "objc-parse.y"
#line 2237 "objc-parse.y"
{ pushlevel (0);
clear_parm_order ();
declare_parm_level (0); ;
break;}
case 394:
#line 2230 "objc-parse.y"
#line 2241 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
parmlist_tags_warning ();
poplevel (0, 0, 0); ;
break;}
case 396:
#line 2238 "objc-parse.y"
#line 2249 "objc-parse.y"
{ tree parm;
if (pedantic)
pedwarn ("ANSI C forbids forward parameter declarations");
......@@ -4261,19 +4272,19 @@ case 396:
clear_parm_order (); ;
break;}
case 397:
#line 2246 "objc-parse.y"
#line 2257 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype; ;
break;}
case 398:
#line 2248 "objc-parse.y"
#line 2259 "objc-parse.y"
{ yyval.ttype = tree_cons (NULL_TREE, NULL_TREE, NULL_TREE); ;
break;}
case 399:
#line 2254 "objc-parse.y"
#line 2265 "objc-parse.y"
{ yyval.ttype = get_parm_info (0); ;
break;}
case 400:
#line 2256 "objc-parse.y"
#line 2267 "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.
......@@ -4285,23 +4296,23 @@ case 400:
;
break;}
case 401:
#line 2266 "objc-parse.y"
#line 2277 "objc-parse.y"
{ yyval.ttype = get_parm_info (1); ;
break;}
case 402:
#line 2268 "objc-parse.y"
#line 2279 "objc-parse.y"
{ yyval.ttype = get_parm_info (0); ;
break;}
case 403:
#line 2273 "objc-parse.y"
#line 2284 "objc-parse.y"
{ push_parm_decl (yyvsp[0].ttype); ;
break;}
case 404:
#line 2275 "objc-parse.y"
#line 2286 "objc-parse.y"
{ push_parm_decl (yyvsp[0].ttype); ;
break;}
case 405:
#line 2282 "objc-parse.y"
#line 2293 "objc-parse.y"
{ yyval.ttype = build_tree_list (build_tree_list (current_declspecs,
yyvsp[-1].ttype),
build_tree_list (prefix_attributes,
......@@ -4312,7 +4323,7 @@ case 405:
resume_momentary (yyvsp[-2].itype); ;
break;}
case 406:
#line 2291 "objc-parse.y"
#line 2302 "objc-parse.y"
{ yyval.ttype = build_tree_list (build_tree_list (current_declspecs,
yyvsp[-1].ttype),
build_tree_list (prefix_attributes,
......@@ -4323,7 +4334,7 @@ case 406:
resume_momentary (yyvsp[-2].itype); ;
break;}
case 407:
#line 2300 "objc-parse.y"
#line 2311 "objc-parse.y"
{ yyval.ttype = build_tree_list (build_tree_list (current_declspecs,
yyvsp[-1].ttype),
build_tree_list (prefix_attributes,
......@@ -4334,7 +4345,7 @@ case 407:
resume_momentary (yyvsp[-2].itype); ;
break;}
case 408:
#line 2309 "objc-parse.y"
#line 2320 "objc-parse.y"
{ yyval.ttype = build_tree_list (build_tree_list (current_declspecs,
yyvsp[-1].ttype),
build_tree_list (prefix_attributes,
......@@ -4345,7 +4356,7 @@ case 408:
resume_momentary (yyvsp[-2].itype); ;
break;}
case 409:
#line 2319 "objc-parse.y"
#line 2330 "objc-parse.y"
{ yyval.ttype = build_tree_list (build_tree_list (current_declspecs,
yyvsp[-1].ttype),
build_tree_list (prefix_attributes,
......@@ -4356,19 +4367,19 @@ case 409:
resume_momentary (yyvsp[-2].itype); ;
break;}
case 410:
#line 2333 "objc-parse.y"
#line 2344 "objc-parse.y"
{ pushlevel (0);
clear_parm_order ();
declare_parm_level (1); ;
break;}
case 411:
#line 2337 "objc-parse.y"
#line 2348 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
parmlist_tags_warning ();
poplevel (0, 0, 0); ;
break;}
case 413:
#line 2345 "objc-parse.y"
#line 2356 "objc-parse.y"
{ tree t;
for (t = yyvsp[-1].ttype; t; t = TREE_CHAIN (t))
if (TREE_VALUE (t) == NULL_TREE)
......@@ -4376,28 +4387,28 @@ case 413:
yyval.ttype = tree_cons (NULL_TREE, NULL_TREE, yyvsp[-1].ttype); ;
break;}
case 414:
#line 2355 "objc-parse.y"
#line 2366 "objc-parse.y"
{ yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ;
break;}
case 415:
#line 2357 "objc-parse.y"
#line 2368 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ;
break;}
case 416:
#line 2363 "objc-parse.y"
#line 2374 "objc-parse.y"
{ yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ;
break;}
case 417:
#line 2365 "objc-parse.y"
#line 2376 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ;
break;}
case 418:
#line 2370 "objc-parse.y"
#line 2381 "objc-parse.y"
{ yyval.itype = pedantic;
pedantic = 0; ;
break;}
case 424:
#line 2383 "objc-parse.y"
#line 2394 "objc-parse.y"
{
if (objc_implementation_context)
{
......@@ -4410,27 +4421,27 @@ case 424:
;
break;}
case 425:
#line 2398 "objc-parse.y"
#line 2409 "objc-parse.y"
{ yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype); ;
break;}
case 426:
#line 2400 "objc-parse.y"
#line 2411 "objc-parse.y"
{ yyval.ttype = chainon (yyvsp[-2].ttype, build_tree_list (NULL_TREE, yyvsp[0].ttype)); ;
break;}
case 427:
#line 2405 "objc-parse.y"
#line 2416 "objc-parse.y"
{
objc_declare_class (yyvsp[-1].ttype);
;
break;}
case 428:
#line 2411 "objc-parse.y"
#line 2422 "objc-parse.y"
{
objc_declare_alias (yyvsp[-2].ttype, yyvsp[-1].ttype);
;
break;}
case 429:
#line 2417 "objc-parse.y"
#line 2428 "objc-parse.y"
{
objc_interface_context = objc_ivar_context
= start_class (CLASS_INTERFACE_TYPE, yyvsp[-2].ttype, NULL_TREE, yyvsp[-1].ttype);
......@@ -4438,20 +4449,20 @@ case 429:
;
break;}
case 430:
#line 2423 "objc-parse.y"
#line 2434 "objc-parse.y"
{
continue_class (objc_interface_context);
;
break;}
case 431:
#line 2428 "objc-parse.y"
#line 2439 "objc-parse.y"
{
finish_class (objc_interface_context);
objc_interface_context = NULL_TREE;
;
break;}
case 432:
#line 2434 "objc-parse.y"
#line 2445 "objc-parse.y"
{
objc_interface_context
= start_class (CLASS_INTERFACE_TYPE, yyvsp[-1].ttype, NULL_TREE, yyvsp[0].ttype);
......@@ -4459,14 +4470,14 @@ case 432:
;
break;}
case 433:
#line 2441 "objc-parse.y"
#line 2452 "objc-parse.y"
{
finish_class (objc_interface_context);
objc_interface_context = NULL_TREE;
;
break;}
case 434:
#line 2447 "objc-parse.y"
#line 2458 "objc-parse.y"
{
objc_interface_context = objc_ivar_context
= start_class (CLASS_INTERFACE_TYPE, yyvsp[-4].ttype, yyvsp[-2].ttype, yyvsp[-1].ttype);
......@@ -4474,20 +4485,20 @@ case 434:
;
break;}
case 435:
#line 2453 "objc-parse.y"
#line 2464 "objc-parse.y"
{
continue_class (objc_interface_context);
;
break;}
case 436:
#line 2458 "objc-parse.y"
#line 2469 "objc-parse.y"
{
finish_class (objc_interface_context);
objc_interface_context = NULL_TREE;
;
break;}
case 437:
#line 2464 "objc-parse.y"
#line 2475 "objc-parse.y"
{
objc_interface_context
= start_class (CLASS_INTERFACE_TYPE, yyvsp[-3].ttype, yyvsp[-1].ttype, yyvsp[0].ttype);
......@@ -4495,14 +4506,14 @@ case 437:
;
break;}
case 438:
#line 2471 "objc-parse.y"
#line 2482 "objc-parse.y"
{
finish_class (objc_interface_context);
objc_interface_context = NULL_TREE;
;
break;}
case 439:
#line 2477 "objc-parse.y"
#line 2488 "objc-parse.y"
{
objc_implementation_context = objc_ivar_context
= start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[-1].ttype, NULL_TREE, NULL_TREE);
......@@ -4510,14 +4521,14 @@ case 439:
;
break;}
case 440:
#line 2483 "objc-parse.y"
#line 2494 "objc-parse.y"
{
objc_ivar_chain
= continue_class (objc_implementation_context);
;
break;}
case 441:
#line 2489 "objc-parse.y"
#line 2500 "objc-parse.y"
{
objc_implementation_context
= start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[0].ttype, NULL_TREE, NULL_TREE);
......@@ -4526,7 +4537,7 @@ case 441:
;
break;}
case 442:
#line 2497 "objc-parse.y"
#line 2508 "objc-parse.y"
{
objc_implementation_context = objc_ivar_context
= start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[-3].ttype, yyvsp[-1].ttype, NULL_TREE);
......@@ -4534,14 +4545,14 @@ case 442:
;
break;}
case 443:
#line 2503 "objc-parse.y"
#line 2514 "objc-parse.y"
{
objc_ivar_chain
= continue_class (objc_implementation_context);
;
break;}
case 444:
#line 2509 "objc-parse.y"
#line 2520 "objc-parse.y"
{
objc_implementation_context
= start_class (CLASS_IMPLEMENTATION_TYPE, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE);
......@@ -4550,7 +4561,7 @@ case 444:
;
break;}
case 445:
#line 2517 "objc-parse.y"
#line 2528 "objc-parse.y"
{
objc_interface_context
= start_class (CATEGORY_INTERFACE_TYPE, yyvsp[-4].ttype, yyvsp[-2].ttype, yyvsp[0].ttype);
......@@ -4558,14 +4569,14 @@ case 445:
;
break;}
case 446:
#line 2524 "objc-parse.y"
#line 2535 "objc-parse.y"
{
finish_class (objc_interface_context);
objc_interface_context = NULL_TREE;
;
break;}
case 447:
#line 2530 "objc-parse.y"
#line 2541 "objc-parse.y"
{
objc_implementation_context
= start_class (CATEGORY_IMPLEMENTATION_TYPE, yyvsp[-3].ttype, yyvsp[-1].ttype, NULL_TREE);
......@@ -4574,7 +4585,7 @@ case 447:
;
break;}
case 448:
#line 2540 "objc-parse.y"
#line 2551 "objc-parse.y"
{
remember_protocol_qualifiers ();
objc_interface_context
......@@ -4582,7 +4593,7 @@ case 448:
;
break;}
case 449:
#line 2546 "objc-parse.y"
#line 2557 "objc-parse.y"
{
forget_protocol_qualifiers();
finish_protocol(objc_interface_context);
......@@ -4590,13 +4601,13 @@ case 449:
;
break;}
case 450:
#line 2555 "objc-parse.y"
#line 2566 "objc-parse.y"
{
yyval.ttype = NULL_TREE;
;
break;}
case 452:
#line 2563 "objc-parse.y"
#line 2574 "objc-parse.y"
{
if (yyvsp[-2].code == LT_EXPR && yyvsp[0].code == GT_EXPR)
yyval.ttype = yyvsp[-1].ttype;
......@@ -4605,32 +4616,32 @@ case 452:
;
break;}
case 455:
#line 2577 "objc-parse.y"
#line 2588 "objc-parse.y"
{ objc_public_flag = 2; ;
break;}
case 456:
#line 2578 "objc-parse.y"
#line 2589 "objc-parse.y"
{ objc_public_flag = 0; ;
break;}
case 457:
#line 2579 "objc-parse.y"
#line 2590 "objc-parse.y"
{ objc_public_flag = 1; ;
break;}
case 458:
#line 2584 "objc-parse.y"
#line 2595 "objc-parse.y"
{
yyval.ttype = NULL_TREE;
;
break;}
case 460:
#line 2589 "objc-parse.y"
#line 2600 "objc-parse.y"
{
if (pedantic)
pedwarn ("extra semicolon in struct or union specified");
;
break;}
case 461:
#line 2607 "objc-parse.y"
#line 2618 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -4638,7 +4649,7 @@ case 461:
resume_momentary (yyvsp[-1].itype); ;
break;}
case 462:
#line 2613 "objc-parse.y"
#line 2624 "objc-parse.y"
{ yyval.ttype = yyvsp[0].ttype;
current_declspecs = TREE_VALUE (declspec_stack);
prefix_attributes = TREE_PURPOSE (declspec_stack);
......@@ -4646,15 +4657,15 @@ case 462:
resume_momentary (yyvsp[-1].itype); ;
break;}
case 463:
#line 2619 "objc-parse.y"
#line 2630 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 464:
#line 2624 "objc-parse.y"
#line 2635 "objc-parse.y"
{ yyval.ttype = NULL_TREE; ;
break;}
case 467:
#line 2631 "objc-parse.y"
#line 2642 "objc-parse.y"
{
yyval.ttype = add_instance_variable (objc_ivar_context,
objc_public_flag,
......@@ -4663,7 +4674,7 @@ case 467:
;
break;}
case 468:
#line 2638 "objc-parse.y"
#line 2649 "objc-parse.y"
{
yyval.ttype = add_instance_variable (objc_ivar_context,
objc_public_flag,
......@@ -4671,7 +4682,7 @@ case 468:
;
break;}
case 469:
#line 2644 "objc-parse.y"
#line 2655 "objc-parse.y"
{
yyval.ttype = add_instance_variable (objc_ivar_context,
objc_public_flag,
......@@ -4680,7 +4691,7 @@ case 469:
;
break;}
case 470:
#line 2654 "objc-parse.y"
#line 2665 "objc-parse.y"
{
remember_protocol_qualifiers ();
if (objc_implementation_context)
......@@ -4690,7 +4701,7 @@ case 470:
;
break;}
case 471:
#line 2662 "objc-parse.y"
#line 2673 "objc-parse.y"
{
forget_protocol_qualifiers ();
add_class_method (objc_implementation_context, yyvsp[0].ttype);
......@@ -4699,20 +4710,20 @@ case 471:
;
break;}
case 472:
#line 2669 "objc-parse.y"
#line 2680 "objc-parse.y"
{
continue_method_def ();
;
break;}
case 473:
#line 2673 "objc-parse.y"
#line 2684 "objc-parse.y"
{
finish_method_def ();
objc_method_context = NULL_TREE;
;
break;}
case 474:
#line 2679 "objc-parse.y"
#line 2690 "objc-parse.y"
{
remember_protocol_qualifiers ();
if (objc_implementation_context)
......@@ -4722,7 +4733,7 @@ case 474:
;
break;}
case 475:
#line 2687 "objc-parse.y"
#line 2698 "objc-parse.y"
{
forget_protocol_qualifiers ();
add_instance_method (objc_implementation_context, yyvsp[0].ttype);
......@@ -4731,28 +4742,28 @@ case 475:
;
break;}
case 476:
#line 2694 "objc-parse.y"
#line 2705 "objc-parse.y"
{
continue_method_def ();
;
break;}
case 477:
#line 2698 "objc-parse.y"
#line 2709 "objc-parse.y"
{
finish_method_def ();
objc_method_context = NULL_TREE;
;
break;}
case 479:
#line 2710 "objc-parse.y"
#line 2721 "objc-parse.y"
{yyval.ttype = NULL_TREE; ;
break;}
case 484:
#line 2717 "objc-parse.y"
#line 2728 "objc-parse.y"
{yyval.ttype = NULL_TREE; ;
break;}
case 488:
#line 2727 "objc-parse.y"
#line 2738 "objc-parse.y"
{
/* Remember protocol qualifiers in prototypes. */
remember_protocol_qualifiers ();
......@@ -4760,7 +4771,7 @@ case 488:
;
break;}
case 489:
#line 2733 "objc-parse.y"
#line 2744 "objc-parse.y"
{
/* Forget protocol qualifiers here. */
forget_protocol_qualifiers ();
......@@ -4768,7 +4779,7 @@ case 489:
;
break;}
case 491:
#line 2741 "objc-parse.y"
#line 2752 "objc-parse.y"
{
/* Remember protocol qualifiers in prototypes. */
remember_protocol_qualifiers ();
......@@ -4776,7 +4787,7 @@ case 491:
;
break;}
case 492:
#line 2747 "objc-parse.y"
#line 2758 "objc-parse.y"
{
/* Forget protocol qualifiers here. */
forget_protocol_qualifiers ();
......@@ -4784,94 +4795,94 @@ case 492:
;
break;}
case 494:
#line 2757 "objc-parse.y"
#line 2768 "objc-parse.y"
{
yyval.ttype = build_method_decl (objc_inherit_code, yyvsp[-2].ttype, yyvsp[0].ttype, NULL_TREE);
;
break;}
case 495:
#line 2762 "objc-parse.y"
#line 2773 "objc-parse.y"
{
yyval.ttype = build_method_decl (objc_inherit_code, NULL_TREE, yyvsp[0].ttype, NULL_TREE);
;
break;}
case 496:
#line 2767 "objc-parse.y"
#line 2778 "objc-parse.y"
{
yyval.ttype = build_method_decl (objc_inherit_code, yyvsp[-3].ttype, yyvsp[-1].ttype, yyvsp[0].ttype);
;
break;}
case 497:
#line 2772 "objc-parse.y"
#line 2783 "objc-parse.y"
{
yyval.ttype = build_method_decl (objc_inherit_code, NULL_TREE, yyvsp[-1].ttype, yyvsp[0].ttype);
;
break;}
case 506:
#line 2802 "objc-parse.y"
#line 2813 "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 2807 "objc-parse.y"
#line 2818 "objc-parse.y"
{ shadow_tag (yyvsp[-1].ttype); ;
break;}
case 508:
#line 2809 "objc-parse.y"
#line 2820 "objc-parse.y"
{ pedwarn ("empty declaration"); ;
break;}
case 509:
#line 2814 "objc-parse.y"
#line 2825 "objc-parse.y"
{ push_parm_decl (yyvsp[0].ttype); ;
break;}
case 510:
#line 2816 "objc-parse.y"
#line 2827 "objc-parse.y"
{ push_parm_decl (yyvsp[0].ttype); ;
break;}
case 511:
#line 2824 "objc-parse.y"
#line 2835 "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 2829 "objc-parse.y"
#line 2840 "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 2834 "objc-parse.y"
#line 2845 "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 2842 "objc-parse.y"
#line 2853 "objc-parse.y"
{
yyval.ttype = NULL_TREE;
;
break;}
case 515:
#line 2846 "objc-parse.y"
#line 2857 "objc-parse.y"
{
/* oh what a kludge! */
yyval.ttype = (tree)1;
;
break;}
case 516:
#line 2851 "objc-parse.y"
#line 2862 "objc-parse.y"
{
pushlevel (0);
;
break;}
case 517:
#line 2855 "objc-parse.y"
#line 2866 "objc-parse.y"
{
/* returns a tree list node generated by get_parm_info */
yyval.ttype = yyvsp[0].ttype;
......@@ -4879,119 +4890,119 @@ case 517:
;
break;}
case 520:
#line 2870 "objc-parse.y"
#line 2881 "objc-parse.y"
{
yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype);
;
break;}
case 525:
#line 2883 "objc-parse.y"
#line 2894 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 526:
#line 2884 "objc-parse.y"
#line 2895 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 527:
#line 2885 "objc-parse.y"
#line 2896 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 528:
#line 2886 "objc-parse.y"
#line 2897 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 529:
#line 2887 "objc-parse.y"
#line 2898 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 530:
#line 2888 "objc-parse.y"
#line 2899 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 531:
#line 2889 "objc-parse.y"
#line 2900 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 532:
#line 2890 "objc-parse.y"
#line 2901 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 533:
#line 2891 "objc-parse.y"
#line 2902 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 534:
#line 2892 "objc-parse.y"
#line 2903 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 535:
#line 2893 "objc-parse.y"
#line 2904 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 536:
#line 2894 "objc-parse.y"
#line 2905 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 537:
#line 2895 "objc-parse.y"
#line 2906 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 538:
#line 2896 "objc-parse.y"
#line 2907 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 539:
#line 2897 "objc-parse.y"
#line 2908 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 540:
#line 2898 "objc-parse.y"
#line 2909 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 541:
#line 2899 "objc-parse.y"
#line 2910 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 542:
#line 2900 "objc-parse.y"
#line 2911 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 543:
#line 2901 "objc-parse.y"
#line 2912 "objc-parse.y"
{ yyval.ttype = get_identifier (token_buffer); ;
break;}
case 546:
#line 2907 "objc-parse.y"
#line 2918 "objc-parse.y"
{
yyval.ttype = build_keyword_decl (yyvsp[-5].ttype, yyvsp[-2].ttype, yyvsp[0].ttype);
;
break;}
case 547:
#line 2912 "objc-parse.y"
#line 2923 "objc-parse.y"
{
yyval.ttype = build_keyword_decl (yyvsp[-2].ttype, NULL_TREE, yyvsp[0].ttype);
;
break;}
case 548:
#line 2917 "objc-parse.y"
#line 2928 "objc-parse.y"
{
yyval.ttype = build_keyword_decl (NULL_TREE, yyvsp[-2].ttype, yyvsp[0].ttype);
;
break;}
case 549:
#line 2922 "objc-parse.y"
#line 2933 "objc-parse.y"
{
yyval.ttype = build_keyword_decl (NULL_TREE, NULL_TREE, yyvsp[0].ttype);
;
break;}
case 553:
#line 2935 "objc-parse.y"
#line 2946 "objc-parse.y"
{
yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype);
;
break;}
case 554:
#line 2943 "objc-parse.y"
#line 2954 "objc-parse.y"
{
if (TREE_CHAIN (yyvsp[0].ttype) == NULL_TREE)
/* just return the expr., remove a level of indirection */
......@@ -5002,76 +5013,76 @@ case 554:
;
break;}
case 555:
#line 2955 "objc-parse.y"
#line 2966 "objc-parse.y"
{
yyval.ttype = build_tree_list (yyvsp[-2].ttype, yyvsp[0].ttype);
;
break;}
case 556:
#line 2959 "objc-parse.y"
#line 2970 "objc-parse.y"
{
yyval.ttype = build_tree_list (NULL_TREE, yyvsp[0].ttype);
;
break;}
case 558:
#line 2967 "objc-parse.y"
#line 2978 "objc-parse.y"
{
yyval.ttype = get_class_reference (yyvsp[0].ttype);
;
break;}
case 559:
#line 2974 "objc-parse.y"
#line 2985 "objc-parse.y"
{ objc_receiver_context = 1; ;
break;}
case 560:
#line 2976 "objc-parse.y"
#line 2987 "objc-parse.y"
{ objc_receiver_context = 0; ;
break;}
case 561:
#line 2978 "objc-parse.y"
#line 2989 "objc-parse.y"
{
yyval.ttype = build_tree_list (yyvsp[-3].ttype, yyvsp[-1].ttype);
;
break;}
case 565:
#line 2991 "objc-parse.y"
#line 3002 "objc-parse.y"
{
yyval.ttype = chainon (yyvsp[-1].ttype, yyvsp[0].ttype);
;
break;}
case 566:
#line 2998 "objc-parse.y"
#line 3009 "objc-parse.y"
{
yyval.ttype = build_tree_list (yyvsp[-1].ttype, NULL_TREE);
;
break;}
case 567:
#line 3002 "objc-parse.y"
#line 3013 "objc-parse.y"
{
yyval.ttype = build_tree_list (NULL_TREE, NULL_TREE);
;
break;}
case 568:
#line 3009 "objc-parse.y"
#line 3020 "objc-parse.y"
{
yyval.ttype = yyvsp[-1].ttype;
;
break;}
case 569:
#line 3016 "objc-parse.y"
#line 3027 "objc-parse.y"
{
yyval.ttype = yyvsp[-1].ttype;
;
break;}
case 570:
#line 3025 "objc-parse.y"
#line 3036 "objc-parse.y"
{
yyval.ttype = groktypename (yyvsp[-1].ttype);
;
break;}
}
/* the action file gets copied in in place of this dollarsign */
#line 498 "/usr/cygnus/TBD-TBD/share/bison.simple"
#line 498 "/usr/share/bison.simple"
yyvsp -= yylen;
yyssp -= yylen;
......@@ -5267,5 +5278,5 @@ yyerrhandle:
yystate = yyn;
goto yynewstate;
}
#line 3030 "objc-parse.y"
#line 3041 "objc-parse.y"
......@@ -41,7 +41,8 @@ Boston, MA 02111-1307, USA. */
#include "flags.h"
#include "output.h"
#include "toplev.h"
#include "ggc.h"
#ifdef MULTIBYTE_CHARS
#include <locale.h>
#endif
......@@ -229,6 +230,16 @@ int objc_public_flag;
#define YYPRINT(FILE,YYCHAR,YYLVAL) yyprint(FILE,YYCHAR,YYLVAL)
extern void yyprint PROTO ((FILE *, int, YYSTYPE));
/* Add GC roots for variables local to this file. */
void
c_parse_init ()
{
ggc_add_tree_root (&declspec_stack, 1);
ggc_add_tree_root (&current_declspecs, 1);
ggc_add_tree_root (&prefix_attributes, 1);
}
%}
%%
......
......@@ -1493,6 +1493,25 @@ decl_name (decl, verbosity)
return IDENTIFIER_POINTER (DECL_NAME (decl));
}
/* Mark P for GC. Also mark main_input_filename and input_filename. */
static void
mark_file_stack (p)
void *p;
{
struct file_stack *stack = *(struct file_stack **)p;
/* We're only called for input_file_stack, so we can mark the current
input_filename here as well. */
ggc_mark_string (main_input_filename);
ggc_mark_string (input_filename);
while (stack)
{
ggc_mark_string (stack->name);
stack = stack->next;
}
}
static int need_error_newline;
/* Function of last error message;
......@@ -3055,6 +3074,8 @@ compile_file (name)
#endif
}
if (ggc_p)
name = ggc_alloc_string (name, strlen (name));
input_filename = name;
/* Put an entry on the input file stack for the main input file. */
......@@ -4772,6 +4793,9 @@ main (argc, argv)
flag_short_enums = DEFAULT_SHORT_ENUMS;
#endif
ggc_add_root (&input_file_stack, 1, sizeof input_file_stack,
&mark_file_stack);
/* Perform language-specific options intialization. */
lang_init_options ();
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment