Subversion Repositories tendra.SVN

Rev

Rev 5 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5 Rev 6
Line 1... Line 1...
1
/*
1
/*
2
 * Automatically generated from the files:
2
 * Automatically generated from the files:
3
 *	/u/g/release/Source/src/producers/c/syntax/syntax.sid
3
 *	syntax.sid
4
 * and
4
 * and
5
 *	/u/g/release/Source/src/producers/c/syntax/syntax.act
5
 *	syntax.act
6
 * by:
6
 * by:
7
 *	sid
7
 *	sid
8
 */
8
 */
9
 
9
 
10
/* BEGINNING OF HEADER */
10
/* BEGINNING OF HEADER */
Line 132... Line 132...
132
int ZI0;
132
int ZI0;
133
 
133
 
134
/* BEGINNING OF FUNCTION DEFINITIONS */
134
/* BEGINNING OF FUNCTION DEFINITIONS */
135
 
135
 
136
void
136
void
137
ZR659 PROTO_N ((ZO658))
-
 
138
  PROTO_T (BASE_TYPE *ZO658)
137
ZR659(BASE_TYPE *ZO658)
139
{
138
{
140
    BASE_TYPE ZI658;
139
    BASE_TYPE ZI658;
141
 
140
 
142
    switch (CURRENT_TERMINAL) {
141
    switch (CURRENT_TERMINAL) {
143
      case 184:
142
      case 184:
Line 256... Line 255...
256
  ZL0:;
255
  ZL0:;
257
    *ZO658 = ZI658;
256
    *ZO658 = ZI658;
258
}
257
}
259
 
258
 
260
void
259
void
261
ZR890 PROTO_N ((ZI888, ZO889))
-
 
262
  PROTO_T (EXP ZI888 X EXP *ZO889)
260
ZR890(EXP ZI888, EXP *ZO889)
263
{
261
{
264
    EXP ZI889;
262
    EXP ZI889;
265
 
263
 
266
  ZL2_890:;
264
  ZL2_890:;
267
    switch (CURRENT_TERMINAL) {
265
    switch (CURRENT_TERMINAL) {
Line 309... Line 307...
309
  ZL0:;
307
  ZL0:;
310
    *ZO889 = ZI889;
308
    *ZO889 = ZI889;
311
}
309
}
312
 
310
 
313
void
311
void
314
ZR715 PROTO_N ((ZO658, ZO395, ZO630, ZO605))
-
 
315
  PROTO_T (BASE_TYPE *ZO658 X TYPE *ZO395 X CV_SPEC *ZO630 X DECL_SPEC *ZO605)
312
ZR715(BASE_TYPE *ZO658, TYPE *ZO395, CV_SPEC *ZO630, DECL_SPEC *ZO605)
316
{
313
{
317
    BASE_TYPE ZI658;
314
    BASE_TYPE ZI658;
318
    TYPE ZI395;
315
    TYPE ZI395;
319
    CV_SPEC ZI630;
316
    CV_SPEC ZI630;
320
    DECL_SPEC ZI605;
317
    DECL_SPEC ZI605;
Line 415... Line 412...
415
    *ZO630 = ZI630;
412
    *ZO630 = ZI630;
416
    *ZO605 = ZI605;
413
    *ZO605 = ZI605;
417
}
414
}
418
 
415
 
419
void
416
void
420
ZR745 PROTO_N ((ZI399, ZO395))
-
 
421
  PROTO_T (IDENTIFIER ZI399 X TYPE *ZO395)
417
ZR745(IDENTIFIER ZI399, TYPE *ZO395)
422
{
418
{
423
    TYPE ZI395;
419
    TYPE ZI395;
424
 
420
 
425
    switch (CURRENT_TERMINAL) {
421
    switch (CURRENT_TERMINAL) {
426
      case 65:
422
      case 65:
Line 599... Line 595...
599
  ZL0:;
595
  ZL0:;
600
    *ZO395 = ZI395;
596
    *ZO395 = ZI395;
601
}
597
}
602
 
598
 
603
void
599
void
604
ZR894 PROTO_N ((ZI892, ZO893))
-
 
605
  PROTO_T (EXP ZI892 X EXP *ZO893)
600
ZR894(EXP ZI892, EXP *ZO893)
606
{
601
{
607
    EXP ZI893;
602
    EXP ZI893;
608
 
603
 
609
  ZL2_894:;
604
  ZL2_894:;
610
    switch (CURRENT_TERMINAL) {
605
    switch (CURRENT_TERMINAL) {
Line 652... Line 647...
652
  ZL0:;
647
  ZL0:;
653
    *ZO893 = ZI893;
648
    *ZO893 = ZI893;
654
}
649
}
655
 
650
 
656
void
651
void
657
ZR770 PROTO_N ((ZO547))
-
 
658
  PROTO_T (IDENTIFIER *ZO547)
652
ZR770(IDENTIFIER *ZO547)
659
{
653
{
660
    IDENTIFIER ZI547;
654
    IDENTIFIER ZI547;
661
 
655
 
662
    if ((CURRENT_TERMINAL) == 354) {
656
    if ((CURRENT_TERMINAL) == 354) {
663
	return;
657
	return;
Line 703... Line 697...
703
  ZL0:;
697
  ZL0:;
704
    *ZO547 = ZI547;
698
    *ZO547 = ZI547;
705
}
699
}
706
 
700
 
707
void
701
void
708
ZR569 PROTO_N ((ZO404))
-
 
709
  PROTO_T (EXP *ZO404)
702
ZR569(EXP *ZO404)
710
{
703
{
711
    EXP ZI404;
704
    EXP ZI404;
712
 
705
 
713
    if ((CURRENT_TERMINAL) == 354) {
706
    if ((CURRENT_TERMINAL) == 354) {
714
	return;
707
	return;
Line 789... Line 782...
789
  ZL0:;
782
  ZL0:;
790
    *ZO404 = ZI404;
783
    *ZO404 = ZI404;
791
}
784
}
792
 
785
 
793
void
786
void
794
ZR898 PROTO_N ((ZI896, ZO897))
-
 
795
  PROTO_T (EXP ZI896 X EXP *ZO897)
787
ZR898(EXP ZI896, EXP *ZO897)
796
{
788
{
797
    EXP ZI897;
789
    EXP ZI897;
798
 
790
 
799
  ZL2_898:;
791
  ZL2_898:;
800
    switch (CURRENT_TERMINAL) {
792
    switch (CURRENT_TERMINAL) {
Line 851... Line 843...
851
  ZL0:;
843
  ZL0:;
852
    *ZO897 = ZI897;
844
    *ZO897 = ZI897;
853
}
845
}
854
 
846
 
855
void
847
void
856
ZR656 PROTO_N ((ZO395))
-
 
857
  PROTO_T (TYPE *ZO395)
848
ZR656(TYPE *ZO395)
858
{
849
{
859
    TYPE ZI395;
850
    TYPE ZI395;
860
 
851
 
861
    if ((CURRENT_TERMINAL) == 354) {
852
    if ((CURRENT_TERMINAL) == 354) {
862
	return;
853
	return;
Line 994... Line 985...
994
  ZL0:;
985
  ZL0:;
995
    *ZO395 = ZI395;
986
    *ZO395 = ZI395;
996
}
987
}
997
 
988
 
998
void
989
void
999
ZR427 PROTO_N ((ZI426, ZO399))
-
 
1000
  PROTO_T (NAMESPACE ZI426 X IDENTIFIER *ZO399)
990
ZR427(NAMESPACE ZI426, IDENTIFIER *ZO399)
1001
{
991
{
1002
    IDENTIFIER ZI399;
992
    IDENTIFIER ZI399;
1003
 
993
 
1004
    if ((CURRENT_TERMINAL) == 354) {
994
    if ((CURRENT_TERMINAL) == 354) {
1005
	return;
995
	return;
Line 1053... Line 1043...
1053
  ZL0:;
1043
  ZL0:;
1054
    *ZO399 = ZI399;
1044
    *ZO399 = ZI399;
1055
}
1045
}
1056
 
1046
 
1057
void
1047
void
1058
ZR714 PROTO_N ((ZO658, ZO395, ZO630, ZO605))
-
 
1059
  PROTO_T (BASE_TYPE *ZO658 X TYPE *ZO395 X CV_SPEC *ZO630 X DECL_SPEC *ZO605)
1048
ZR714(BASE_TYPE *ZO658, TYPE *ZO395, CV_SPEC *ZO630, DECL_SPEC *ZO605)
1060
{
1049
{
1061
    BASE_TYPE ZI658;
1050
    BASE_TYPE ZI658;
1062
    TYPE ZI395;
1051
    TYPE ZI395;
1063
    CV_SPEC ZI630;
1052
    CV_SPEC ZI630;
1064
    DECL_SPEC ZI605;
1053
    DECL_SPEC ZI605;
Line 1140... Line 1129...
1140
    *ZO630 = ZI630;
1129
    *ZO630 = ZI630;
1141
    *ZO605 = ZI605;
1130
    *ZO605 = ZI605;
1142
}
1131
}
1143
 
1132
 
1144
void
1133
void
1145
parse_init PROTO_N ((ZI547, ZO404))
-
 
1146
  PROTO_T (IDENTIFIER ZI547 X EXP *ZO404)
1134
parse_init(IDENTIFIER ZI547, EXP *ZO404)
1147
{
1135
{
1148
    EXP ZI404;
1136
    EXP ZI404;
1149
 
1137
 
1150
    if ((CURRENT_TERMINAL) == 354) {
1138
    if ((CURRENT_TERMINAL) == 354) {
1151
	return;
1139
	return;
Line 1175... Line 1163...
1175
  ZL0:;
1163
  ZL0:;
1176
    *ZO404 = ZI404;
1164
    *ZO404 = ZI404;
1177
}
1165
}
1178
 
1166
 
1179
void
1167
void
1180
ZR1027 PROTO_N ((ZI1025, ZO404))
-
 
1181
  PROTO_T (EXP *ZI1025 X EXP *ZO404)
1168
ZR1027(EXP *ZI1025, EXP *ZO404)
1182
{
1169
{
1183
    EXP ZI404;
1170
    EXP ZI404;
1184
 
1171
 
1185
    switch (CURRENT_TERMINAL) {
1172
    switch (CURRENT_TERMINAL) {
1186
      case 42:
1173
      case 42:
Line 1219... Line 1206...
1219
  ZL0:;
1206
  ZL0:;
1220
    *ZO404 = ZI404;
1207
    *ZO404 = ZI404;
1221
}
1208
}
1222
 
1209
 
1223
void
1210
void
1224
ZR803 PROTO_Z ()
1211
ZR803(void)
1225
{
1212
{
1226
    if ((CURRENT_TERMINAL) == 354) {
1213
    if ((CURRENT_TERMINAL) == 354) {
1227
	return;
1214
	return;
1228
    }
1215
    }
1229
  ZL2_803:;
1216
  ZL2_803:;
Line 1366... Line 1353...
1366
    SAVE_LEXER (354);
1353
    SAVE_LEXER (354);
1367
    return;
1354
    return;
1368
}
1355
}
1369
 
1356
 
1370
void
1357
void
1371
ZR1028 PROTO_N ((ZI416, ZO420))
-
 
1372
  PROTO_T (EXP *ZI416 X SID_LIST_EXP *ZO420)
1358
ZR1028(EXP *ZI416, SID_LIST_EXP *ZO420)
1373
{
1359
{
1374
    SID_LIST_EXP ZI420;
1360
    SID_LIST_EXP ZI420;
1375
 
1361
 
1376
    switch (CURRENT_TERMINAL) {
1362
    switch (CURRENT_TERMINAL) {
1377
      case 42:
1363
      case 42:
Line 1414... Line 1400...
1414
  ZL0:;
1400
  ZL0:;
1415
    *ZO420 = ZI420;
1401
    *ZO420 = ZI420;
1416
}
1402
}
1417
 
1403
 
1418
void
1404
void
1419
ZR754 PROTO_N ((ZO395))
-
 
1420
  PROTO_T (TYPE *ZO395)
1405
ZR754(TYPE *ZO395)
1421
{
1406
{
1422
    TYPE ZI395;
1407
    TYPE ZI395;
1423
 
1408
 
1424
    switch (CURRENT_TERMINAL) {
1409
    switch (CURRENT_TERMINAL) {
1425
      case 65:
1410
      case 65:
Line 1557... Line 1542...
1557
  ZL0:;
1542
  ZL0:;
1558
    *ZO395 = ZI395;
1543
    *ZO395 = ZI395;
1559
}
1544
}
1560
 
1545
 
1561
void
1546
void
1562
ZR1029 PROTO_N ((ZO404))
-
 
1563
  PROTO_T (EXP *ZO404)
1547
ZR1029(EXP *ZO404)
1564
{
1548
{
1565
    EXP ZI404;
1549
    EXP ZI404;
1566
 
1550
 
1567
    switch (CURRENT_TERMINAL) {
1551
    switch (CURRENT_TERMINAL) {
1568
      case 297:
1552
      case 297:
Line 1623... Line 1607...
1623
  ZL0:;
1607
  ZL0:;
1624
    *ZO404 = ZI404;
1608
    *ZO404 = ZI404;
1625
}
1609
}
1626
 
1610
 
1627
void
1611
void
1628
ZR902 PROTO_N ((ZI900, ZO901))
-
 
1629
  PROTO_T (EXP ZI900 X EXP *ZO901)
1612
ZR902(EXP ZI900, EXP *ZO901)
1630
{
1613
{
1631
    EXP ZI901;
1614
    EXP ZI901;
1632
 
1615
 
1633
  ZL2_902:;
1616
  ZL2_902:;
1634
    switch (CURRENT_TERMINAL) {
1617
    switch (CURRENT_TERMINAL) {
Line 1671... Line 1654...
1671
  ZL0:;
1654
  ZL0:;
1672
    *ZO901 = ZI901;
1655
    *ZO901 = ZI901;
1673
}
1656
}
1674
 
1657
 
1675
void
1658
void
1676
ZR556 PROTO_N ((ZI467, ZO404))
-
 
1677
  PROTO_T (EXP ZI467 X EXP *ZO404)
1659
ZR556(EXP ZI467, EXP *ZO404)
1678
{
1660
{
1679
    EXP ZI404;
1661
    EXP ZI404;
1680
 
1662
 
1681
    if ((CURRENT_TERMINAL) == 354) {
1663
    if ((CURRENT_TERMINAL) == 354) {
1682
	return;
1664
	return;
Line 1720... Line 1702...
1720
  ZL0:;
1702
  ZL0:;
1721
    *ZO404 = ZI404;
1703
    *ZO404 = ZI404;
1722
}
1704
}
1723
 
1705
 
1724
void
1706
void
1725
ZR1030 PROTO_N ((ZI669, ZI399, ZO395))
-
 
1726
  PROTO_T (BASE_TYPE *ZI669 X IDENTIFIER *ZI399 X TYPE *ZO395)
1707
ZR1030(BASE_TYPE *ZI669, IDENTIFIER *ZI399, TYPE *ZO395)
1727
{
1708
{
1728
    TYPE ZI395;
1709
    TYPE ZI395;
1729
 
1710
 
1730
    switch (CURRENT_TERMINAL) {
1711
    switch (CURRENT_TERMINAL) {
1731
      case 64:
1712
      case 64:
Line 1813... Line 1794...
1813
  ZL0:;
1794
  ZL0:;
1814
    *ZO395 = ZI395;
1795
    *ZO395 = ZI395;
1815
}
1796
}
1816
 
1797
 
1817
void
1798
void
1818
ZR796 PROTO_N ((ZI605, ZI658, ZI420))
-
 
1819
  PROTO_T (DECL_SPEC ZI605 X BASE_TYPE ZI658 X TYPE ZI420)
1799
ZR796(DECL_SPEC ZI605, BASE_TYPE ZI658, TYPE ZI420)
1820
{
1800
{
1821
    if ((CURRENT_TERMINAL) == 354) {
1801
    if ((CURRENT_TERMINAL) == 354) {
1822
	return;
1802
	return;
1823
    }
1803
    }
1824
    {
1804
    {
Line 1867... Line 1847...
1867
    SAVE_LEXER (354);
1847
    SAVE_LEXER (354);
1868
    return;
1848
    return;
1869
}
1849
}
1870
 
1850
 
1871
void
1851
void
1872
ZR1031 PROTO_N ((ZI658, ZI420, ZI630))
-
 
1873
  PROTO_T (BASE_TYPE *ZI658 X TYPE *ZI420 X CV_SPEC *ZI630)
1852
ZR1031(BASE_TYPE *ZI658, TYPE *ZI420, CV_SPEC *ZI630)
1874
{
1853
{
1875
    switch (CURRENT_TERMINAL) {
1854
    switch (CURRENT_TERMINAL) {
1876
      case 77:
1855
      case 77:
1877
	{
1856
	{
1878
	    {
1857
	    {
Line 1938... Line 1917...
1938
    SAVE_LEXER (354);
1917
    SAVE_LEXER (354);
1939
    return;
1918
    return;
1940
}
1919
}
1941
 
1920
 
1942
void
1921
void
1943
ZR559 PROTO_Z ()
1922
ZR559(void)
1944
{
1923
{
1945
    if ((CURRENT_TERMINAL) == 354) {
1924
    if ((CURRENT_TERMINAL) == 354) {
1946
	return;
1925
	return;
1947
    }
1926
    }
1948
    {
1927
    {
Line 1992... Line 1971...
1992
    SAVE_LEXER (354);
1971
    SAVE_LEXER (354);
1993
    return;
1972
    return;
1994
}
1973
}
1995
 
1974
 
1996
void
1975
void
1997
ZR415 PROTO_N ((ZO404))
-
 
1998
  PROTO_T (EXP *ZO404)
1976
ZR415(EXP *ZO404)
1999
{
1977
{
2000
    EXP ZI404;
1978
    EXP ZI404;
2001
 
1979
 
2002
    switch (CURRENT_TERMINAL) {
1980
    switch (CURRENT_TERMINAL) {
2003
      case 23:
1981
      case 23:
Line 2086... Line 2064...
2086
  ZL0:;
2064
  ZL0:;
2087
    *ZO404 = ZI404;
2065
    *ZO404 = ZI404;
2088
}
2066
}
2089
 
2067
 
2090
void
2068
void
2091
ZR906 PROTO_N ((ZI904, ZO905))
-
 
2092
  PROTO_T (EXP ZI904 X EXP *ZO905)
2069
ZR906(EXP ZI904, EXP *ZO905)
2093
{
2070
{
2094
    EXP ZI905;
2071
    EXP ZI905;
2095
 
2072
 
2096
  ZL2_906:;
2073
  ZL2_906:;
2097
    switch (CURRENT_TERMINAL) {
2074
    switch (CURRENT_TERMINAL) {
Line 2159... Line 2136...
2159
  ZL0:;
2136
  ZL0:;
2160
    *ZO905 = ZI905;
2137
    *ZO905 = ZI905;
2161
}
2138
}
2162
 
2139
 
2163
void
2140
void
2164
ZR620 PROTO_N ((ZO404))
-
 
2165
  PROTO_T (EXP *ZO404)
2141
ZR620(EXP *ZO404)
2166
{
2142
{
2167
    EXP ZI404;
2143
    EXP ZI404;
2168
 
2144
 
2169
    switch (CURRENT_TERMINAL) {
2145
    switch (CURRENT_TERMINAL) {
2170
      case 288:
2146
      case 288:
Line 2217... Line 2193...
2217
  ZL0:;
2193
  ZL0:;
2218
    *ZO404 = ZI404;
2194
    *ZO404 = ZI404;
2219
}
2195
}
2220
 
2196
 
2221
void
2197
void
2222
ZR670 PROTO_N ((ZO669))
-
 
2223
  PROTO_T (BASE_TYPE *ZO669)
2198
ZR670(BASE_TYPE *ZO669)
2224
{
2199
{
2225
    BASE_TYPE ZI669;
2200
    BASE_TYPE ZI669;
2226
 
2201
 
2227
    switch (CURRENT_TERMINAL) {
2202
    switch (CURRENT_TERMINAL) {
2228
      case 118:
2203
      case 118:
Line 2253... Line 2228...
2253
  ZL0:;
2228
  ZL0:;
2254
    *ZO669 = ZI669;
2229
    *ZO669 = ZI669;
2255
}
2230
}
2256
 
2231
 
2257
void
2232
void
2258
ZR789 PROTO_N ((ZI547, ZO420))
-
 
2259
  PROTO_T (IDENTIFIER ZI547 X SID_LIST_EXP *ZO420)
2233
ZR789(IDENTIFIER ZI547, SID_LIST_EXP *ZO420)
2260
{
2234
{
2261
    SID_LIST_EXP ZI420;
2235
    SID_LIST_EXP ZI420;
2262
 
2236
 
2263
    if ((CURRENT_TERMINAL) == 354) {
2237
    if ((CURRENT_TERMINAL) == 354) {
2264
	return;
2238
	return;
Line 2311... Line 2285...
2311
  ZL0:;
2285
  ZL0:;
2312
    *ZO420 = ZI420;
2286
    *ZO420 = ZI420;
2313
}
2287
}
2314
 
2288
 
2315
void
2289
void
2316
parse_tok_type PROTO_N ((ZO395))
2290
parse_tok_type(TYPE *ZO395)
2317
  PROTO_T (TYPE *ZO395)
-
 
2318
{
2291
{
2319
    TYPE ZI395;
2292
    TYPE ZI395;
2320
 
2293
 
2321
    if ((CURRENT_TERMINAL) == 354) {
2294
    if ((CURRENT_TERMINAL) == 354) {
2322
	return;
2295
	return;
Line 2350... Line 2323...
2350
  ZL0:;
2323
  ZL0:;
2351
    *ZO395 = ZI395;
2324
    *ZO395 = ZI395;
2352
}
2325
}
2353
 
2326
 
2354
void
2327
void
2355
ZR910 PROTO_N ((ZI908, ZO909))
-
 
2356
  PROTO_T (EXP ZI908 X EXP *ZO909)
2328
ZR910(EXP ZI908, EXP *ZO909)
2357
{
2329
{
2358
    EXP ZI909;
2330
    EXP ZI909;
2359
 
2331
 
2360
  ZL2_910:;
2332
  ZL2_910:;
2361
    switch (CURRENT_TERMINAL) {
2333
    switch (CURRENT_TERMINAL) {
Line 2412... Line 2384...
2412
  ZL0:;
2384
  ZL0:;
2413
    *ZO909 = ZI909;
2385
    *ZO909 = ZI909;
2414
}
2386
}
2415
 
2387
 
2416
void
2388
void
2417
ZR487 PROTO_Z ()
2389
ZR487(void)
2418
{
2390
{
2419
    switch (CURRENT_TERMINAL) {
2391
    switch (CURRENT_TERMINAL) {
2420
      case 48:
2392
      case 48:
2421
	{
2393
	{
2422
	    ADVANCE_LEXER;
2394
	    ADVANCE_LEXER;
Line 2447... Line 2419...
2447
    SAVE_LEXER (354);
2419
    SAVE_LEXER (354);
2448
    return;
2420
    return;
2449
}
2421
}
2450
 
2422
 
2451
void
2423
void
2452
ZR491 PROTO_N ((ZO897))
-
 
2453
  PROTO_T (EXP *ZO897)
2424
ZR491(EXP *ZO897)
2454
{
2425
{
2455
    EXP ZI897;
2426
    EXP ZI897;
2456
 
2427
 
2457
    if ((CURRENT_TERMINAL) == 354) {
2428
    if ((CURRENT_TERMINAL) == 354) {
2458
	return;
2429
	return;
Line 2474... Line 2445...
2474
  ZL0:;
2445
  ZL0:;
2475
    *ZO897 = ZI897;
2446
    *ZO897 = ZI897;
2476
}
2447
}
2477
 
2448
 
2478
void
2449
void
2479
ZR511 PROTO_N ((ZO404))
-
 
2480
  PROTO_T (EXP *ZO404)
2450
ZR511(EXP *ZO404)
2481
{
2451
{
2482
    EXP ZI404;
2452
    EXP ZI404;
2483
 
2453
 
2484
    if ((CURRENT_TERMINAL) == 354) {
2454
    if ((CURRENT_TERMINAL) == 354) {
2485
	return;
2455
	return;
Line 2505... Line 2475...
2505
  ZL0:;
2475
  ZL0:;
2506
    *ZO404 = ZI404;
2476
    *ZO404 = ZI404;
2507
}
2477
}
2508
 
2478
 
2509
void
2479
void
2510
parse_type_param PROTO_N ((ZO547))
2480
parse_type_param(IDENTIFIER *ZO547)
2511
  PROTO_T (IDENTIFIER *ZO547)
-
 
2512
{
2481
{
2513
    IDENTIFIER ZI547;
2482
    IDENTIFIER ZI547;
2514
 
2483
 
2515
    if ((CURRENT_TERMINAL) == 354) {
2484
    if ((CURRENT_TERMINAL) == 354) {
2516
	return;
2485
	return;
Line 2530... Line 2499...
2530
    }
2499
    }
2531
    *ZO547 = ZI547;
2500
    *ZO547 = ZI547;
2532
}
2501
}
2533
 
2502
 
2534
void
2503
void
2535
ZR914 PROTO_N ((ZI912, ZO913))
-
 
2536
  PROTO_T (EXP ZI912 X EXP *ZO913)
2504
ZR914(EXP ZI912, EXP *ZO913)
2537
{
2505
{
2538
    EXP ZI913;
2506
    EXP ZI913;
2539
 
2507
 
2540
  ZL2_914:;
2508
  ZL2_914:;
2541
    switch (CURRENT_TERMINAL) {
2509
    switch (CURRENT_TERMINAL) {
Line 2592... Line 2560...
2592
  ZL0:;
2560
  ZL0:;
2593
    *ZO913 = ZI913;
2561
    *ZO913 = ZI913;
2594
}
2562
}
2595
 
2563
 
2596
void
2564
void
2597
ZR447 PROTO_N ((ZO921))
-
 
2598
  PROTO_T (EXP *ZO921)
2565
ZR447(EXP *ZO921)
2599
{
2566
{
2600
    EXP ZI921;
2567
    EXP ZI921;
2601
 
2568
 
2602
    if ((CURRENT_TERMINAL) == 354) {
2569
    if ((CURRENT_TERMINAL) == 354) {
2603
	return;
2570
	return;
Line 2619... Line 2586...
2619
  ZL0:;
2586
  ZL0:;
2620
    *ZO921 = ZI921;
2587
    *ZO921 = ZI921;
2621
}
2588
}
2622
 
2589
 
2623
void
2590
void
2624
ZR554 PROTO_N ((ZO404))
-
 
2625
  PROTO_T (EXP *ZO404)
2591
ZR554(EXP *ZO404)
2626
{
2592
{
2627
    EXP ZI404;
2593
    EXP ZI404;
2628
 
2594
 
2629
    switch (CURRENT_TERMINAL) {
2595
    switch (CURRENT_TERMINAL) {
2630
      case 170:
2596
      case 170:
Line 3543... Line 3509...
3543
  ZL0:;
3509
  ZL0:;
3544
    *ZO404 = ZI404;
3510
    *ZO404 = ZI404;
3545
}
3511
}
3546
 
3512
 
3547
void
3513
void
3548
ZR662 PROTO_Z ()
3514
ZR662(void)
3549
{
3515
{
3550
    if ((CURRENT_TERMINAL) == 354) {
3516
    if ((CURRENT_TERMINAL) == 354) {
3551
	return;
3517
	return;
3552
    }
3518
    }
3553
  ZL2_662:;
3519
  ZL2_662:;
Line 3594... Line 3560...
3594
    SAVE_LEXER (354);
3560
    SAVE_LEXER (354);
3595
    return;
3561
    return;
3596
}
3562
}
3597
 
3563
 
3598
void
3564
void
3599
ZR1043 PROTO_N ((ZI420, ZI423, ZI1042))
-
 
3600
  PROTO_T (TYPE *ZI420 X BASE_TYPE *ZI423 X IDENTIFIER *ZI1042)
3565
ZR1043(TYPE *ZI420, BASE_TYPE *ZI423, IDENTIFIER *ZI1042)
3601
{
3566
{
3602
    switch (CURRENT_TERMINAL) {
3567
    switch (CURRENT_TERMINAL) {
3603
      case 41:
3568
      case 41:
3604
	{
3569
	{
3605
	    EXP ZI467;
3570
	    EXP ZI467;
Line 3674... Line 3639...
3674
    SAVE_LEXER (354);
3639
    SAVE_LEXER (354);
3675
    return;
3640
    return;
3676
}
3641
}
3677
 
3642
 
3678
void
3643
void
3679
ZR461 PROTO_N ((ZI460, ZO404))
-
 
3680
  PROTO_T (int ZI460 X EXP *ZO404)
3644
ZR461(int ZI460, EXP *ZO404)
3681
{
3645
{
3682
    EXP ZI404;
3646
    EXP ZI404;
3683
 
3647
 
3684
    if ((CURRENT_TERMINAL) == 354) {
3648
    if ((CURRENT_TERMINAL) == 354) {
3685
	return;
3649
	return;
Line 4189... Line 4153...
4189
  ZL0:;
4153
  ZL0:;
4190
    *ZO404 = ZI404;
4154
    *ZO404 = ZI404;
4191
}
4155
}
4192
 
4156
 
4193
void
4157
void
4194
ZR918 PROTO_N ((ZI916, ZO917))
-
 
4195
  PROTO_T (EXP ZI916 X EXP *ZO917)
4158
ZR918(EXP ZI916, EXP *ZO917)
4196
{
4159
{
4197
    EXP ZI917;
4160
    EXP ZI917;
4198
 
4161
 
4199
  ZL2_918:;
4162
  ZL2_918:;
4200
    switch (CURRENT_TERMINAL) {
4163
    switch (CURRENT_TERMINAL) {
Line 4270... Line 4233...
4270
  ZL0:;
4233
  ZL0:;
4271
    *ZO917 = ZI917;
4234
    *ZO917 = ZI917;
4272
}
4235
}
4273
 
4236
 
4274
void
4237
void
4275
ZR1046 PROTO_N ((ZO854, ZO855))
-
 
4276
  PROTO_T (TYPE *ZO854 X IDENTIFIER *ZO855)
4238
ZR1046(TYPE *ZO854, IDENTIFIER *ZO855)
4277
{
4239
{
4278
    TYPE ZI854;
4240
    TYPE ZI854;
4279
    IDENTIFIER ZI855;
4241
    IDENTIFIER ZI855;
4280
 
4242
 
4281
    if ((CURRENT_TERMINAL) == 354) {
4243
    if ((CURRENT_TERMINAL) == 354) {
Line 4661... Line 4623...
4661
    *ZO854 = ZI854;
4623
    *ZO854 = ZI854;
4662
    *ZO855 = ZI855;
4624
    *ZO855 = ZI855;
4663
}
4625
}
4664
 
4626
 
4665
void
4627
void
4666
ZR778 PROTO_Z ()
4628
ZR778(void)
4667
{
4629
{
4668
  ZL2_778:;
4630
  ZL2_778:;
4669
    switch (CURRENT_TERMINAL) {
4631
    switch (CURRENT_TERMINAL) {
4670
      case 42:
4632
      case 42:
4671
	{
4633
	{
Line 4701... Line 4663...
4701
    SAVE_LEXER (354);
4663
    SAVE_LEXER (354);
4702
    return;
4664
    return;
4703
}
4665
}
4704
 
4666
 
4705
void
4667
void
4706
ZR764 PROTO_N ((ZO395, ZO399))
-
 
4707
  PROTO_T (TYPE *ZO395 X IDENTIFIER *ZO399)
4668
ZR764(TYPE *ZO395, IDENTIFIER *ZO399)
4708
{
4669
{
4709
    TYPE ZI395;
4670
    TYPE ZI395;
4710
    IDENTIFIER ZI399;
4671
    IDENTIFIER ZI399;
4711
 
4672
 
4712
    if ((CURRENT_TERMINAL) == 354) {
4673
    if ((CURRENT_TERMINAL) == 354) {
Line 4949... Line 4910...
4949
    *ZO395 = ZI395;
4910
    *ZO395 = ZI395;
4950
    *ZO399 = ZI399;
4911
    *ZO399 = ZI399;
4951
}
4912
}
4952
 
4913
 
4953
void
4914
void
4954
ZR922 PROTO_N ((ZI920, ZO921))
-
 
4955
  PROTO_T (EXP ZI920 X EXP *ZO921)
4915
ZR922(EXP ZI920, EXP *ZO921)
4956
{
4916
{
4957
    EXP ZI921;
4917
    EXP ZI921;
4958
 
4918
 
4959
  ZL2_922:;
4919
  ZL2_922:;
4960
    switch (CURRENT_TERMINAL) {
4920
    switch (CURRENT_TERMINAL) {