Subversion Repositories tendra.SVN

Rev

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

Rev 2 Rev 7
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 126... Line 126...
126 
#endif
 126 
#endif
127 
 
 127 
 
128 
 
 128 
 
129 
 
 129 
 
130 
void
 130 
void
131 
ZR623 PROTO_N ((ZO404))
 - 
 
132 
  PROTO_T (EXP *ZO404)
 131 
ZR623(EXP *ZO404)
133 
{
 132 
{
134 
    EXP ZI404;
 133 
    EXP ZI404;
135 
 
 134 
 
136 
    if ((CURRENT_TERMINAL) == 354) {
 135 
    if ((CURRENT_TERMINAL) == 354) {
137 
	return;
 136 
	return;
Line 207... Line 206...
207 
  ZL0:;
 206 
  ZL0:;
208 
    *ZO404 = ZI404;
 207 
    *ZO404 = ZI404;
209 
}
 208 
}
210 
 
 209 
 
211 
void
 210 
void
212 
ZR766 PROTO_N ((ZI420, ZO395, ZO399))
 - 
 
213 
  PROTO_T (TYPE ZI420 X TYPE *ZO395 X IDENTIFIER *ZO399)
 211 
ZR766(TYPE ZI420, TYPE *ZO395, IDENTIFIER *ZO399)
214 
{
 212 
{
215 
    TYPE ZI395;
 213 
    TYPE ZI395;
216 
    IDENTIFIER ZI399;
 214 
    IDENTIFIER ZI399;
217 
 
 215 
 
218 
    if ((CURRENT_TERMINAL) == 354) {
 216 
    if ((CURRENT_TERMINAL) == 354) {
Line 487... Line 485...
487 
    *ZO395 = ZI395;
 485 
    *ZO395 = ZI395;
488 
    *ZO399 = ZI399;
 486 
    *ZO399 = ZI399;
489 
}
 487 
}
490 
 
 488 
 
491 
void
 489 
void
492 
ZR503 PROTO_N ((ZO404))
 - 
 
493 
  PROTO_T (EXP *ZO404)
 490 
ZR503(EXP *ZO404)
494 
{
 491 
{
495 
    EXP ZI404;
 492 
    EXP ZI404;
496 
 
 493 
 
497 
    if ((CURRENT_TERMINAL) == 354) {
 494 
    if ((CURRENT_TERMINAL) == 354) {
498 
	return;
 495 
	return;
Line 514... Line 511...
514 
  ZL0:;
 511 
  ZL0:;
515 
    *ZO404 = ZI404;
 512 
    *ZO404 = ZI404;
516 
}
 513 
}
517 
 
 514 
 
518 
void
 515 
void
519 
parse_type PROTO_N ((ZO395))
 516 
parse_type(TYPE *ZO395)
520 
  PROTO_T (TYPE *ZO395)
 - 
 
521 
{
 517 
{
522 
    TYPE ZI395;
 518 
    TYPE ZI395;
523 
 
 519 
 
524 
    if ((CURRENT_TERMINAL) == 354) {
 520 
    if ((CURRENT_TERMINAL) == 354) {
525 
	return;
 521 
	return;
Line 553... Line 549...
553 
  ZL0:;
 549 
  ZL0:;
554 
    *ZO395 = ZI395;
 550 
    *ZO395 = ZI395;
555 
}
 551 
}
556 
 
 552 
 
557 
void
 553 
void
558 
ZR836 PROTO_N ((ZI448, ZI568, ZO847, ZO848))
 - 
 
559 
  PROTO_T (OFFSET ZI448 X TYPE ZI568 X OFFSET *ZO847 X TYPE *ZO848)
 554 
ZR836(OFFSET ZI448, TYPE ZI568, OFFSET *ZO847, TYPE *ZO848)
560 
{
 555 
{
561 
    OFFSET ZI847;
 556 
    OFFSET ZI847;
562 
    TYPE ZI848;
 557 
    TYPE ZI848;
563 
 
 558 
 
564 
    if ((CURRENT_TERMINAL) == 354) {
 559 
    if ((CURRENT_TERMINAL) == 354) {
Line 599... Line 594...
599 
    *ZO847 = ZI847;
 594 
    *ZO847 = ZI847;
600 
    *ZO848 = ZI848;
 595 
    *ZO848 = ZI848;
601 
}
 596 
}
602 
 
 597 
 
603 
void
 598 
void
604 
ZR805 PROTO_N ((ZO873))
 - 
 
605 
  PROTO_T (EXP *ZO873)
 599 
ZR805(EXP *ZO873)
606 
{
 600 
{
607 
    EXP ZI873;
 601 
    EXP ZI873;
608 
 
 602 
 
609 
    if ((CURRENT_TERMINAL) == 354) {
 603 
    if ((CURRENT_TERMINAL) == 354) {
610 
	return;
 604 
	return;
Line 648... Line 642...
648 
  ZL0:;
 642 
  ZL0:;
649 
    *ZO873 = ZI873;
 643 
    *ZO873 = ZI873;
650 
}
 644 
}
651 
 
 645 
 
652 
void
 646 
void
653 
ZR1055 PROTO_N ((ZI399, ZO395))
 - 
 
654 
  PROTO_T (IDENTIFIER *ZI399 X TYPE *ZO395)
 647 
ZR1055(IDENTIFIER *ZI399, TYPE *ZO395)
655 
{
 648 
{
656 
    TYPE ZI395;
 649 
    TYPE ZI395;
657 
 
 650 
 
658 
    switch (CURRENT_TERMINAL) {
 651 
    switch (CURRENT_TERMINAL) {
659 
      default:
 652 
      default:
Line 733... Line 726...
733 
  ZL0:;
 726 
  ZL0:;
734 
    *ZO395 = ZI395;
 727 
    *ZO395 = ZI395;
735 
}
 728 
}
736 
 
 729 
 
737 
void
 730 
void
738 
ZR657 PROTO_N ((ZO395))
 - 
 
739 
  PROTO_T (TYPE *ZO395)
 731 
ZR657(TYPE *ZO395)
740 
{
 732 
{
741 
    TYPE ZI395;
 733 
    TYPE ZI395;
742 
 
 734 
 
743 
    if ((CURRENT_TERMINAL) == 354) {
 735 
    if ((CURRENT_TERMINAL) == 354) {
744 
	return;
 736 
	return;
Line 864... Line 856...
864 
  ZL0:;
 856 
  ZL0:;
865 
    *ZO395 = ZI395;
 857 
    *ZO395 = ZI395;
866 
}
 858 
}
867 
 
 859 
 
868 
void
 860 
void
869 
ZR742 PROTO_N ((ZO395, ZO399))
 - 
 
870 
  PROTO_T (TYPE *ZO395 X IDENTIFIER *ZO399)
 861 
ZR742(TYPE *ZO395, IDENTIFIER *ZO399)
871 
{
 862 
{
872 
    TYPE ZI395;
 863 
    TYPE ZI395;
873 
    IDENTIFIER ZI399;
 864 
    IDENTIFIER ZI399;
874 
 
 865 
 
875 
    switch (CURRENT_TERMINAL) {
 866 
    switch (CURRENT_TERMINAL) {
Line 912... Line 903...
912 
    *ZO395 = ZI395;
 903 
    *ZO395 = ZI395;
913 
    *ZO399 = ZI399;
 904 
    *ZO399 = ZI399;
914 
}
 905 
}
915 
 
 906 
 
916 
void
 907 
void
917 
ZR482 PROTO_N ((ZO909))
 - 
 
918 
  PROTO_T (EXP *ZO909)
 908 
ZR482(EXP *ZO909)
919 
{
 909 
{
920 
    EXP ZI909;
 910 
    EXP ZI909;
921 
 
 911 
 
922 
    if ((CURRENT_TERMINAL) == 354) {
 912 
    if ((CURRENT_TERMINAL) == 354) {
923 
	return;
 913 
	return;
Line 939... Line 929...
939 
  ZL0:;
 929 
  ZL0:;
940 
    *ZO909 = ZI909;
 930 
    *ZO909 = ZI909;
941 
}
 931 
}
942 
 
 932 
 
943 
void
 933 
void
944 
ZR599 PROTO_N ((ZO404))
 - 
 
945 
  PROTO_T (EXP *ZO404)
 934 
ZR599(EXP *ZO404)
946 
{
 935 
{
947 
    EXP ZI404;
 936 
    EXP ZI404;
948 
 
 937 
 
949 
    if ((CURRENT_TERMINAL) == 354) {
 938 
    if ((CURRENT_TERMINAL) == 354) {
950 
	return;
 939 
	return;
Line 981... Line 970...
981 
  ZL0:;
 970 
  ZL0:;
982 
    *ZO404 = ZI404;
 971 
    *ZO404 = ZI404;
983 
}
 972 
}
984 
 
 973 
 
985 
void
 974 
void
986 
ZR678 PROTO_N ((ZI404))
 - 
 
987 
  PROTO_T (IDENTIFIER ZI404)
 975 
ZR678(IDENTIFIER ZI404)
988 
{
 976 
{
989 
    if ((CURRENT_TERMINAL) == 354) {
 977 
    if ((CURRENT_TERMINAL) == 354) {
990 
	return;
 978 
	return;
991 
    }
 979 
    }
992 
    {
 980 
    {
Line 1063... Line 1051...
1063 
    SAVE_LEXER (354);
 1051 
    SAVE_LEXER (354);
1064 
    return;
 1052 
    return;
1065 
}
 1053 
}
1066 
 
 1054 
 
1067 
void
 1055 
void
1068 
ZR752 PROTO_N ((ZI420, ZO395, ZO399))
 - 
 
1069 
  PROTO_T (TYPE ZI420 X TYPE *ZO395 X IDENTIFIER *ZO399)
 1056 
ZR752(TYPE ZI420, TYPE *ZO395, IDENTIFIER *ZO399)
1070 
{
 1057 
{
1071 
    TYPE ZI395;
 1058 
    TYPE ZI395;
1072 
    IDENTIFIER ZI399;
 1059 
    IDENTIFIER ZI399;
1073 
 
 1060 
 
1074 
    if ((CURRENT_TERMINAL) == 354) {
 1061 
    if ((CURRENT_TERMINAL) == 354) {
Line 1095... Line 1082...
1095 
    *ZO395 = ZI395;
 1082 
    *ZO395 = ZI395;
1096 
    *ZO399 = ZI399;
 1083 
    *ZO399 = ZI399;
1097 
}
 1084 
}
1098 
 
 1085 
 
1099 
void
 1086 
void
1100 
ZR792 PROTO_N ((ZI547, ZO404))
 - 
 
1101 
  PROTO_T (IDENTIFIER ZI547 X EXP *ZO404)
 1087 
ZR792(IDENTIFIER ZI547, EXP *ZO404)
1102 
{
 1088 
{
1103 
    EXP ZI404;
 1089 
    EXP ZI404;
1104 
 
 1090 
 
1105 
    switch (CURRENT_TERMINAL) {
 1091 
    switch (CURRENT_TERMINAL) {
1106 
      case 36:
 1092 
      case 36:
Line 1131... Line 1117...
1131 
  ZL0:;
 1117 
  ZL0:;
1132 
    *ZO404 = ZI404;
 1118 
    *ZO404 = ZI404;
1133 
}
 1119 
}
1134 
 
 1120 
 
1135 
void
 1121 
void
1136 
parse_file PROTO_N ((ZI395, ZI605))
 - 
 
1137 
  PROTO_T (TYPE ZI395 X DECL_SPEC ZI605)
 1122 
parse_file(TYPE ZI395, DECL_SPEC ZI605)
1138 
{
 1123 
{
1139 
    if ((CURRENT_TERMINAL) == 354) {
 1124 
    if ((CURRENT_TERMINAL) == 354) {
1140 
	return;
 1125 
	return;
1141 
    }
 1126 
    }
1142 
    {
 1127 
    {
Line 1338... Line 1323...
1338 
    }
 1323 
    }
1339 
  ZL0:;
 1324 
  ZL0:;
1340 
}
 1325 
}
1341 
 
 1326 
 
1342 
void
 1327 
void
1343 
parse_offset PROTO_N ((ZI448, ZI568, ZO416, ZO395))
 - 
 
1344 
  PROTO_T (OFFSET ZI448 X TYPE ZI568 X OFFSET *ZO416 X TYPE *ZO395)
 1328 
parse_offset(OFFSET ZI448, TYPE ZI568, OFFSET *ZO416, TYPE *ZO395)
1345 
{
 1329 
{
1346 
    OFFSET ZI416;
 1330 
    OFFSET ZI416;
1347 
    TYPE ZI395;
 1331 
    TYPE ZI395;
1348 
 
 1332 
 
1349 
    if ((CURRENT_TERMINAL) == 354) {
 1333 
    if ((CURRENT_TERMINAL) == 354) {
Line 1394... Line 1378...
1394 
    *ZO416 = ZI416;
 1378 
    *ZO416 = ZI416;
1395 
    *ZO395 = ZI395;
 1379 
    *ZO395 = ZI395;
1396 
}
 1380 
}
1397 
 
 1381 
 
1398 
void
 1382 
void
1399 
ZR1059 PROTO_N ((ZI1057, ZO395))
 - 
 
1400 
  PROTO_T (TYPE *ZI1057 X TYPE *ZO395)
 1383 
ZR1059(TYPE *ZI1057, TYPE *ZO395)
1401 
{
 1384 
{
1402 
    TYPE ZI395;
 1385 
    TYPE ZI395;
1403 
 
 1386 
 
1404 
    switch (CURRENT_TERMINAL) {
 1387 
    switch (CURRENT_TERMINAL) {
1405 
      case 65: case 66: case 78: case 331:
 1388 
      case 65: case 66: case 78: case 331:
Line 1432... Line 1415...
1432 
  ZL0:;
 1415 
  ZL0:;
1433 
    *ZO395 = ZI395;
 1416 
    *ZO395 = ZI395;
1434 
}
 1417 
}
1435 
 
 1418 
 
1436 
void
 1419 
void
1437 
parse_nat PROTO_N ((ZO404))
 1420 
parse_nat(EXP *ZO404)
1438 
  PROTO_T (EXP *ZO404)
 - 
 
1439 
{
 1421 
{
1440 
    EXP ZI404;
 1422 
    EXP ZI404;
1441 
 
 1423 
 
1442 
    if ((CURRENT_TERMINAL) == 354) {
 1424 
    if ((CURRENT_TERMINAL) == 354) {
1443 
	return;
 1425 
	return;
Line 1467... Line 1449...
1467 
  ZL0:;
 1449 
  ZL0:;
1468 
    *ZO404 = ZI404;
 1450 
    *ZO404 = ZI404;
1469 
}
 1451 
}
1470 
 
 1452 
 
1471 
void
 1453 
void
1472 
ZR1060 PROTO_N ((ZO859))
 - 
 
1473 
  PROTO_T (TYPE *ZO859)
 1454 
ZR1060(TYPE *ZO859)
1474 
{
 1455 
{
1475 
    TYPE ZI859;
 1456 
    TYPE ZI859;
1476 
 
 1457 
 
1477 
    switch (CURRENT_TERMINAL) {
 1458 
    switch (CURRENT_TERMINAL) {
1478 
      case 65: case 66: case 78: case 331:
 1459 
      case 65: case 66: case 78: case 331:
Line 1563... Line 1544...
1563 
  ZL0:;
 1544 
  ZL0:;
1564 
    *ZO859 = ZI859;
 1545 
    *ZO859 = ZI859;
1565 
}
 1546 
}
1566 
 
 1547 
 
1567 
void
 1548 
void
1568 
ZR933 PROTO_N ((ZI927, ZI928, ZI929, ZO930, ZO931, ZO932))
 - 
 
1569 
  PROTO_T (EXP ZI927 X EXP ZI928 X int ZI929 X EXP *ZO930 X EXP *ZO931 X int *ZO932)
 1549 
ZR933(EXP ZI927, EXP ZI928, int ZI929, EXP *ZO930, EXP *ZO931, int *ZO932)
1570 
{
 1550 
{
1571 
    EXP ZI930;
 1551 
    EXP ZI930;
1572 
    EXP ZI931;
 1552 
    EXP ZI931;
1573 
    int ZI932;
 1553 
    int ZI932;
1574 
 
 1554 
 
Line 1644... Line 1624...
1644 
    *ZO931 = ZI931;
 1624 
    *ZO931 = ZI931;
1645 
    *ZO932 = ZI932;
 1625 
    *ZO932 = ZI932;
1646 
}
 1626 
}
1647 
 
 1627 
 
1648 
void
 1628 
void
1649 
ZR516 PROTO_N ((ZO404))
 - 
 
1650 
  PROTO_T (EXP *ZO404)
 1629 
ZR516(EXP *ZO404)
1651 
{
 1630 
{
1652 
    EXP ZI404;
 1631 
    EXP ZI404;
1653 
 
 1632 
 
1654 
    if ((CURRENT_TERMINAL) == 354) {
 1633 
    if ((CURRENT_TERMINAL) == 354) {
1655 
	return;
 1634 
	return;
Line 1668... Line 1647...
1668 
  ZL0:;
 1647 
  ZL0:;
1669 
    *ZO404 = ZI404;
 1648 
    *ZO404 = ZI404;
1670 
}
 1649 
}
1671 
 
 1650 
 
1672 
void
 1651 
void
1673 
parse_param PROTO_N ((ZI568, ZI420, ZO547))
 - 
 
1674 
  PROTO_T (TYPE ZI568 X int ZI420 X IDENTIFIER *ZO547)
 1652 
parse_param(TYPE ZI568, int ZI420, IDENTIFIER *ZO547)
1675 
{
 1653 
{
1676 
    IDENTIFIER ZI547;
 1654 
    IDENTIFIER ZI547;
1677 
 
 1655 
 
1678 
    if ((CURRENT_TERMINAL) == 354) {
 1656 
    if ((CURRENT_TERMINAL) == 354) {
1679 
	return;
 1657 
	return;
Line 1703... Line 1681...
1703 
  ZL0:;
 1681 
  ZL0:;
1704 
    *ZO547 = ZI547;
 1682 
    *ZO547 = ZI547;
1705 
}
 1683 
}
1706 
 
 1684 
 
1707 
void
 1685 
void
1708 
ZR687 PROTO_N ((ZO658, ZO395, ZO630))
 - 
 
1709 
  PROTO_T (BASE_TYPE *ZO658 X TYPE *ZO395 X CV_SPEC *ZO630)
 1686 
ZR687(BASE_TYPE *ZO658, TYPE *ZO395, CV_SPEC *ZO630)
1710 
{
 1687 
{
1711 
    BASE_TYPE ZI658;
 1688 
    BASE_TYPE ZI658;
1712 
    TYPE ZI395;
 1689 
    TYPE ZI395;
1713 
    CV_SPEC ZI630;
 1690 
    CV_SPEC ZI630;
1714 
 
 1691 
 
Line 1787... Line 1764...
1787 
    *ZO395 = ZI395;
 1764 
    *ZO395 = ZI395;
1788 
    *ZO630 = ZI630;
 1765 
    *ZO630 = ZI630;
1789 
}
 1766 
}
1790 
 
 1767 
 
1791 
void
 1768 
void
1792 
parse_func PROTO_N ((ZO404))
 1769 
parse_func(EXP *ZO404)
1793 
  PROTO_T (EXP *ZO404)
 - 
 
1794 
{
 1770 
{
1795 
    EXP ZI404;
 1771 
    EXP ZI404;
1796 
 
 1772 
 
1797 
    if ((CURRENT_TERMINAL) == 354) {
 1773 
    if ((CURRENT_TERMINAL) == 354) {
1798 
	return;
 1774 
	return;
Line 1822... Line 1798...
1822 
  ZL0:;
 1798 
  ZL0:;
1823 
    *ZO404 = ZI404;
 1799 
    *ZO404 = ZI404;
1824 
}
 1800 
}
1825 
 
 1801 
 
1826 
void
 1802 
void
1827 
ZR753 PROTO_N ((ZO395))
 - 
 
1828 
  PROTO_T (TYPE *ZO395)
 1803 
ZR753(TYPE *ZO395)
1829 
{
 1804 
{
1830 
    TYPE ZI395;
 1805 
    TYPE ZI395;
1831 
 
 1806 
 
1832 
    switch (CURRENT_TERMINAL) {
 1807 
    switch (CURRENT_TERMINAL) {
1833 
      case 65: case 66: case 331:
 1808 
      case 65: case 66: case 331:
Line 1863... Line 1838...
1863 
  ZL0:;
 1838 
  ZL0:;
1864 
    *ZO395 = ZI395;
 1839 
    *ZO395 = ZI395;
1865 
}
 1840 
}
1866 
 
 1841 
 
1867 
void
 1842 
void
1868 
ZR683 PROTO_N ((ZI420))
 - 
 
1869 
  PROTO_T (IDENTIFIER *ZI420)
 1843 
ZR683(IDENTIFIER *ZI420)
1870 
{
 1844 
{
1871 
    switch (CURRENT_TERMINAL) {
 1845 
    switch (CURRENT_TERMINAL) {
1872 
      case 1: case 2: case 4:
 1846 
      case 1: case 2: case 4:
1873 
	{
 1847 
	{
1874 
	    ZR680 (*ZI420);
 1848 
	    ZR680 (*ZI420);
Line 1888... Line 1862...
1888 
    SAVE_LEXER (354);
 1862 
    SAVE_LEXER (354);
1889 
    return;
 1863 
    return;
1890 
}
 1864 
}
1891 
 
 1865 
 
1892 
void
 1866 
void
1893 
ZR709 PROTO_N ((ZO605))
 - 
 
1894 
  PROTO_T (DECL_SPEC *ZO605)
 1867 
ZR709(DECL_SPEC *ZO605)
1895 
{
 1868 
{
1896 
    DECL_SPEC ZI605;
 1869 
    DECL_SPEC ZI605;
1897 
 
 1870 
 
1898 
    switch (CURRENT_TERMINAL) {
 1871 
    switch (CURRENT_TERMINAL) {
1899 
      case 94:
 1872 
      case 94:
Line 1956... Line 1929...
1956 
  ZL0:;
 1929 
  ZL0:;
1957 
    *ZO605 = ZI605;
 1930 
    *ZO605 = ZI605;
1958 
}
 1931 
}
1959 
 
 1932 
 
1960 
void
 1933 
void
1961 
ZR744 PROTO_Z ()
 1934 
ZR744(void)
1962 
{
 1935 
{
1963 
    if ((CURRENT_TERMINAL) == 354) {
 1936 
    if ((CURRENT_TERMINAL) == 354) {
1964 
	return;
 1937 
	return;
1965 
    }
 1938 
    }
1966 
    {
 1939 
    {
Line 2012... Line 1985...
2012 
    SAVE_LEXER (354);
 1985 
    SAVE_LEXER (354);
2013 
    return;
 1986 
    return;
2014 
}
 1987 
}
2015 
 
 1988 
 
2016 
void
 1989 
void
2017 
parse_id PROTO_N ((ZO399))
 - 
 
2018 
  PROTO_T (IDENTIFIER *ZO399)
 1990 
parse_id(IDENTIFIER *ZO399)
2019 
{
 1991 
{
2020 
    IDENTIFIER ZI399;
 1992 
    IDENTIFIER ZI399;
2021 
 
 1993 
 
2022 
    if ((CURRENT_TERMINAL) == 354) {
 1994 
    if ((CURRENT_TERMINAL) == 354) {
2023 
	return;
 1995 
	return;
Line 2075... Line 2047...
2075 
  ZL0:;
 2047 
  ZL0:;
2076 
    *ZO399 = ZI399;
 2048 
    *ZO399 = ZI399;
2077 
}
 2049 
}
2078 
 
 2050 
 
2079 
void
 2051 
void
2080 
ZR813 PROTO_N ((ZI658, ZI689, ZI630, ZI716))
 - 
 
2081 
  PROTO_T (BASE_TYPE *ZI658 X TYPE *ZI689 X CV_SPEC *ZI630 X DECL_SPEC *ZI716)
 2052 
ZR813(BASE_TYPE *ZI658, TYPE *ZI689, CV_SPEC *ZI630, DECL_SPEC *ZI716)
2082 
{
 2053 
{
2083 
    switch (CURRENT_TERMINAL) {
 2054 
    switch (CURRENT_TERMINAL) {
2084 
      default:
 2055 
      default:
2085 
	{
 2056 
	{
2086 
	    {
 2057 
	    {
Line 2119... Line 2090...
2119 
    SAVE_LEXER (354);
 2090 
    SAVE_LEXER (354);
2120 
    return;
 2091 
    return;
2121 
}
 2092 
}
2122 
 
 2093 
 
2123 
void
 2094 
void
2124 
ZR459 PROTO_N ((ZO404))
 - 
 
2125 
  PROTO_T (EXP *ZO404)
 2095 
ZR459(EXP *ZO404)
2126 
{
 2096 
{
2127 
    EXP ZI404;
 2097 
    EXP ZI404;
2128 
 
 2098 
 
2129 
    switch (CURRENT_TERMINAL) {
 2099 
    switch (CURRENT_TERMINAL) {
2130 
      case 170:
 2100 
      case 170:
Line 2384... Line 2354...
2384 
  ZL0:;
 2354 
  ZL0:;
2385 
    *ZO404 = ZI404;
 2355 
    *ZO404 = ZI404;
2386 
}
 2356 
}
2387 
 
 2357 
 
2388 
void
 2358 
void
2389 
ZR660 PROTO_N ((ZO658, ZO395))
 - 
 
2390 
  PROTO_T (BASE_TYPE *ZO658 X TYPE *ZO395)
 2359 
ZR660(BASE_TYPE *ZO658, TYPE *ZO395)
2391 
{
 2360 
{
2392 
    BASE_TYPE ZI658;
 2361 
    BASE_TYPE ZI658;
2393 
    TYPE ZI395;
 2362 
    TYPE ZI395;
2394 
 
 2363 
 
2395 
    switch (CURRENT_TERMINAL) {
 2364 
    switch (CURRENT_TERMINAL) {
Line 2483... Line 2452...
2483 
    *ZO658 = ZI658;
 2452 
    *ZO658 = ZI658;
2484 
    *ZO395 = ZI395;
 2453 
    *ZO395 = ZI395;
2485 
}
 2454 
}
2486 
 
 2455 
 
2487 
void
 2456 
void
2488 
ZR760 PROTO_N ((ZI420, ZO395))
 - 
 
2489 
  PROTO_T (TYPE ZI420 X TYPE *ZO395)
 2457 
ZR760(TYPE ZI420, TYPE *ZO395)
2490 
{
 2458 
{
2491 
    TYPE ZI395;
 2459 
    TYPE ZI395;
2492 
 
 2460 
 
2493 
    switch (CURRENT_TERMINAL) {
 2461 
    switch (CURRENT_TERMINAL) {
2494 
      case 65: case 66: case 78: case 331:
 2462 
      case 65: case 66: case 78: case 331:
Line 2521... Line 2489...
2521 
  ZL0:;
 2489 
  ZL0:;
2522 
    *ZO395 = ZI395;
 2490 
    *ZO395 = ZI395;
2523 
}
 2491 
}
2524 
 
 2492 
 
2525 
void
 2493 
void
2526 
ZR394 PROTO_Z ()
 2494 
ZR394(void)
2527 
{
 2495 
{
2528 
    if ((CURRENT_TERMINAL) == 354) {
 2496 
    if ((CURRENT_TERMINAL) == 354) {
2529 
	return;
 2497 
	return;
2530 
    }
 2498 
    }
2531 
    {
 2499 
    {
Line 2553... Line 2521...
2553 
	}
 2521 
	}
2554 
    }
 2522 
    }
2555 
}
 2523 
}
2556 
 
 2524 
 
2557 
void
 2525 
void
2558 
ZR1071 PROTO_N ((ZI460, ZI462, ZI463, ZO467))
 - 
 
2559 
  PROTO_T (int *ZI460 X int *ZI462 X int *ZI463 X EXP *ZO467)
 2526 
ZR1071(int *ZI460, int *ZI462, int *ZI463, EXP *ZO467)
2560 
{
 2527 
{
2561 
    EXP ZI467;
 2528 
    EXP ZI467;
2562 
 
 2529 
 
2563 
    if ((CURRENT_TERMINAL) == 354) {
 2530 
    if ((CURRENT_TERMINAL) == 354) {
2564 
	return;
 2531 
	return;
Line 2667... Line 2634...
2667 
  ZL0:;
 2634 
  ZL0:;
2668 
    *ZO467 = ZI467;
 2635 
    *ZO467 = ZI467;
2669 
}
 2636 
}
2670 
 
 2637 
 
2671 
void
 2638 
void
2672 
ZR680 PROTO_N ((ZI404))
 - 
 
2673 
  PROTO_T (IDENTIFIER ZI404)
 2639 
ZR680(IDENTIFIER ZI404)
2674 
{
 2640 
{
2675 
    if ((CURRENT_TERMINAL) == 354) {
 2641 
    if ((CURRENT_TERMINAL) == 354) {
2676 
	return;
 2642 
	return;
2677 
    }
 2643 
    }
2678 
  ZL2_680:;
 2644 
  ZL2_680:;
Line 2727... Line 2693...
2727 
    SAVE_LEXER (354);
 2693 
    SAVE_LEXER (354);
2728 
    return;
 2694 
    return;
2729 
}
 2695 
}
2730 
 
 2696 
 
2731 
void
 2697 
void
2732 
ZR1072 PROTO_N ((ZI547, ZO423))
 - 
 
2733 
  PROTO_T (IDENTIFIER *ZI547 X SID_LIST_EXP *ZO423)
 2698 
ZR1072(IDENTIFIER *ZI547, SID_LIST_EXP *ZO423)
2734 
{
 2699 
{
2735 
    SID_LIST_EXP ZI423;
 2700 
    SID_LIST_EXP ZI423;
2736 
 
 2701 
 
2737 
    switch (CURRENT_TERMINAL) {
 2702 
    switch (CURRENT_TERMINAL) {
2738 
      case 1: case 17: case 18: case 19: case 20:
 2703 
      case 1: case 17: case 18: case 19: case 20:
Line 2766... Line 2731...
2766 
  ZL0:;
 2731 
  ZL0:;
2767 
    *ZO423 = ZI423;
 2732 
    *ZO423 = ZI423;
2768 
}
 2733 
}
2769 
 
 2734 
 
2770 
void
 2735 
void
2771 
ZR945 PROTO_N ((ZI941, ZI942, ZI943, ZI944, ZO404))
 - 
 
2772 
  PROTO_T (BASE_TYPE *ZI941 X TYPE *ZI942 X CV_SPEC *ZI943 X DECL_SPEC *ZI944 X EXP *ZO404)
 2736 
ZR945(BASE_TYPE *ZI941, TYPE *ZI942, CV_SPEC *ZI943, DECL_SPEC *ZI944, EXP *ZO404)
2773 
{
 2737 
{
2774 
    EXP ZI404;
 2738 
    EXP ZI404;
2775 
 
 2739 
 
2776 
    switch (CURRENT_TERMINAL) {
 2740 
    switch (CURRENT_TERMINAL) {
2777 
      case 77:
 2741 
      case 77:
Line 2828... Line 2792...
2828 
  ZL0:;
 2792 
  ZL0:;
2829 
    *ZO404 = ZI404;
 2793 
    *ZO404 = ZI404;
2830 
}
 2794 
}
2831 
 
 2795 
 
2832 
void
 2796 
void
2833 
ZR598 PROTO_N ((ZO404))
 - 
 
2834 
  PROTO_T (EXP *ZO404)
 2797 
ZR598(EXP *ZO404)
2835 
{
 2798 
{
2836 
    EXP ZI404;
 2799 
    EXP ZI404;
2837 
 
 2800 
 
2838 
    if ((CURRENT_TERMINAL) == 354) {
 2801 
    if ((CURRENT_TERMINAL) == 354) {
2839 
	return;
 2802 
	return;
Line 2852... Line 2815...
2852 
  ZL0:;
 2815 
  ZL0:;
2853 
    *ZO404 = ZI404;
 2816 
    *ZO404 = ZI404;
2854 
}
 2817 
}
2855 
 
 2818 
 
2856 
void
 2819 
void
2857 
ZR835 PROTO_N ((ZI448, ZI568, ZO416, ZO395))
 - 
 
2858 
  PROTO_T (OFFSET ZI448 X TYPE ZI568 X OFFSET *ZO416 X TYPE *ZO395)
 2820 
ZR835(OFFSET ZI448, TYPE ZI568, OFFSET *ZO416, TYPE *ZO395)
2859 
{
 2821 
{
2860 
    OFFSET ZI416;
 2822 
    OFFSET ZI416;
2861 
    TYPE ZI395;
 2823 
    TYPE ZI395;
2862 
 
 2824 
 
2863 
    switch (CURRENT_TERMINAL) {
 2825 
    switch (CURRENT_TERMINAL) {
Line 2922... Line 2884...
2922 
    *ZO416 = ZI416;
 2884 
    *ZO416 = ZI416;
2923 
    *ZO395 = ZI395;
 2885 
    *ZO395 = ZI395;
2924 
}
 2886 
}
2925 
 
 2887 
 
2926 
void
 2888 
void
2927 
ZR819 PROTO_N ((ZI658, ZI395, ZI605, ZI568, ZI399))
 - 
 
2928 
  PROTO_T (BASE_TYPE *ZI658 X TYPE *ZI395 X DECL_SPEC *ZI605 X TYPE *ZI568 X IDENTIFIER *ZI399)
 2889 
ZR819(BASE_TYPE *ZI658, TYPE *ZI395, DECL_SPEC *ZI605, TYPE *ZI568, IDENTIFIER *ZI399)
2929 
{
 2890 
{
2930 
    if ((CURRENT_TERMINAL) == 354) {
 2891 
    if ((CURRENT_TERMINAL) == 354) {
2931 
	return;
 2892 
	return;
2932 
    }
 2893 
    }
2933 
    {
 2894 
    {
Line 3044... Line 3005...
3044 
    return;
 3005 
    return;
3045 
  ZL0:;
 3006 
  ZL0:;
3046 
}
 3007 
}
3047 
 
 3008 
 
3048 
void
 3009 
void
3049 
ZR458 PROTO_N ((ZO404))
 - 
 
3050 
  PROTO_T (EXP *ZO404)
 3010 
ZR458(EXP *ZO404)
3051 
{
 3011 
{
3052 
    EXP ZI404;
 3012 
    EXP ZI404;
3053 
 
 3013 
 
3054 
    switch (CURRENT_TERMINAL) {
 3014 
    switch (CURRENT_TERMINAL) {
3055 
      case 170:
 3015 
      case 170:
Line 3224... Line 3184...
3224 
  ZL0:;
 3184 
  ZL0:;
3225 
    *ZO404 = ZI404;
 3185 
    *ZO404 = ZI404;
3226 
}
 3186 
}
3227 
 
 3187 
 
3228 
void
 3188 
void
3229 
ZR485 PROTO_N ((ZO905))
 - 
 
3230 
  PROTO_T (EXP *ZO905)
 3189 
ZR485(EXP *ZO905)
3231 
{
 3190 
{
3232 
    EXP ZI905;
 3191 
    EXP ZI905;
3233 
 
 3192 
 
3234 
    if ((CURRENT_TERMINAL) == 354) {
 3193 
    if ((CURRENT_TERMINAL) == 354) {
3235 
	return;
 3194 
	return;
Line 3251... Line 3210...
3251 
  ZL0:;
 3210 
  ZL0:;
3252 
    *ZO905 = ZI905;
 3211 
    *ZO905 = ZI905;
3253 
}
 3212 
}
3254 
 
 3213 
 
3255 
void
 3214 
void
3256 
ZR601 PROTO_N ((ZO404))
 - 
 
3257 
  PROTO_T (EXP *ZO404)
 3215 
ZR601(EXP *ZO404)
3258 
{
 3216 
{
3259 
    EXP ZI404;
 3217 
    EXP ZI404;
3260 
 
 3218 
 
3261 
    switch (CURRENT_TERMINAL) {
 3219 
    switch (CURRENT_TERMINAL) {
3262 
      case 1: case 17: case 18: case 19: case 20:
 3220 
      case 1: case 17: case 18: case 19: case 20:
Line 3301... Line 3259...
3301 
  ZL0:;
 3259 
  ZL0:;
3302 
    *ZO404 = ZI404;
 3260 
    *ZO404 = ZI404;
3303 
}
 3261 
}
3304 
 
 3262 
 
3305 
void
 3263 
void
3306 
ZR1075 PROTO_N ((ZI1073, ZO404))
 - 
 
3307 
  PROTO_T (EXP *ZI1073 X EXP *ZO404)
 3264 
ZR1075(EXP *ZI1073, EXP *ZO404)
3308 
{
 3265 
{
3309 
    EXP ZI404;
 3266 
    EXP ZI404;
3310 
 
 3267 
 
3311 
    switch (CURRENT_TERMINAL) {
 3268 
    switch (CURRENT_TERMINAL) {
3312 
      case 1: case 17: case 18: case 19: case 20:
 3269 
      case 1: case 17: case 18: case 19: case 20:
Line 3348... Line 3305...
3348 
  ZL0:;
 3305 
  ZL0:;
3349 
    *ZO404 = ZI404;
 3306 
    *ZO404 = ZI404;
3350 
}
 3307 
}
3351 
 
 3308 
 
3352 
void
 3309 
void
3353 
ZR493 PROTO_N ((ZO893))
 - 
 
3354 
  PROTO_T (EXP *ZO893)
 3310 
ZR493(EXP *ZO893)
3355 
{
 3311 
{
3356 
    EXP ZI893;
 3312 
    EXP ZI893;
3357 
 
 3313 
 
3358 
    if ((CURRENT_TERMINAL) == 354) {
 3314 
    if ((CURRENT_TERMINAL) == 354) {
3359 
	return;
 3315 
	return;
Line 3375... Line 3331...
3375 
  ZL0:;
 3331 
  ZL0:;
3376 
    *ZO893 = ZI893;
 3332 
    *ZO893 = ZI893;
3377 
}
 3333 
}
3378 
 
 3334 
 
3379 
void
 3335 
void
3380 
parse_exp PROTO_N ((ZO404))
 3336 
parse_exp(EXP *ZO404)
3381 
  PROTO_T (EXP *ZO404)
 - 
 
3382 
{
 3337 
{
3383 
    EXP ZI404;
 3338 
    EXP ZI404;
3384 
 
 3339 
 
3385 
    if ((CURRENT_TERMINAL) == 354) {
 3340 
    if ((CURRENT_TERMINAL) == 354) {
3386 
	return;
 3341 
	return;
Line 3410... Line 3365...
3410 
  ZL0:;
 3365 
  ZL0:;
3411 
    *ZO404 = ZI404;
 3366 
    *ZO404 = ZI404;
3412 
}
 3367 
}
3413 
 
 3368 
 
3414 
void
 3369 
void
3415 
ZR686 PROTO_N ((ZO658, ZO395, ZO630))
 - 
 
3416 
  PROTO_T (BASE_TYPE *ZO658 X TYPE *ZO395 X CV_SPEC *ZO630)
 3370 
ZR686(BASE_TYPE *ZO658, TYPE *ZO395, CV_SPEC *ZO630)
3417 
{
 3371 
{
3418 
    BASE_TYPE ZI658;
 3372 
    BASE_TYPE ZI658;
3419 
    TYPE ZI395;
 3373 
    TYPE ZI395;
3420 
    CV_SPEC ZI630;
 3374 
    CV_SPEC ZI630;
3421 
 
 3375 
 
Line 3465... Line 3419...
3465 
    *ZO395 = ZI395;
 3419 
    *ZO395 = ZI395;
3466 
    *ZO630 = ZI630;
 3420 
    *ZO630 = ZI630;
3467 
}
 3421 
}
3468 
 
 3422 
 
3469 
void
 3423 
void
3470 
ZR950 PROTO_N ((ZI948, ZO404))
 - 
 
3471 
  PROTO_T (EXP *ZI948 X EXP *ZO404)
 3424 
ZR950(EXP *ZI948, EXP *ZO404)
3472 
{
 3425 
{
3473 
    EXP ZI404;
 3426 
    EXP ZI404;
3474 
 
 3427 
 
3475 
    switch (CURRENT_TERMINAL) {
 3428 
    switch (CURRENT_TERMINAL) {
3476 
      case 72:
 3429 
      case 72:
Line 3516... Line 3469...
3516 
  ZL0:;
 3469 
  ZL0:;
3517 
    *ZO404 = ZI404;
 3470 
    *ZO404 = ZI404;
3518 
}
 3471 
}
3519 
 
 3472 
 
3520 
void
 3473 
void
3521 
ZR1078 PROTO_N ((ZO404))
 - 
 
3522 
  PROTO_T (EXP *ZO404)
 3474 
ZR1078(EXP *ZO404)
3523 
{
 3475 
{
3524 
    EXP ZI404;
 3476 
    EXP ZI404;
3525 
 
 3477 
 
3526 
    switch (CURRENT_TERMINAL) {
 3478 
    switch (CURRENT_TERMINAL) {
3527 
      case 297:
 3479 
      case 297:
Line 3580... Line 3532...
3580 
  ZL0:;
 3532 
  ZL0:;
3581 
    *ZO404 = ZI404;
 3533 
    *ZO404 = ZI404;
3582 
}
 3534 
}
3583 
 
 3535 
 
3584 
void
 3536 
void
3585 
ZR1079 PROTO_N ((ZO404))
 - 
 
3586 
  PROTO_T (EXP *ZO404)
 3537 
ZR1079(EXP *ZO404)
3587 
{
 3538 
{
3588 
    EXP ZI404;
 3539 
    EXP ZI404;
3589 
 
 3540 
 
3590 
    switch (CURRENT_TERMINAL) {
 3541 
    switch (CURRENT_TERMINAL) {
3591 
      case 96:
 3542 
      case 96:
Line 3670... Line 3621...
3670 
  ZL0:;
 3621 
  ZL0:;
3671 
    *ZO404 = ZI404;
 3622 
    *ZO404 = ZI404;
3672 
}
 3623 
}
3673 
 
 3624 
 
3674 
void
 3625 
void
3675 
ZR699 PROTO_N ((ZI688, ZI689, ZI690, ZO658, ZO395, ZO630))
 - 
 
3676 
  PROTO_T (BASE_TYPE *ZI688 X TYPE *ZI689 X CV_SPEC *ZI690 X BASE_TYPE *ZO658 X TYPE *ZO395 X CV_SPEC *ZO630)
 3626 
ZR699(BASE_TYPE *ZI688, TYPE *ZI689, CV_SPEC *ZI690, BASE_TYPE *ZO658, TYPE *ZO395, CV_SPEC *ZO630)
3677 
{
 3627 
{
3678 
    BASE_TYPE ZI658;
 3628 
    BASE_TYPE ZI658;
3679 
    TYPE ZI395;
 3629 
    TYPE ZI395;
3680 
    CV_SPEC ZI630;
 3630 
    CV_SPEC ZI630;
3681 
 
 3631 
 
Line 3762... Line 3712...
3762 
    *ZO395 = ZI395;
 3712 
    *ZO395 = ZI395;
3763 
    *ZO630 = ZI630;
 3713 
    *ZO630 = ZI630;
3764 
}
 3714 
}
3765 
 
 3715 
 
3766 
void
 3716 
void
3767 
parse_stmt PROTO_N ((ZO404))
 3717 
parse_stmt(EXP *ZO404)
3768 
  PROTO_T (EXP *ZO404)
 - 
 
3769 
{
 3718 
{
3770 
    EXP ZI404;
 3719 
    EXP ZI404;
3771 
 
 3720 
 
3772 
    if ((CURRENT_TERMINAL) == 354) {
 3721 
    if ((CURRENT_TERMINAL) == 354) {
3773 
	return;
 3722 
	return;
Line 3797... Line 3746...
3797 
  ZL0:;
 3746 
  ZL0:;
3798 
    *ZO404 = ZI404;
 3747 
    *ZO404 = ZI404;
3799 
}
 3748 
}
3800 
 
 3749 
 
3801 
void
 3750 
void
3802 
ZR825 PROTO_N ((ZI420, ZI423))
 - 
 
3803 
  PROTO_T (TYPE ZI420 X BASE_TYPE ZI423)
 3751 
ZR825(TYPE ZI420, BASE_TYPE ZI423)
3804 
{
 3752 
{
3805 
    if ((CURRENT_TERMINAL) == 354) {
 3753 
    if ((CURRENT_TERMINAL) == 354) {
3806 
	return;
 3754 
	return;
3807 
    }
 3755 
    }
3808 
  ZL2_825:;
 3756 
  ZL2_825:;
Line 3829... Line 3777...
3829 
    SAVE_LEXER (354);
 3777 
    SAVE_LEXER (354);
3830 
    return;
 3778 
    return;
3831 
}
 3779 
}
3832 
 
 3780 
 
3833 
void
 3781 
void
3834 
ZR1081 PROTO_N ((ZI399, ZO404))
 - 
 
3835 
  PROTO_T (IDENTIFIER *ZI399 X EXP *ZO404)
 3782 
ZR1081(IDENTIFIER *ZI399, EXP *ZO404)
3836 
{
 3783 
{
3837 
    EXP ZI404;
 3784 
    EXP ZI404;
3838 
 
 3785 
 
3839 
    switch (CURRENT_TERMINAL) {
 3786 
    switch (CURRENT_TERMINAL) {
3840 
      case 33: case 34: case 35: case 36: case 42:
 3787 
      case 33: case 34: case 35: case 36: case 42:
Line 3929... Line 3876...
3929 
  ZL0:;
 3876 
  ZL0:;
3930 
    *ZO404 = ZI404;
 3877 
    *ZO404 = ZI404;
3931 
}
 3878 
}
3932 
 
 3879 
 
3933 
void
 3880 
void
3934 
ZR444 PROTO_N ((ZO395, ZO472))
 - 
 
3935 
  PROTO_T (TYPE *ZO395 X int *ZO472)
 3881 
ZR444(TYPE *ZO395, int *ZO472)
3936 
{
 3882 
{
3937 
    TYPE ZI395;
 3883 
    TYPE ZI395;
3938 
    int ZI472;
 3884 
    int ZI472;
3939 
 
 3885 
 
3940 
    if ((CURRENT_TERMINAL) == 354) {
 3886 
    if ((CURRENT_TERMINAL) == 354) {
Line 3983... Line 3929...
3983 
    *ZO395 = ZI395;
 3929 
    *ZO395 = ZI395;
3984 
    *ZO472 = ZI472;
 3930 
    *ZO472 = ZI472;
3985 
}
 3931 
}
3986 
 
 3932 
 
3987 
void
 3933 
void
3988 
ZR510 PROTO_N ((ZO404))
 - 
 
3989 
  PROTO_T (EXP *ZO404)
 3934 
ZR510(EXP *ZO404)
3990 
{
 3935 
{
3991 
    EXP ZI404;
 3936 
    EXP ZI404;
3992 
 
 3937 
 
3993 
    switch (CURRENT_TERMINAL) {
 3938 
    switch (CURRENT_TERMINAL) {
3994 
      case 297:
 3939 
      case 297:
Line 4063... Line 4008...
4063 
  ZL0:;
 4008 
  ZL0:;
4064 
    *ZO404 = ZI404;
 4009 
    *ZO404 = ZI404;
4065 
}
 4010 
}
4066 
 
 4011 
 
4067 
void
 4012 
void
4068 
ZR1082 PROTO_N ((ZI399, ZO404))
 - 
 
4069 
  PROTO_T (IDENTIFIER *ZI399 X EXP *ZO404)
 4013 
ZR1082(IDENTIFIER *ZI399, EXP *ZO404)
4070 
{
 4014 
{
4071 
    EXP ZI404;
 4015 
    EXP ZI404;
4072 
 
 4016 
 
4073 
    switch (CURRENT_TERMINAL) {
 4017 
    switch (CURRENT_TERMINAL) {
4074 
      default:
 4018 
      default:
Line 4120... Line 4064...
4120 
  ZL0:;
 4064 
  ZL0:;
4121 
    *ZO404 = ZI404;
 4065 
    *ZO404 = ZI404;
4122 
}
 4066 
}
4123 
 
 4067 
 
4124 
void
 4068 
void
4125 
ZR804 PROTO_Z ()
 4069 
ZR804(void)
4126 
{
 4070 
{
4127 
    if ((CURRENT_TERMINAL) == 354) {
 4071 
    if ((CURRENT_TERMINAL) == 354) {
4128 
	return;
 4072 
	return;
4129 
    }
 4073 
    }
4130 
    {
 4074 
    {
Line 4171... Line 4115...
4171 
    SAVE_LEXER (354);
 4115 
    SAVE_LEXER (354);
4172 
    return;
 4116 
    return;
4173 
}
 4117 
}
4174 
 
 4118 
 
4175 
void
 4119 
void
4176 
ZR421 PROTO_N ((ZO420))
 - 
 
4177 
  PROTO_T (SID_LIST_EXP *ZO420)
 4120 
ZR421(SID_LIST_EXP *ZO420)
4178 
{
 4121 
{
4179 
    SID_LIST_EXP ZI420;
 4122 
    SID_LIST_EXP ZI420;
4180 
 
 4123 
 
4181 
    if ((CURRENT_TERMINAL) == 354) {
 4124 
    if ((CURRENT_TERMINAL) == 354) {
4182 
	return;
 4125 
	return;
Line 4203... Line 4146...
4203 
  ZL0:;
 4146 
  ZL0:;
4204 
    *ZO420 = ZI420;
 4147 
    *ZO420 = ZI420;
4205 
}
 4148 
}
4206 
 
 4149 
 
4207 
void
 4150 
void
4208 
ZR419 PROTO_N ((ZO404))
 - 
 
4209 
  PROTO_T (EXP *ZO404)
 4151 
ZR419(EXP *ZO404)
4210 
{
 4152 
{
4211 
    EXP ZI404;
 4153 
    EXP ZI404;
4212 
 
 4154 
 
4213 
    switch (CURRENT_TERMINAL) {
 4155 
    switch (CURRENT_TERMINAL) {
4214 
      case 170:
 4156 
      case 170:
Line 4544... Line 4486...
4544 
  ZL0:;
 4486 
  ZL0:;
4545 
    *ZO404 = ZI404;
 4487 
    *ZO404 = ZI404;
4546 
}
 4488 
}
4547 
 
 4489 
 
4548 
void
 4490 
void
4549 
ZR424 PROTO_N ((ZO420))
 - 
 
4550 
  PROTO_T (SID_LIST_EXP *ZO420)
 4491 
ZR424(SID_LIST_EXP *ZO420)
4551 
{
 4492 
{
4552 
    SID_LIST_EXP ZI420;
 4493 
    SID_LIST_EXP ZI420;
4553 
 
 4494 
 
4554 
    switch (CURRENT_TERMINAL) {
 4495 
    switch (CURRENT_TERMINAL) {
4555 
      case 1: case 17: case 18: case 19: case 20:
 4496 
      case 1: case 17: case 18: case 19: case 20:
Line 4583... Line 4524...
4583 
  ZL0:;
 4524 
  ZL0:;
4584 
    *ZO420 = ZI420;
 4525 
    *ZO420 = ZI420;
4585 
}
 4526 
}
4586 
 
 4527 
 
4587 
void
 4528 
void
4588 
ZR499 PROTO_N ((ZO881))
 - 
 
4589 
  PROTO_T (EXP *ZO881)
 4529 
ZR499(EXP *ZO881)
4590 
{
 4530 
{
4591 
    EXP ZI881;
 4531 
    EXP ZI881;
4592 
 
 4532 
 
4593 
    if ((CURRENT_TERMINAL) == 354) {
 4533 
    if ((CURRENT_TERMINAL) == 354) {
4594 
	return;
 4534 
	return;
Line 4610... Line 4550...
4610 
  ZL0:;
 4550 
  ZL0:;
4611 
    *ZO881 = ZI881;
 4551 
    *ZO881 = ZI881;
4612 
}
 4552 
}
4613 
 
 4553 
 
4614 
void
 4554 
void
4615 
ZR614 PROTO_N ((ZO404))
 - 
 
4616 
  PROTO_T (EXP *ZO404)
 4555 
ZR614(EXP *ZO404)
4617 
{
 4556 
{
4618 
    EXP ZI404;
 4557 
    EXP ZI404;
4619 
 
 4558 
 
4620 
    switch (CURRENT_TERMINAL) {
 4559 
    switch (CURRENT_TERMINAL) {
4621 
      case 95:
 4560 
      case 95:
Line 4765... Line 4704...
4765 
  ZL0:;
 4704 
  ZL0:;
4766 
    *ZO404 = ZI404;
 4705 
    *ZO404 = ZI404;
4767 
}
 4706 
}
4768 
 
 4707 
 
4769 
void
 4708 
void
4770 
ZR963 PROTO_N ((ZO404))
 - 
 
4771 
  PROTO_T (EXP *ZO404)
 4709 
ZR963(EXP *ZO404)
4772 
{
 4710 
{
4773 
    EXP ZI404;
 4711 
    EXP ZI404;
4774 
 
 4712 
 
4775 
    if ((CURRENT_TERMINAL) == 354) {
 4713 
    if ((CURRENT_TERMINAL) == 354) {
4776 
	return;
 4714 
	return;
Line 4860... Line 4798...
4860 
  ZL0:;
 4798 
  ZL0:;
4861 
    *ZO404 = ZI404;
 4799 
    *ZO404 = ZI404;
4862 
}
 4800 
}
4863 
 
 4801 
 
4864 
void
 4802 
void
4865 
ZR567 PROTO_N ((ZO930, ZO931, ZO932))
 - 
 
4866 
  PROTO_T (EXP *ZO930 X EXP *ZO931 X int *ZO932)
 4803 
ZR567(EXP *ZO930, EXP *ZO931, int *ZO932)
4867 
{
 4804 
{
4868 
    EXP ZI930;
 4805 
    EXP ZI930;
4869 
    EXP ZI931;
 4806 
    EXP ZI931;
4870 
    int ZI932;
 4807 
    int ZI932;
4871 
 
 4808 
 
Line 4935... Line 4872...
4935 
    *ZO931 = ZI931;
 4872 
    *ZO931 = ZI931;
4936 
    *ZO932 = ZI932;
 4873 
    *ZO932 = ZI932;
4937 
}
 4874 
}
4938 
 
 4875 
 
4939 
void
 4876 
void
4940 
ZR632 PROTO_N ((ZO630))
 - 
 
4941 
  PROTO_T (CV_SPEC *ZO630)
 4877 
ZR632(CV_SPEC *ZO630)
4942 
{
 4878 
{
4943 
    CV_SPEC ZI630;
 4879 
    CV_SPEC ZI630;
4944 
 
 4880 
 
4945 
    if ((CURRENT_TERMINAL) == 354) {
 4881 
    if ((CURRENT_TERMINAL) == 354) {
4946 
	return;
 4882 
	return;
Line 4986... Line 4922...
4986 
  ZL0:;
 4922 
  ZL0:;
4987 
    *ZO630 = ZI630;
 4923 
    *ZO630 = ZI630;
4988 
}
 4924 
}
4989 
 
 4925 
 
4990 
void
 4926 
void
4991 
ZR552 PROTO_N ((ZO404))
 - 
 
4992 
  PROTO_T (EXP *ZO404)
 4927 
ZR552(EXP *ZO404)
4993 
{
 4928 
{
4994 
    EXP ZI404;
 4929 
    EXP ZI404;
4995 
 
 4930 
 
4996 
    if ((CURRENT_TERMINAL) == 354) {
 4931 
    if ((CURRENT_TERMINAL) == 354) {
4997 
	return;
 4932 
	return;