/[bison]/bison/src/scan-gram.c
ViewVC logotype

Diff of /bison/src/scan-gram.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.21 by akim, Sun Jun 30 17:35:06 2002 UTC revision 1.22 by akim, Tue Jul 2 11:39:04 2002 UTC
# Line 710  static yyconst short int yy_rule_linenum Line 710  static yyconst short int yy_rule_linenum
710        142,  143,  144,  145,  146,  147,  148,  149,  150,  151,        142,  143,  144,  145,  146,  147,  148,  149,  150,  151,
711        152,  153,  155,  156,  157,  158,  160,  161,  162,  167,        152,  153,  155,  156,  157,  158,  160,  161,  162,  167,
712        170,  173,  176,  177,  180,  183,  186,  194,  200,  216,        170,  173,  176,  177,  180,  183,  186,  194,  200,  216,
713        217,  228,  240,  241,  242,  259,  268,  270,  290,  304,        217,  228,  240,  241,  242,  259,  268,  270,  290,  305,
714        306,  326,  338,  342,  343,  344,  345,  346,  347,  348,        307,  327,  339,  343,  344,  345,  346,  347,  348,  349,
715        349,  350,  356,  367,  373,  374,  376,  378,  396,  402,        350,  351,  357,  368,  374,  375,  377,  379,  397,  403,
716        403,  405,  407,  425,  428,  431,  432,  435,  446,  457,        404,  406,  408,  426,  429,  432,  433,  436,  447,  458,
717        459,  461,  464,  465,  468,  488,  495,  496,  497,  517        460,  462,  465,  466,  469,  489,  496,  497,  498,  518
718    
719      } ;      } ;
720    
# Line 1497  YY_RULE_SETUP Line 1497  YY_RULE_SETUP
1497        YY_OBS_FINISH;        YY_OBS_FINISH;
1498        yylval->symbol = symbol_get (last_string, *yylloc);        yylval->symbol = symbol_get (last_string, *yylloc);
1499        symbol_class_set (yylval->symbol, token_sym, *yylloc);        symbol_class_set (yylval->symbol, token_sym, *yylloc);
1500        symbol_user_token_number_set (yylval->symbol, last_string[1], *yylloc);        symbol_user_token_number_set (yylval->symbol,
1501                                        (unsigned char) last_string[1], *yylloc);
1502        YY_OBS_FREE;        YY_OBS_FREE;
1503        yy_pop_state ();        yy_pop_state ();
1504        return ID;        return ID;
# Line 1506  YY_RULE_SETUP Line 1507  YY_RULE_SETUP
1507          YY_BREAK          YY_BREAK
1508  case 60:  case 60:
1509  YY_RULE_SETUP  YY_RULE_SETUP
1510  #line 304 "scan-gram.l"  #line 305 "scan-gram.l"
1511  YY_OBS_GROW;  YY_OBS_GROW;
1512          YY_BREAK          YY_BREAK
1513  case 61:  case 61:
1514  YY_RULE_SETUP  YY_RULE_SETUP
1515  #line 306 "scan-gram.l"  #line 307 "scan-gram.l"
1516  obstack_1grow (&string_obstack, '\n'); YY_LINES;  obstack_1grow (&string_obstack, '\n'); YY_LINES;
1517          YY_BREAK          YY_BREAK
1518  case YY_STATE_EOF(SC_ESCAPED_CHARACTER):  case YY_STATE_EOF(SC_ESCAPED_CHARACTER):
1519  #line 308 "scan-gram.l"  #line 309 "scan-gram.l"
1520  {  {
1521      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1522      fprintf (stderr, ": unexpected end of file in a character\n");      fprintf (stderr, ": unexpected end of file in a character\n");
# Line 1534  case YY_STATE_EOF(SC_ESCAPED_CHARACTER): Line 1535  case YY_STATE_EOF(SC_ESCAPED_CHARACTER):
1535    
1536  case 62:  case 62:
1537  YY_RULE_SETUP  YY_RULE_SETUP
1538  #line 326 "scan-gram.l"  #line 327 "scan-gram.l"
1539  {  {
1540      long c = strtol (yytext + 1, 0, 8);      long c = strtol (yytext + 1, 0, 8);
1541      if (c > 255)      if (c > 255)
# Line 1549  YY_RULE_SETUP Line 1550  YY_RULE_SETUP
1550          YY_BREAK          YY_BREAK
1551  case 63:  case 63:
1552  YY_RULE_SETUP  YY_RULE_SETUP
1553  #line 338 "scan-gram.l"  #line 339 "scan-gram.l"
1554  {  {
1555      obstack_1grow (&string_obstack, strtol (yytext + 2, 0, 16));      obstack_1grow (&string_obstack, strtol (yytext + 2, 0, 16));
1556    }    }
1557          YY_BREAK          YY_BREAK
1558  case 64:  case 64:
1559  YY_RULE_SETUP  YY_RULE_SETUP
1560  #line 342 "scan-gram.l"  #line 343 "scan-gram.l"
1561  obstack_1grow (&string_obstack, '\a');  obstack_1grow (&string_obstack, '\a');
1562          YY_BREAK          YY_BREAK
1563  case 65:  case 65:
1564  YY_RULE_SETUP  YY_RULE_SETUP
1565  #line 343 "scan-gram.l"  #line 344 "scan-gram.l"
1566  obstack_1grow (&string_obstack, '\b');  obstack_1grow (&string_obstack, '\b');
1567          YY_BREAK          YY_BREAK
1568  case 66:  case 66:
1569  YY_RULE_SETUP  YY_RULE_SETUP
1570  #line 344 "scan-gram.l"  #line 345 "scan-gram.l"
1571  obstack_1grow (&string_obstack, '\f');  obstack_1grow (&string_obstack, '\f');
1572          YY_BREAK          YY_BREAK
1573  case 67:  case 67:
1574  YY_RULE_SETUP  YY_RULE_SETUP
1575  #line 345 "scan-gram.l"  #line 346 "scan-gram.l"
1576  obstack_1grow (&string_obstack, '\n');  obstack_1grow (&string_obstack, '\n');
1577          YY_BREAK          YY_BREAK
1578  case 68:  case 68:
1579  YY_RULE_SETUP  YY_RULE_SETUP
1580  #line 346 "scan-gram.l"  #line 347 "scan-gram.l"
1581  obstack_1grow (&string_obstack, '\r');  obstack_1grow (&string_obstack, '\r');
1582          YY_BREAK          YY_BREAK
1583  case 69:  case 69:
1584  YY_RULE_SETUP  YY_RULE_SETUP
1585  #line 347 "scan-gram.l"  #line 348 "scan-gram.l"
1586  obstack_1grow (&string_obstack, '\t');  obstack_1grow (&string_obstack, '\t');
1587          YY_BREAK          YY_BREAK
1588  case 70:  case 70:
1589  YY_RULE_SETUP  YY_RULE_SETUP
1590  #line 348 "scan-gram.l"  #line 349 "scan-gram.l"
1591  obstack_1grow (&string_obstack, '\v');  obstack_1grow (&string_obstack, '\v');
1592          YY_BREAK          YY_BREAK
1593  case 71:  case 71:
1594  YY_RULE_SETUP  YY_RULE_SETUP
1595  #line 349 "scan-gram.l"  #line 350 "scan-gram.l"
1596  obstack_1grow (&string_obstack, yytext[1]);  obstack_1grow (&string_obstack, yytext[1]);
1597          YY_BREAK          YY_BREAK
1598  case 72:  case 72:
1599  YY_RULE_SETUP  YY_RULE_SETUP
1600  #line 350 "scan-gram.l"  #line 351 "scan-gram.l"
1601  {  {
1602      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1603      fprintf (stderr, ": unrecognized escape: %s\n", quote (yytext));      fprintf (stderr, ": unrecognized escape: %s\n", quote (yytext));
# Line 1606  YY_RULE_SETUP Line 1607  YY_RULE_SETUP
1607  /* FLex wants this rule, in case of a `\<<EOF>>'. */  /* FLex wants this rule, in case of a `\<<EOF>>'. */
1608  case 73:  case 73:
1609  YY_RULE_SETUP  YY_RULE_SETUP
1610  #line 356 "scan-gram.l"  #line 357 "scan-gram.l"
1611  YY_OBS_GROW;  YY_OBS_GROW;
1612          YY_BREAK          YY_BREAK
1613    
# Line 1618  YY_OBS_GROW; Line 1619  YY_OBS_GROW;
1619    
1620  case 74:  case 74:
1621  YY_RULE_SETUP  YY_RULE_SETUP
1622  #line 367 "scan-gram.l"  #line 368 "scan-gram.l"
1623  {  {
1624      YY_OBS_GROW;      YY_OBS_GROW;
1625      assert (yy_top_state () != INITIAL);      assert (yy_top_state () != INITIAL);
# Line 1627  YY_RULE_SETUP Line 1628  YY_RULE_SETUP
1628          YY_BREAK          YY_BREAK
1629  case 75:  case 75:
1630  YY_RULE_SETUP  YY_RULE_SETUP
1631  #line 373 "scan-gram.l"  #line 374 "scan-gram.l"
1632  YY_OBS_GROW;  YY_OBS_GROW;
1633          YY_BREAK          YY_BREAK
1634  case 76:  case 76:
1635  YY_RULE_SETUP  YY_RULE_SETUP
1636  #line 374 "scan-gram.l"  #line 375 "scan-gram.l"
1637  YY_OBS_GROW;  YY_OBS_GROW;
1638          YY_BREAK          YY_BREAK
1639  /* FLex wants this rule, in case of a `\<<EOF>>'. */  /* FLex wants this rule, in case of a `\<<EOF>>'. */
1640  case 77:  case 77:
1641  YY_RULE_SETUP  YY_RULE_SETUP
1642  #line 376 "scan-gram.l"  #line 377 "scan-gram.l"
1643  YY_OBS_GROW;  YY_OBS_GROW;
1644          YY_BREAK          YY_BREAK
1645  case 78:  case 78:
1646  YY_RULE_SETUP  YY_RULE_SETUP
1647  #line 378 "scan-gram.l"  #line 379 "scan-gram.l"
1648  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1649          YY_BREAK          YY_BREAK
1650  case YY_STATE_EOF(SC_CHARACTER):  case YY_STATE_EOF(SC_CHARACTER):
1651  #line 380 "scan-gram.l"  #line 381 "scan-gram.l"
1652  {  {
1653      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1654      fprintf (stderr, ": unexpected end of file in a character\n");      fprintf (stderr, ": unexpected end of file in a character\n");
# Line 1664  case YY_STATE_EOF(SC_CHARACTER): Line 1665  case YY_STATE_EOF(SC_CHARACTER):
1665    
1666  case 79:  case 79:
1667  YY_RULE_SETUP  YY_RULE_SETUP
1668  #line 396 "scan-gram.l"  #line 397 "scan-gram.l"
1669  {  {
1670      assert (yy_top_state () != INITIAL);      assert (yy_top_state () != INITIAL);
1671      YY_OBS_GROW;      YY_OBS_GROW;
# Line 1673  YY_RULE_SETUP Line 1674  YY_RULE_SETUP
1674          YY_BREAK          YY_BREAK
1675  case 80:  case 80:
1676  YY_RULE_SETUP  YY_RULE_SETUP
1677  #line 402 "scan-gram.l"  #line 403 "scan-gram.l"
1678  YY_OBS_GROW;  YY_OBS_GROW;
1679          YY_BREAK          YY_BREAK
1680  case 81:  case 81:
1681  YY_RULE_SETUP  YY_RULE_SETUP
1682  #line 403 "scan-gram.l"  #line 404 "scan-gram.l"
1683  YY_OBS_GROW;  YY_OBS_GROW;
1684          YY_BREAK          YY_BREAK
1685  /* FLex wants this rule, in case of a `\<<EOF>>'. */  /* FLex wants this rule, in case of a `\<<EOF>>'. */
1686  case 82:  case 82:
1687  YY_RULE_SETUP  YY_RULE_SETUP
1688  #line 405 "scan-gram.l"  #line 406 "scan-gram.l"
1689  YY_OBS_GROW;  YY_OBS_GROW;
1690          YY_BREAK          YY_BREAK
1691  case 83:  case 83:
1692  YY_RULE_SETUP  YY_RULE_SETUP
1693  #line 407 "scan-gram.l"  #line 408 "scan-gram.l"
1694  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1695          YY_BREAK          YY_BREAK
1696  case YY_STATE_EOF(SC_STRING):  case YY_STATE_EOF(SC_STRING):
1697  #line 409 "scan-gram.l"  #line 410 "scan-gram.l"
1698  {  {
1699      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1700      fprintf (stderr, ": unexpected end of file in a string\n");      fprintf (stderr, ": unexpected end of file in a string\n");
# Line 1710  case YY_STATE_EOF(SC_STRING): Line 1711  case YY_STATE_EOF(SC_STRING):
1711  /* Characters.  We don't check there is only one.  */  /* Characters.  We don't check there is only one.  */
1712  case 84:  case 84:
1713  YY_RULE_SETUP  YY_RULE_SETUP
1714  #line 425 "scan-gram.l"  #line 426 "scan-gram.l"
1715  YY_OBS_GROW; yy_push_state (SC_CHARACTER);  YY_OBS_GROW; yy_push_state (SC_CHARACTER);
1716          YY_BREAK          YY_BREAK
1717  /* Strings. */  /* Strings. */
1718  case 85:  case 85:
1719  YY_RULE_SETUP  YY_RULE_SETUP
1720  #line 428 "scan-gram.l"  #line 429 "scan-gram.l"
1721  YY_OBS_GROW; yy_push_state (SC_STRING);  YY_OBS_GROW; yy_push_state (SC_STRING);
1722          YY_BREAK          YY_BREAK
1723  /* Comments. */  /* Comments. */
1724  case 86:  case 86:
1725  YY_RULE_SETUP  YY_RULE_SETUP
1726  #line 431 "scan-gram.l"  #line 432 "scan-gram.l"
1727  YY_OBS_GROW; yy_push_state (SC_COMMENT);  YY_OBS_GROW; yy_push_state (SC_COMMENT);
1728          YY_BREAK          YY_BREAK
1729  case 87:  case 87:
1730  YY_RULE_SETUP  YY_RULE_SETUP
1731  #line 432 "scan-gram.l"  #line 433 "scan-gram.l"
1732  YY_OBS_GROW;  YY_OBS_GROW;
1733          YY_BREAK          YY_BREAK
1734  /* Not comments. */  /* Not comments. */
1735  case 88:  case 88:
1736  YY_RULE_SETUP  YY_RULE_SETUP
1737  #line 435 "scan-gram.l"  #line 436 "scan-gram.l"
1738  YY_OBS_GROW;  YY_OBS_GROW;
1739          YY_BREAK          YY_BREAK
1740    
# Line 1745  YY_OBS_GROW; Line 1746  YY_OBS_GROW;
1746    
1747  case 89:  case 89:
1748  YY_RULE_SETUP  YY_RULE_SETUP
1749  #line 446 "scan-gram.l"  #line 447 "scan-gram.l"
1750  {  {
1751      YY_OBS_GROW;      YY_OBS_GROW;
1752      if (--braces_level == 0)      if (--braces_level == 0)
# Line 1759  YY_RULE_SETUP Line 1760  YY_RULE_SETUP
1760          YY_BREAK          YY_BREAK
1761  case 90:  case 90:
1762  YY_RULE_SETUP  YY_RULE_SETUP
1763  #line 457 "scan-gram.l"  #line 458 "scan-gram.l"
1764  YY_OBS_GROW; braces_level++;  YY_OBS_GROW; braces_level++;
1765          YY_BREAK          YY_BREAK
1766  case 91:  case 91:
1767  YY_RULE_SETUP  YY_RULE_SETUP
1768  #line 459 "scan-gram.l"  #line 460 "scan-gram.l"
1769  { handle_dollar (current_braced_code,  { handle_dollar (current_braced_code,
1770                                                     yytext, *yylloc); }                                                     yytext, *yylloc); }
1771          YY_BREAK          YY_BREAK
1772  case 92:  case 92:
1773  YY_RULE_SETUP  YY_RULE_SETUP
1774  #line 461 "scan-gram.l"  #line 462 "scan-gram.l"
1775  { handle_at (current_braced_code,  { handle_at (current_braced_code,
1776                                                 yytext, *yylloc); }                                                 yytext, *yylloc); }
1777          YY_BREAK          YY_BREAK
1778  case 93:  case 93:
1779  YY_RULE_SETUP  YY_RULE_SETUP
1780  #line 464 "scan-gram.l"  #line 465 "scan-gram.l"
1781  YY_OBS_GROW;  YY_OBS_GROW;
1782          YY_BREAK          YY_BREAK
1783  case 94:  case 94:
1784  YY_RULE_SETUP  YY_RULE_SETUP
1785  #line 465 "scan-gram.l"  #line 466 "scan-gram.l"
1786  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1787          YY_BREAK          YY_BREAK
1788  /* A lose $, or /, or etc. */  /* A lose $, or /, or etc. */
1789  case 95:  case 95:
1790  YY_RULE_SETUP  YY_RULE_SETUP
1791  #line 468 "scan-gram.l"  #line 469 "scan-gram.l"
1792  YY_OBS_GROW;  YY_OBS_GROW;
1793          YY_BREAK          YY_BREAK
1794  case YY_STATE_EOF(SC_BRACED_CODE):  case YY_STATE_EOF(SC_BRACED_CODE):
1795  #line 470 "scan-gram.l"  #line 471 "scan-gram.l"
1796  {  {
1797      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1798      fprintf (stderr, ": unexpected end of file in a braced code\n");      fprintf (stderr, ": unexpected end of file in a braced code\n");
# Line 1809  case YY_STATE_EOF(SC_BRACED_CODE): Line 1810  case YY_STATE_EOF(SC_BRACED_CODE):
1810    
1811  case 96:  case 96:
1812  YY_RULE_SETUP  YY_RULE_SETUP
1813  #line 488 "scan-gram.l"  #line 489 "scan-gram.l"
1814  {  {
1815      yy_pop_state ();      yy_pop_state ();
1816      YY_OBS_FINISH;      YY_OBS_FINISH;
# Line 1819  YY_RULE_SETUP Line 1820  YY_RULE_SETUP
1820          YY_BREAK          YY_BREAK
1821  case 97:  case 97:
1822  YY_RULE_SETUP  YY_RULE_SETUP
1823  #line 495 "scan-gram.l"  #line 496 "scan-gram.l"
1824  YY_OBS_GROW;  YY_OBS_GROW;
1825          YY_BREAK          YY_BREAK
1826  case 98:  case 98:
1827  YY_RULE_SETUP  YY_RULE_SETUP
1828  #line 496 "scan-gram.l"  #line 497 "scan-gram.l"
1829  YY_OBS_GROW;  YY_OBS_GROW;
1830          YY_BREAK          YY_BREAK
1831  case 99:  case 99:
1832  YY_RULE_SETUP  YY_RULE_SETUP
1833  #line 497 "scan-gram.l"  #line 498 "scan-gram.l"
1834  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1835          YY_BREAK          YY_BREAK
1836  case YY_STATE_EOF(SC_PROLOGUE):  case YY_STATE_EOF(SC_PROLOGUE):
1837  #line 499 "scan-gram.l"  #line 500 "scan-gram.l"
1838  {  {
1839      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1840      fprintf (stderr, ": unexpected end of file in a prologue\n");      fprintf (stderr, ": unexpected end of file in a prologue\n");
# Line 1852  case YY_STATE_EOF(SC_PROLOGUE): Line 1853  case YY_STATE_EOF(SC_PROLOGUE):
1853    
1854  case 100:  case 100:
1855  YY_RULE_SETUP  YY_RULE_SETUP
1856  #line 517 "scan-gram.l"  #line 518 "scan-gram.l"
1857  YY_OBS_GROW;  YY_OBS_GROW;
1858          YY_BREAK          YY_BREAK
1859  case YY_STATE_EOF(SC_EPILOGUE):  case YY_STATE_EOF(SC_EPILOGUE):
1860  #line 519 "scan-gram.l"  #line 520 "scan-gram.l"
1861  {  {
1862      yy_pop_state ();      yy_pop_state ();
1863      YY_OBS_FINISH;      YY_OBS_FINISH;
# Line 1867  case YY_STATE_EOF(SC_EPILOGUE): Line 1868  case YY_STATE_EOF(SC_EPILOGUE):
1868    
1869  case 101:  case 101:
1870  YY_RULE_SETUP  YY_RULE_SETUP
1871  #line 528 "scan-gram.l"  #line 529 "scan-gram.l"
1872  YY_FATAL_ERROR( "flex scanner jammed" );  YY_FATAL_ERROR( "flex scanner jammed" );
1873          YY_BREAK          YY_BREAK
1874  #line 1874 "lex.yy.c"  #line 1875 "lex.yy.c"
1875  case YY_STATE_EOF(INITIAL):  case YY_STATE_EOF(INITIAL):
1876          yyterminate();          yyterminate();
1877    
# Line 2760  int main() Line 2761  int main()
2761          return 0;          return 0;
2762          }          }
2763  #endif  #endif
2764  #line 528 "scan-gram.l"  #line 529 "scan-gram.l"
2765    
2766    
2767  /*------------------------------------------------------------------.  /*------------------------------------------------------------------.

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26