/[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.25 by akim, Tue Jul 9 15:54:39 2002 UTC revision 1.26 by akim, Tue Jul 9 16:24:57 2002 UTC
# Line 705  int yy_flex_debug = 1; Line 705  int yy_flex_debug = 1;
705    
706  static yyconst short int yy_rule_linenum[101] =  static yyconst short int yy_rule_linenum[101] =
707      {   0,      {   0,
708        121,  122,  123,  124,  125,  126,  127,  128,  129,  130,        122,  123,  124,  125,  126,  127,  128,  129,  130,  131,
709        131,  132,  133,  134,  135,  136,  137,  138,  139,  140,        132,  133,  134,  135,  136,  137,  138,  139,  140,  141,
710        141,  142,  143,  144,  145,  146,  147,  148,  149,  150,        142,  143,  144,  145,  146,  147,  148,  149,  150,  151,
711        151,  152,  154,  155,  156,  157,  159,  160,  161,  166,        152,  153,  155,  156,  157,  158,  160,  161,  162,  167,
712        169,  172,  175,  176,  179,  182,  185,  193,  199,  215,        170,  173,  176,  177,  180,  183,  186,  194,  200,  216,
713        216,  227,  239,  240,  241,  258,  267,  269,  289,  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 763  char *yytext; Line 763  char *yytext;
763  #define YY_USER_INIT                            \  #define YY_USER_INIT                            \
764  do {                                            \  do {                                            \
765    LOCATION_RESET (*yylloc);                     \    LOCATION_RESET (*yylloc);                     \
766      yylloc->file = infile;                        \
767     /* This is only to avoid GCC warnings. */    \     /* This is only to avoid GCC warnings. */    \
768    if (yycontrol) {;};                           \    if (yycontrol) {;};                           \
769  } while (0)  } while (0)
770    
771  #define YY_USER_ACTION  LOCATION_COLUMNS (*yylloc, yyleng)  #define YY_USER_ACTION  LOCATION_COLUMNS (*yylloc, yyleng);
772  #define YY_LINES        LOCATION_LINES (*yylloc, yyleng);  #define YY_LINES        LOCATION_LINES (*yylloc, yyleng);
773  #define YY_STEP         LOCATION_STEP (*yylloc)  #define YY_STEP         LOCATION_STEP (*yylloc);
774    
775  /* STRING_OBSTACK -- Used to store all the characters that we need to  /* STRING_OBSTACK -- Used to store all the characters that we need to
776     keep (to construct ID, STRINGS etc.).  Use the following macros to     keep (to construct ID, STRINGS etc.).  Use the following macros to
# Line 824  static void handle_at PARAMS ((braced_co Line 825  static void handle_at PARAMS ((braced_co
825  #define SC_PROLOGUE 7  #define SC_PROLOGUE 7
826  #define SC_EPILOGUE 8  #define SC_EPILOGUE 8
827    
828  #line 828 "lex.yy.c"  #line 829 "lex.yy.c"
829    
830  /* Macros after this point can all be overridden by user definitions in  /* Macros after this point can all be overridden by user definitions in
831   * section 1.   * section 1.
# Line 986  YY_DECL Line 987  YY_DECL
987          register char *yy_cp, *yy_bp;          register char *yy_cp, *yy_bp;
988          register int yy_act;          register int yy_act;
989    
990  #line 97 "scan-gram.l"  #line 98 "scan-gram.l"
991    
992    
993    /* At each yylex invocation, mark the current position as the    /* At each yylex invocation, mark the current position as the
# Line 1009  YY_DECL Line 1010  YY_DECL
1010    /*----------------------------.    /*----------------------------.
1011    | Scanning Bison directives.  |    | Scanning Bison directives.  |
1012    `----------------------------*/    `----------------------------*/
1013  #line 1013 "lex.yy.c"  #line 1014 "lex.yy.c"
1014    
1015          if ( yy_init )          if ( yy_init )
1016                  {                  {
# Line 1111  do_action:     /* This label is used only to Line 1112  do_action:     /* This label is used only to
1112    
1113  case 1:  case 1:
1114  YY_RULE_SETUP  YY_RULE_SETUP
1115  #line 121 "scan-gram.l"  #line 122 "scan-gram.l"
1116  return PERCENT_NONASSOC;  return PERCENT_NONASSOC;
1117          YY_BREAK          YY_BREAK
1118  case 2:  case 2:
1119  YY_RULE_SETUP  YY_RULE_SETUP
1120  #line 122 "scan-gram.l"  #line 123 "scan-gram.l"
1121  return PERCENT_DEBUG;  return PERCENT_DEBUG;
1122          YY_BREAK          YY_BREAK
1123  case 3:  case 3:
1124  YY_RULE_SETUP  YY_RULE_SETUP
1125  #line 123 "scan-gram.l"  #line 124 "scan-gram.l"
1126  return PERCENT_DEFINE;  return PERCENT_DEFINE;
1127          YY_BREAK          YY_BREAK
1128  case 4:  case 4:
1129  YY_RULE_SETUP  YY_RULE_SETUP
1130  #line 124 "scan-gram.l"  #line 125 "scan-gram.l"
1131  return PERCENT_DEFINES;  return PERCENT_DEFINES;
1132          YY_BREAK          YY_BREAK
1133  case 5:  case 5:
1134  YY_RULE_SETUP  YY_RULE_SETUP
1135  #line 125 "scan-gram.l"  #line 126 "scan-gram.l"
1136  return PERCENT_DESTRUCTOR;  return PERCENT_DESTRUCTOR;
1137          YY_BREAK          YY_BREAK
1138  case 6:  case 6:
1139  YY_RULE_SETUP  YY_RULE_SETUP
1140  #line 126 "scan-gram.l"  #line 127 "scan-gram.l"
1141  return PERCENT_DPREC;  return PERCENT_DPREC;
1142          YY_BREAK          YY_BREAK
1143  case 7:  case 7:
1144  YY_RULE_SETUP  YY_RULE_SETUP
1145  #line 127 "scan-gram.l"  #line 128 "scan-gram.l"
1146  return PERCENT_ERROR_VERBOSE;  return PERCENT_ERROR_VERBOSE;
1147          YY_BREAK          YY_BREAK
1148  case 8:  case 8:
1149  YY_RULE_SETUP  YY_RULE_SETUP
1150  #line 128 "scan-gram.l"  #line 129 "scan-gram.l"
1151  return PERCENT_EXPECT;  return PERCENT_EXPECT;
1152          YY_BREAK          YY_BREAK
1153  case 9:  case 9:
1154  YY_RULE_SETUP  YY_RULE_SETUP
1155  #line 129 "scan-gram.l"  #line 130 "scan-gram.l"
1156  return PERCENT_FILE_PREFIX;  return PERCENT_FILE_PREFIX;
1157          YY_BREAK          YY_BREAK
1158  case 10:  case 10:
1159  YY_RULE_SETUP  YY_RULE_SETUP
1160  #line 130 "scan-gram.l"  #line 131 "scan-gram.l"
1161  return PERCENT_YACC;  return PERCENT_YACC;
1162          YY_BREAK          YY_BREAK
1163  case 11:  case 11:
1164  YY_RULE_SETUP  YY_RULE_SETUP
1165  #line 131 "scan-gram.l"  #line 132 "scan-gram.l"
1166  return PERCENT_GLR_PARSER;  return PERCENT_GLR_PARSER;
1167          YY_BREAK          YY_BREAK
1168  case 12:  case 12:
1169  YY_RULE_SETUP  YY_RULE_SETUP
1170  #line 132 "scan-gram.l"  #line 133 "scan-gram.l"
1171  return PERCENT_LEFT;  return PERCENT_LEFT;
1172          YY_BREAK          YY_BREAK
1173  case 13:  case 13:
1174  YY_RULE_SETUP  YY_RULE_SETUP
1175  #line 133 "scan-gram.l"  #line 134 "scan-gram.l"
1176  return PERCENT_LOCATIONS;  return PERCENT_LOCATIONS;
1177          YY_BREAK          YY_BREAK
1178  case 14:  case 14:
1179  YY_RULE_SETUP  YY_RULE_SETUP
1180  #line 134 "scan-gram.l"  #line 135 "scan-gram.l"
1181  return PERCENT_MERGE;  return PERCENT_MERGE;
1182          YY_BREAK          YY_BREAK
1183  case 15:  case 15:
1184  YY_RULE_SETUP  YY_RULE_SETUP
1185  #line 135 "scan-gram.l"  #line 136 "scan-gram.l"
1186  return PERCENT_NAME_PREFIX;  return PERCENT_NAME_PREFIX;
1187          YY_BREAK          YY_BREAK
1188  case 16:  case 16:
1189  YY_RULE_SETUP  YY_RULE_SETUP
1190  #line 136 "scan-gram.l"  #line 137 "scan-gram.l"
1191  return PERCENT_NO_LINES;  return PERCENT_NO_LINES;
1192          YY_BREAK          YY_BREAK
1193  case 17:  case 17:
1194  YY_RULE_SETUP  YY_RULE_SETUP
1195  #line 137 "scan-gram.l"  #line 138 "scan-gram.l"
1196  return PERCENT_NONASSOC;  return PERCENT_NONASSOC;
1197          YY_BREAK          YY_BREAK
1198  case 18:  case 18:
1199  YY_RULE_SETUP  YY_RULE_SETUP
1200  #line 138 "scan-gram.l"  #line 139 "scan-gram.l"
1201  return PERCENT_NTERM;  return PERCENT_NTERM;
1202          YY_BREAK          YY_BREAK
1203  case 19:  case 19:
1204  YY_RULE_SETUP  YY_RULE_SETUP
1205  #line 139 "scan-gram.l"  #line 140 "scan-gram.l"
1206  return PERCENT_OUTPUT;  return PERCENT_OUTPUT;
1207          YY_BREAK          YY_BREAK
1208  case 20:  case 20:
1209  YY_RULE_SETUP  YY_RULE_SETUP
1210  #line 140 "scan-gram.l"  #line 141 "scan-gram.l"
1211  return PERCENT_PREC;  return PERCENT_PREC;
1212          YY_BREAK          YY_BREAK
1213  case 21:  case 21:
1214  YY_RULE_SETUP  YY_RULE_SETUP
1215  #line 141 "scan-gram.l"  #line 142 "scan-gram.l"
1216  return PERCENT_PRINTER;  return PERCENT_PRINTER;
1217          YY_BREAK          YY_BREAK
1218  case 22:  case 22:
1219  YY_RULE_SETUP  YY_RULE_SETUP
1220  #line 142 "scan-gram.l"  #line 143 "scan-gram.l"
1221  return PERCENT_PURE_PARSER;  return PERCENT_PURE_PARSER;
1222          YY_BREAK          YY_BREAK
1223  case 23:  case 23:
1224  YY_RULE_SETUP  YY_RULE_SETUP
1225  #line 143 "scan-gram.l"  #line 144 "scan-gram.l"
1226  return PERCENT_RIGHT;  return PERCENT_RIGHT;
1227          YY_BREAK          YY_BREAK
1228  case 24:  case 24:
1229  YY_RULE_SETUP  YY_RULE_SETUP
1230  #line 144 "scan-gram.l"  #line 145 "scan-gram.l"
1231  return PERCENT_SKELETON;  return PERCENT_SKELETON;
1232          YY_BREAK          YY_BREAK
1233  case 25:  case 25:
1234  YY_RULE_SETUP  YY_RULE_SETUP
1235  #line 145 "scan-gram.l"  #line 146 "scan-gram.l"
1236  return PERCENT_START;  return PERCENT_START;
1237          YY_BREAK          YY_BREAK
1238  case 26:  case 26:
1239  YY_RULE_SETUP  YY_RULE_SETUP
1240  #line 146 "scan-gram.l"  #line 147 "scan-gram.l"
1241  return PERCENT_TOKEN;  return PERCENT_TOKEN;
1242          YY_BREAK          YY_BREAK
1243  case 27:  case 27:
1244  YY_RULE_SETUP  YY_RULE_SETUP
1245  #line 147 "scan-gram.l"  #line 148 "scan-gram.l"
1246  return PERCENT_TOKEN;  return PERCENT_TOKEN;
1247          YY_BREAK          YY_BREAK
1248  case 28:  case 28:
1249  YY_RULE_SETUP  YY_RULE_SETUP
1250  #line 148 "scan-gram.l"  #line 149 "scan-gram.l"
1251  return PERCENT_TOKEN_TABLE;  return PERCENT_TOKEN_TABLE;
1252          YY_BREAK          YY_BREAK
1253  case 29:  case 29:
1254  YY_RULE_SETUP  YY_RULE_SETUP
1255  #line 149 "scan-gram.l"  #line 150 "scan-gram.l"
1256  return PERCENT_TYPE;  return PERCENT_TYPE;
1257          YY_BREAK          YY_BREAK
1258  case 30:  case 30:
1259  YY_RULE_SETUP  YY_RULE_SETUP
1260  #line 150 "scan-gram.l"  #line 151 "scan-gram.l"
1261  return PERCENT_UNION;  return PERCENT_UNION;
1262          YY_BREAK          YY_BREAK
1263  case 31:  case 31:
1264  YY_RULE_SETUP  YY_RULE_SETUP
1265  #line 151 "scan-gram.l"  #line 152 "scan-gram.l"
1266  return PERCENT_VERBOSE;  return PERCENT_VERBOSE;
1267          YY_BREAK          YY_BREAK
1268  case 32:  case 32:
1269  YY_RULE_SETUP  YY_RULE_SETUP
1270  #line 152 "scan-gram.l"  #line 153 "scan-gram.l"
1271  return PERCENT_YACC;  return PERCENT_YACC;
1272          YY_BREAK          YY_BREAK
1273  case 33:  case 33:
1274  YY_RULE_SETUP  YY_RULE_SETUP
1275  #line 154 "scan-gram.l"  #line 155 "scan-gram.l"
1276  return EQUAL;  return EQUAL;
1277          YY_BREAK          YY_BREAK
1278  case 34:  case 34:
1279  YY_RULE_SETUP  YY_RULE_SETUP
1280  #line 155 "scan-gram.l"  #line 156 "scan-gram.l"
1281  return COLON;  return COLON;
1282          YY_BREAK          YY_BREAK
1283  case 35:  case 35:
1284  YY_RULE_SETUP  YY_RULE_SETUP
1285  #line 156 "scan-gram.l"  #line 157 "scan-gram.l"
1286  return PIPE;  return PIPE;
1287          YY_BREAK          YY_BREAK
1288  case 36:  case 36:
1289  YY_RULE_SETUP  YY_RULE_SETUP
1290  #line 157 "scan-gram.l"  #line 158 "scan-gram.l"
1291  return SEMICOLON;  return SEMICOLON;
1292          YY_BREAK          YY_BREAK
1293  case 37:  case 37:
1294  YY_RULE_SETUP  YY_RULE_SETUP
1295  #line 159 "scan-gram.l"  #line 160 "scan-gram.l"
1296  YY_LINES; YY_STEP;  YY_LINES; YY_STEP;
1297          YY_BREAK          YY_BREAK
1298  case 38:  case 38:
1299  YY_RULE_SETUP  YY_RULE_SETUP
1300  #line 160 "scan-gram.l"  #line 161 "scan-gram.l"
1301  YY_STEP;  YY_STEP;
1302          YY_BREAK          YY_BREAK
1303  case 39:  case 39:
1304  YY_RULE_SETUP  YY_RULE_SETUP
1305  #line 161 "scan-gram.l"  #line 162 "scan-gram.l"
1306  {  {
1307      yylval->symbol = symbol_get (yytext, *yylloc);      yylval->symbol = symbol_get (yytext, *yylloc);
1308      return ID;      return ID;
# Line 1309  YY_RULE_SETUP Line 1310  YY_RULE_SETUP
1310          YY_BREAK          YY_BREAK
1311  case 40:  case 40:
1312  YY_RULE_SETUP  YY_RULE_SETUP
1313  #line 166 "scan-gram.l"  #line 167 "scan-gram.l"
1314  yylval->integer = strtol (yytext, 0, 10); return INT;  yylval->integer = strtol (yytext, 0, 10); return INT;
1315          YY_BREAK          YY_BREAK
1316  /* Characters.  We don't check there is only one.  */  /* Characters.  We don't check there is only one.  */
1317  case 41:  case 41:
1318  YY_RULE_SETUP  YY_RULE_SETUP
1319  #line 169 "scan-gram.l"  #line 170 "scan-gram.l"
1320  YY_OBS_GROW; yy_push_state (SC_ESCAPED_CHARACTER);  YY_OBS_GROW; yy_push_state (SC_ESCAPED_CHARACTER);
1321          YY_BREAK          YY_BREAK
1322  /* Strings. */  /* Strings. */
1323  case 42:  case 42:
1324  YY_RULE_SETUP  YY_RULE_SETUP
1325  #line 172 "scan-gram.l"  #line 173 "scan-gram.l"
1326  YY_OBS_GROW; yy_push_state (SC_ESCAPED_STRING);  YY_OBS_GROW; yy_push_state (SC_ESCAPED_STRING);
1327          YY_BREAK          YY_BREAK
1328  /* Comments. */  /* Comments. */
1329  case 43:  case 43:
1330  YY_RULE_SETUP  YY_RULE_SETUP
1331  #line 175 "scan-gram.l"  #line 176 "scan-gram.l"
1332  yy_push_state (SC_COMMENT);  yy_push_state (SC_COMMENT);
1333          YY_BREAK          YY_BREAK
1334  case 44:  case 44:
1335  YY_RULE_SETUP  YY_RULE_SETUP
1336  #line 176 "scan-gram.l"  #line 177 "scan-gram.l"
1337  YY_STEP;  YY_STEP;
1338          YY_BREAK          YY_BREAK
1339  /* Prologue. */  /* Prologue. */
1340  case 45:  case 45:
1341  YY_RULE_SETUP  YY_RULE_SETUP
1342  #line 179 "scan-gram.l"  #line 180 "scan-gram.l"
1343  yy_push_state (SC_PROLOGUE);  yy_push_state (SC_PROLOGUE);
1344          YY_BREAK          YY_BREAK
1345  /* Code in between braces.  */  /* Code in between braces.  */
1346  case 46:  case 46:
1347  YY_RULE_SETUP  YY_RULE_SETUP
1348  #line 182 "scan-gram.l"  #line 183 "scan-gram.l"
1349  YY_OBS_GROW; ++braces_level; yy_push_state (SC_BRACED_CODE);  YY_OBS_GROW; ++braces_level; yy_push_state (SC_BRACED_CODE);
1350          YY_BREAK          YY_BREAK
1351  /* A type. */  /* A type. */
1352  case 47:  case 47:
1353  YY_RULE_SETUP  YY_RULE_SETUP
1354  #line 185 "scan-gram.l"  #line 186 "scan-gram.l"
1355  {  {
1356      obstack_grow (&string_obstack, yytext + 1, yyleng - 2);      obstack_grow (&string_obstack, yytext + 1, yyleng - 2);
1357      YY_OBS_FINISH;      YY_OBS_FINISH;
# Line 1360  YY_RULE_SETUP Line 1361  YY_RULE_SETUP
1361          YY_BREAK          YY_BREAK
1362  case 48:  case 48:
1363  YY_RULE_SETUP  YY_RULE_SETUP
1364  #line 193 "scan-gram.l"  #line 194 "scan-gram.l"
1365  {  {
1366      if (++percent_percent_count == 2)      if (++percent_percent_count == 2)
1367        yy_push_state (SC_EPILOGUE);        yy_push_state (SC_EPILOGUE);
# Line 1369  YY_RULE_SETUP Line 1370  YY_RULE_SETUP
1370          YY_BREAK          YY_BREAK
1371  case 49:  case 49:
1372  YY_RULE_SETUP  YY_RULE_SETUP
1373  #line 199 "scan-gram.l"  #line 200 "scan-gram.l"
1374  {  {
1375      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1376      fprintf (stderr, ": invalid character: `%c'\n", *yytext);      fprintf (stderr, ": invalid character: `%c'\n", *yytext);
# Line 1386  YY_RULE_SETUP Line 1387  YY_RULE_SETUP
1387    
1388  case 50:  case 50:
1389  YY_RULE_SETUP  YY_RULE_SETUP
1390  #line 215 "scan-gram.l"  #line 216 "scan-gram.l"
1391  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@<:@");  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@<:@");
1392          YY_BREAK          YY_BREAK
1393  case 51:  case 51:
1394  YY_RULE_SETUP  YY_RULE_SETUP
1395  #line 216 "scan-gram.l"  #line 217 "scan-gram.l"
1396  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@:>@");  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@:>@");
1397          YY_BREAK          YY_BREAK
1398    
# Line 1402  if (YY_START != SC_COMMENT) obstack_sgro Line 1403  if (YY_START != SC_COMMENT) obstack_sgro
1403    
1404  case 52:  case 52:
1405  YY_RULE_SETUP  YY_RULE_SETUP
1406  #line 227 "scan-gram.l"  #line 228 "scan-gram.l"
1407  { /* End of the comment. */  { /* End of the comment. */
1408      if (yy_top_state () == INITIAL)      if (yy_top_state () == INITIAL)
1409        {        {
# Line 1417  YY_RULE_SETUP Line 1418  YY_RULE_SETUP
1418          YY_BREAK          YY_BREAK
1419  case 53:  case 53:
1420  YY_RULE_SETUP  YY_RULE_SETUP
1421  #line 239 "scan-gram.l"  #line 240 "scan-gram.l"
1422  if (yy_top_state () != INITIAL) YY_OBS_GROW;  if (yy_top_state () != INITIAL) YY_OBS_GROW;
1423          YY_BREAK          YY_BREAK
1424  case 54:  case 54:
1425  YY_RULE_SETUP  YY_RULE_SETUP
1426  #line 240 "scan-gram.l"  #line 241 "scan-gram.l"
1427  if (yy_top_state () != INITIAL) YY_OBS_GROW; YY_LINES;  if (yy_top_state () != INITIAL) YY_OBS_GROW; YY_LINES;
1428          YY_BREAK          YY_BREAK
1429  case 55:  case 55:
1430  YY_RULE_SETUP  YY_RULE_SETUP
1431  #line 241 "scan-gram.l"  #line 242 "scan-gram.l"
1432  /* Stray `*'. */if (yy_top_state () != INITIAL) YY_OBS_GROW;  /* Stray `*'. */if (yy_top_state () != INITIAL) YY_OBS_GROW;
1433          YY_BREAK          YY_BREAK
1434  case YY_STATE_EOF(SC_COMMENT):  case YY_STATE_EOF(SC_COMMENT):
1435  #line 243 "scan-gram.l"  #line 244 "scan-gram.l"
1436  {  {
1437      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1438      fprintf (stderr, ": unexpected end of file in a comment\n");      fprintf (stderr, ": unexpected end of file in a comment\n");
# Line 1447  case YY_STATE_EOF(SC_COMMENT): Line 1448  case YY_STATE_EOF(SC_COMMENT):
1448    
1449  case 56:  case 56:
1450  YY_RULE_SETUP  YY_RULE_SETUP
1451  #line 258 "scan-gram.l"  #line 259 "scan-gram.l"
1452  {  {
1453      assert (yy_top_state () == INITIAL);      assert (yy_top_state () == INITIAL);
1454      YY_OBS_GROW;      YY_OBS_GROW;
# Line 1459  YY_RULE_SETUP Line 1460  YY_RULE_SETUP
1460          YY_BREAK          YY_BREAK
1461  case 57:  case 57:
1462  YY_RULE_SETUP  YY_RULE_SETUP
1463  #line 267 "scan-gram.l"  #line 268 "scan-gram.l"
1464  YY_OBS_GROW;  YY_OBS_GROW;
1465          YY_BREAK          YY_BREAK
1466  case 58:  case 58:
1467  YY_RULE_SETUP  YY_RULE_SETUP
1468  #line 269 "scan-gram.l"  #line 270 "scan-gram.l"
1469  obstack_1grow (&string_obstack, '\n'); YY_LINES;  obstack_1grow (&string_obstack, '\n'); YY_LINES;
1470          YY_BREAK          YY_BREAK
1471  case YY_STATE_EOF(SC_ESCAPED_STRING):  case YY_STATE_EOF(SC_ESCAPED_STRING):
1472  #line 271 "scan-gram.l"  #line 272 "scan-gram.l"
1473  {  {
1474      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1475      fprintf (stderr, ": unexpected end of file in a string\n");      fprintf (stderr, ": unexpected end of file in a string\n");
# Line 1488  case YY_STATE_EOF(SC_ESCAPED_STRING): Line 1489  case YY_STATE_EOF(SC_ESCAPED_STRING):
1489    
1490  case 59:  case 59:
1491  YY_RULE_SETUP  YY_RULE_SETUP
1492  #line 289 "scan-gram.l"  #line 290 "scan-gram.l"
1493  {  {
1494      YY_OBS_GROW;      YY_OBS_GROW;
1495      assert (yy_top_state () == INITIAL);      assert (yy_top_state () == INITIAL);
# 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.25  
changed lines
  Added in v.1.26

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