/[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.22 by akim, Tue Jul 2 11:39:04 2002 UTC revision 1.23 by akim, Wed Jul 3 06:52:02 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        122,  123,  124,  125,  126,  127,  128,  129,  130,  131,        121,  122,  123,  124,  125,  126,  127,  128,  129,  130,
709        132,  133,  134,  135,  136,  137,  138,  139,  140,  141,        131,  132,  133,  134,  135,  136,  137,  138,  139,  140,
710        142,  143,  144,  145,  146,  147,  148,  149,  150,  151,        141,  142,  143,  144,  145,  146,  147,  148,  149,  150,
711        152,  153,  155,  156,  157,  158,  160,  161,  162,  167,        151,  152,  154,  155,  156,  157,  159,  160,  161,  166,
712        170,  173,  176,  177,  180,  183,  186,  194,  200,  216,        169,  172,  175,  176,  179,  182,  185,  193,  199,  215,
713        217,  228,  240,  241,  242,  259,  268,  270,  290,  305,        216,  227,  239,  240,  241,  258,  267,  269,  289,  304,
714        307,  327,  339,  343,  344,  345,  346,  347,  348,  349,        306,  326,  338,  342,  343,  344,  345,  346,  347,  348,
715        350,  351,  357,  368,  374,  375,  377,  379,  397,  403,        349,  350,  356,  367,  373,  374,  376,  378,  396,  402,
716        404,  406,  408,  426,  429,  432,  433,  436,  447,  458,        403,  405,  407,  425,  428,  431,  432,  435,  446,  457,
717        460,  462,  465,  466,  469,  489,  496,  497,  498,  518        459,  461,  464,  465,  468,  488,  495,  496,  497,  517
718    
719      } ;      } ;
720    
# Line 771  do {                                           \ Line 771  do {                                           \
771  #define YY_LINES        LOCATION_LINES (*yylloc, yyleng); lineno += yyleng;  #define YY_LINES        LOCATION_LINES (*yylloc, yyleng); lineno += yyleng;
772  #define YY_STEP         LOCATION_STEP (*yylloc)  #define YY_STEP         LOCATION_STEP (*yylloc)
773    
   
774  /* STRING_OBSTACK -- Used to store all the characters that we need to  /* STRING_OBSTACK -- Used to store all the characters that we need to
775     keep (to construct ID, STRINGS etc.).  Use the following macros to     keep (to construct ID, STRINGS etc.).  Use the following macros to
776     use it.     use it.
# Line 825  static void handle_at PARAMS ((braced_co Line 824  static void handle_at PARAMS ((braced_co
824  #define SC_PROLOGUE 7  #define SC_PROLOGUE 7
825  #define SC_EPILOGUE 8  #define SC_EPILOGUE 8
826    
827  #line 829 "lex.yy.c"  #line 828 "lex.yy.c"
828    
829  /* Macros after this point can all be overridden by user definitions in  /* Macros after this point can all be overridden by user definitions in
830   * section 1.   * section 1.
# Line 987  YY_DECL Line 986  YY_DECL
986          register char *yy_cp, *yy_bp;          register char *yy_cp, *yy_bp;
987          register int yy_act;          register int yy_act;
988    
989  #line 98 "scan-gram.l"  #line 97 "scan-gram.l"
990    
991    
992    /* At each yylex invocation, mark the current position as the    /* At each yylex invocation, mark the current position as the
# Line 1010  YY_DECL Line 1009  YY_DECL
1009    /*----------------------------.    /*----------------------------.
1010    | Scanning Bison directives.  |    | Scanning Bison directives.  |
1011    `----------------------------*/    `----------------------------*/
1012  #line 1014 "lex.yy.c"  #line 1013 "lex.yy.c"
1013    
1014          if ( yy_init )          if ( yy_init )
1015                  {                  {
# Line 1112  do_action:     /* This label is used only to Line 1111  do_action:     /* This label is used only to
1111    
1112  case 1:  case 1:
1113  YY_RULE_SETUP  YY_RULE_SETUP
1114  #line 122 "scan-gram.l"  #line 121 "scan-gram.l"
1115  return PERCENT_NONASSOC;  return PERCENT_NONASSOC;
1116          YY_BREAK          YY_BREAK
1117  case 2:  case 2:
1118  YY_RULE_SETUP  YY_RULE_SETUP
1119  #line 123 "scan-gram.l"  #line 122 "scan-gram.l"
1120  return PERCENT_DEBUG;  return PERCENT_DEBUG;
1121          YY_BREAK          YY_BREAK
1122  case 3:  case 3:
1123  YY_RULE_SETUP  YY_RULE_SETUP
1124  #line 124 "scan-gram.l"  #line 123 "scan-gram.l"
1125  return PERCENT_DEFINE;  return PERCENT_DEFINE;
1126          YY_BREAK          YY_BREAK
1127  case 4:  case 4:
1128  YY_RULE_SETUP  YY_RULE_SETUP
1129  #line 125 "scan-gram.l"  #line 124 "scan-gram.l"
1130  return PERCENT_DEFINES;  return PERCENT_DEFINES;
1131          YY_BREAK          YY_BREAK
1132  case 5:  case 5:
1133  YY_RULE_SETUP  YY_RULE_SETUP
1134  #line 126 "scan-gram.l"  #line 125 "scan-gram.l"
1135  return PERCENT_DESTRUCTOR;  return PERCENT_DESTRUCTOR;
1136          YY_BREAK          YY_BREAK
1137  case 6:  case 6:
1138  YY_RULE_SETUP  YY_RULE_SETUP
1139  #line 127 "scan-gram.l"  #line 126 "scan-gram.l"
1140  return PERCENT_DPREC;  return PERCENT_DPREC;
1141          YY_BREAK          YY_BREAK
1142  case 7:  case 7:
1143  YY_RULE_SETUP  YY_RULE_SETUP
1144  #line 128 "scan-gram.l"  #line 127 "scan-gram.l"
1145  return PERCENT_ERROR_VERBOSE;  return PERCENT_ERROR_VERBOSE;
1146          YY_BREAK          YY_BREAK
1147  case 8:  case 8:
1148  YY_RULE_SETUP  YY_RULE_SETUP
1149  #line 129 "scan-gram.l"  #line 128 "scan-gram.l"
1150  return PERCENT_EXPECT;  return PERCENT_EXPECT;
1151          YY_BREAK          YY_BREAK
1152  case 9:  case 9:
1153  YY_RULE_SETUP  YY_RULE_SETUP
1154  #line 130 "scan-gram.l"  #line 129 "scan-gram.l"
1155  return PERCENT_FILE_PREFIX;  return PERCENT_FILE_PREFIX;
1156          YY_BREAK          YY_BREAK
1157  case 10:  case 10:
1158  YY_RULE_SETUP  YY_RULE_SETUP
1159  #line 131 "scan-gram.l"  #line 130 "scan-gram.l"
1160  return PERCENT_YACC;  return PERCENT_YACC;
1161          YY_BREAK          YY_BREAK
1162  case 11:  case 11:
1163  YY_RULE_SETUP  YY_RULE_SETUP
1164  #line 132 "scan-gram.l"  #line 131 "scan-gram.l"
1165  return PERCENT_GLR_PARSER;  return PERCENT_GLR_PARSER;
1166          YY_BREAK          YY_BREAK
1167  case 12:  case 12:
1168  YY_RULE_SETUP  YY_RULE_SETUP
1169  #line 133 "scan-gram.l"  #line 132 "scan-gram.l"
1170  return PERCENT_LEFT;  return PERCENT_LEFT;
1171          YY_BREAK          YY_BREAK
1172  case 13:  case 13:
1173  YY_RULE_SETUP  YY_RULE_SETUP
1174  #line 134 "scan-gram.l"  #line 133 "scan-gram.l"
1175  return PERCENT_LOCATIONS;  return PERCENT_LOCATIONS;
1176          YY_BREAK          YY_BREAK
1177  case 14:  case 14:
1178  YY_RULE_SETUP  YY_RULE_SETUP
1179  #line 135 "scan-gram.l"  #line 134 "scan-gram.l"
1180  return PERCENT_MERGE;  return PERCENT_MERGE;
1181          YY_BREAK          YY_BREAK
1182  case 15:  case 15:
1183  YY_RULE_SETUP  YY_RULE_SETUP
1184  #line 136 "scan-gram.l"  #line 135 "scan-gram.l"
1185  return PERCENT_NAME_PREFIX;  return PERCENT_NAME_PREFIX;
1186          YY_BREAK          YY_BREAK
1187  case 16:  case 16:
1188  YY_RULE_SETUP  YY_RULE_SETUP
1189  #line 137 "scan-gram.l"  #line 136 "scan-gram.l"
1190  return PERCENT_NO_LINES;  return PERCENT_NO_LINES;
1191          YY_BREAK          YY_BREAK
1192  case 17:  case 17:
1193  YY_RULE_SETUP  YY_RULE_SETUP
1194  #line 138 "scan-gram.l"  #line 137 "scan-gram.l"
1195  return PERCENT_NONASSOC;  return PERCENT_NONASSOC;
1196          YY_BREAK          YY_BREAK
1197  case 18:  case 18:
1198  YY_RULE_SETUP  YY_RULE_SETUP
1199  #line 139 "scan-gram.l"  #line 138 "scan-gram.l"
1200  return PERCENT_NTERM;  return PERCENT_NTERM;
1201          YY_BREAK          YY_BREAK
1202  case 19:  case 19:
1203  YY_RULE_SETUP  YY_RULE_SETUP
1204  #line 140 "scan-gram.l"  #line 139 "scan-gram.l"
1205  return PERCENT_OUTPUT;  return PERCENT_OUTPUT;
1206          YY_BREAK          YY_BREAK
1207  case 20:  case 20:
1208  YY_RULE_SETUP  YY_RULE_SETUP
1209  #line 141 "scan-gram.l"  #line 140 "scan-gram.l"
1210  return PERCENT_PREC;  return PERCENT_PREC;
1211          YY_BREAK          YY_BREAK
1212  case 21:  case 21:
1213  YY_RULE_SETUP  YY_RULE_SETUP
1214  #line 142 "scan-gram.l"  #line 141 "scan-gram.l"
1215  return PERCENT_PRINTER;  return PERCENT_PRINTER;
1216          YY_BREAK          YY_BREAK
1217  case 22:  case 22:
1218  YY_RULE_SETUP  YY_RULE_SETUP
1219  #line 143 "scan-gram.l"  #line 142 "scan-gram.l"
1220  return PERCENT_PURE_PARSER;  return PERCENT_PURE_PARSER;
1221          YY_BREAK          YY_BREAK
1222  case 23:  case 23:
1223  YY_RULE_SETUP  YY_RULE_SETUP
1224  #line 144 "scan-gram.l"  #line 143 "scan-gram.l"
1225  return PERCENT_RIGHT;  return PERCENT_RIGHT;
1226          YY_BREAK          YY_BREAK
1227  case 24:  case 24:
1228  YY_RULE_SETUP  YY_RULE_SETUP
1229  #line 145 "scan-gram.l"  #line 144 "scan-gram.l"
1230  return PERCENT_SKELETON;  return PERCENT_SKELETON;
1231          YY_BREAK          YY_BREAK
1232  case 25:  case 25:
1233  YY_RULE_SETUP  YY_RULE_SETUP
1234  #line 146 "scan-gram.l"  #line 145 "scan-gram.l"
1235  return PERCENT_START;  return PERCENT_START;
1236          YY_BREAK          YY_BREAK
1237  case 26:  case 26:
1238  YY_RULE_SETUP  YY_RULE_SETUP
1239  #line 147 "scan-gram.l"  #line 146 "scan-gram.l"
1240  return PERCENT_TOKEN;  return PERCENT_TOKEN;
1241          YY_BREAK          YY_BREAK
1242  case 27:  case 27:
1243  YY_RULE_SETUP  YY_RULE_SETUP
1244  #line 148 "scan-gram.l"  #line 147 "scan-gram.l"
1245  return PERCENT_TOKEN;  return PERCENT_TOKEN;
1246          YY_BREAK          YY_BREAK
1247  case 28:  case 28:
1248  YY_RULE_SETUP  YY_RULE_SETUP
1249  #line 149 "scan-gram.l"  #line 148 "scan-gram.l"
1250  return PERCENT_TOKEN_TABLE;  return PERCENT_TOKEN_TABLE;
1251          YY_BREAK          YY_BREAK
1252  case 29:  case 29:
1253  YY_RULE_SETUP  YY_RULE_SETUP
1254  #line 150 "scan-gram.l"  #line 149 "scan-gram.l"
1255  return PERCENT_TYPE;  return PERCENT_TYPE;
1256          YY_BREAK          YY_BREAK
1257  case 30:  case 30:
1258  YY_RULE_SETUP  YY_RULE_SETUP
1259  #line 151 "scan-gram.l"  #line 150 "scan-gram.l"
1260  return PERCENT_UNION;  return PERCENT_UNION;
1261          YY_BREAK          YY_BREAK
1262  case 31:  case 31:
1263  YY_RULE_SETUP  YY_RULE_SETUP
1264  #line 152 "scan-gram.l"  #line 151 "scan-gram.l"
1265  return PERCENT_VERBOSE;  return PERCENT_VERBOSE;
1266          YY_BREAK          YY_BREAK
1267  case 32:  case 32:
1268  YY_RULE_SETUP  YY_RULE_SETUP
1269  #line 153 "scan-gram.l"  #line 152 "scan-gram.l"
1270  return PERCENT_YACC;  return PERCENT_YACC;
1271          YY_BREAK          YY_BREAK
1272  case 33:  case 33:
1273  YY_RULE_SETUP  YY_RULE_SETUP
1274  #line 155 "scan-gram.l"  #line 154 "scan-gram.l"
1275  return EQUAL;  return EQUAL;
1276          YY_BREAK          YY_BREAK
1277  case 34:  case 34:
1278  YY_RULE_SETUP  YY_RULE_SETUP
1279  #line 156 "scan-gram.l"  #line 155 "scan-gram.l"
1280  return COLON;  return COLON;
1281          YY_BREAK          YY_BREAK
1282  case 35:  case 35:
1283  YY_RULE_SETUP  YY_RULE_SETUP
1284  #line 157 "scan-gram.l"  #line 156 "scan-gram.l"
1285  return PIPE;  return PIPE;
1286          YY_BREAK          YY_BREAK
1287  case 36:  case 36:
1288  YY_RULE_SETUP  YY_RULE_SETUP
1289  #line 158 "scan-gram.l"  #line 157 "scan-gram.l"
1290  return SEMICOLON;  return SEMICOLON;
1291          YY_BREAK          YY_BREAK
1292  case 37:  case 37:
1293  YY_RULE_SETUP  YY_RULE_SETUP
1294  #line 160 "scan-gram.l"  #line 159 "scan-gram.l"
1295  YY_LINES; YY_STEP;  YY_LINES; YY_STEP;
1296          YY_BREAK          YY_BREAK
1297  case 38:  case 38:
1298  YY_RULE_SETUP  YY_RULE_SETUP
1299  #line 161 "scan-gram.l"  #line 160 "scan-gram.l"
1300  YY_STEP;  YY_STEP;
1301          YY_BREAK          YY_BREAK
1302  case 39:  case 39:
1303  YY_RULE_SETUP  YY_RULE_SETUP
1304  #line 162 "scan-gram.l"  #line 161 "scan-gram.l"
1305  {  {
1306      yylval->symbol = symbol_get (yytext, *yylloc);      yylval->symbol = symbol_get (yytext, *yylloc);
1307      return ID;      return ID;
# Line 1310  YY_RULE_SETUP Line 1309  YY_RULE_SETUP
1309          YY_BREAK          YY_BREAK
1310  case 40:  case 40:
1311  YY_RULE_SETUP  YY_RULE_SETUP
1312  #line 167 "scan-gram.l"  #line 166 "scan-gram.l"
1313  yylval->integer = strtol (yytext, 0, 10); return INT;  yylval->integer = strtol (yytext, 0, 10); return INT;
1314          YY_BREAK          YY_BREAK
1315  /* Characters.  We don't check there is only one.  */  /* Characters.  We don't check there is only one.  */
1316  case 41:  case 41:
1317  YY_RULE_SETUP  YY_RULE_SETUP
1318  #line 170 "scan-gram.l"  #line 169 "scan-gram.l"
1319  YY_OBS_GROW; yy_push_state (SC_ESCAPED_CHARACTER);  YY_OBS_GROW; yy_push_state (SC_ESCAPED_CHARACTER);
1320          YY_BREAK          YY_BREAK
1321  /* Strings. */  /* Strings. */
1322  case 42:  case 42:
1323  YY_RULE_SETUP  YY_RULE_SETUP
1324  #line 173 "scan-gram.l"  #line 172 "scan-gram.l"
1325  YY_OBS_GROW; yy_push_state (SC_ESCAPED_STRING);  YY_OBS_GROW; yy_push_state (SC_ESCAPED_STRING);
1326          YY_BREAK          YY_BREAK
1327  /* Comments. */  /* Comments. */
1328  case 43:  case 43:
1329  YY_RULE_SETUP  YY_RULE_SETUP
1330  #line 176 "scan-gram.l"  #line 175 "scan-gram.l"
1331  yy_push_state (SC_COMMENT);  yy_push_state (SC_COMMENT);
1332          YY_BREAK          YY_BREAK
1333  case 44:  case 44:
1334  YY_RULE_SETUP  YY_RULE_SETUP
1335  #line 177 "scan-gram.l"  #line 176 "scan-gram.l"
1336  YY_STEP;  YY_STEP;
1337          YY_BREAK          YY_BREAK
1338  /* Prologue. */  /* Prologue. */
1339  case 45:  case 45:
1340  YY_RULE_SETUP  YY_RULE_SETUP
1341  #line 180 "scan-gram.l"  #line 179 "scan-gram.l"
1342  yy_push_state (SC_PROLOGUE);  yy_push_state (SC_PROLOGUE);
1343          YY_BREAK          YY_BREAK
1344  /* Code in between braces.  */  /* Code in between braces.  */
1345  case 46:  case 46:
1346  YY_RULE_SETUP  YY_RULE_SETUP
1347  #line 183 "scan-gram.l"  #line 182 "scan-gram.l"
1348  YY_OBS_GROW; ++braces_level; yy_push_state (SC_BRACED_CODE);  YY_OBS_GROW; ++braces_level; yy_push_state (SC_BRACED_CODE);
1349          YY_BREAK          YY_BREAK
1350  /* A type. */  /* A type. */
1351  case 47:  case 47:
1352  YY_RULE_SETUP  YY_RULE_SETUP
1353  #line 186 "scan-gram.l"  #line 185 "scan-gram.l"
1354  {  {
1355      obstack_grow (&string_obstack, yytext + 1, yyleng - 2);      obstack_grow (&string_obstack, yytext + 1, yyleng - 2);
1356      YY_OBS_FINISH;      YY_OBS_FINISH;
# Line 1361  YY_RULE_SETUP Line 1360  YY_RULE_SETUP
1360          YY_BREAK          YY_BREAK
1361  case 48:  case 48:
1362  YY_RULE_SETUP  YY_RULE_SETUP
1363  #line 194 "scan-gram.l"  #line 193 "scan-gram.l"
1364  {  {
1365      if (++percent_percent_count == 2)      if (++percent_percent_count == 2)
1366        yy_push_state (SC_EPILOGUE);        yy_push_state (SC_EPILOGUE);
# Line 1370  YY_RULE_SETUP Line 1369  YY_RULE_SETUP
1369          YY_BREAK          YY_BREAK
1370  case 49:  case 49:
1371  YY_RULE_SETUP  YY_RULE_SETUP
1372  #line 200 "scan-gram.l"  #line 199 "scan-gram.l"
1373  {  {
1374      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1375      fprintf (stderr, ": invalid character: `%c'\n", *yytext);      fprintf (stderr, ": invalid character: `%c'\n", *yytext);
# Line 1387  YY_RULE_SETUP Line 1386  YY_RULE_SETUP
1386    
1387  case 50:  case 50:
1388  YY_RULE_SETUP  YY_RULE_SETUP
1389  #line 216 "scan-gram.l"  #line 215 "scan-gram.l"
1390  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@<:@");  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@<:@");
1391          YY_BREAK          YY_BREAK
1392  case 51:  case 51:
1393  YY_RULE_SETUP  YY_RULE_SETUP
1394  #line 217 "scan-gram.l"  #line 216 "scan-gram.l"
1395  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@:>@");  if (YY_START != SC_COMMENT) obstack_sgrow (&string_obstack, "@:>@");
1396          YY_BREAK          YY_BREAK
1397    
# Line 1403  if (YY_START != SC_COMMENT) obstack_sgro Line 1402  if (YY_START != SC_COMMENT) obstack_sgro
1402    
1403  case 52:  case 52:
1404  YY_RULE_SETUP  YY_RULE_SETUP
1405  #line 228 "scan-gram.l"  #line 227 "scan-gram.l"
1406  { /* End of the comment. */  { /* End of the comment. */
1407      if (yy_top_state () == INITIAL)      if (yy_top_state () == INITIAL)
1408        {        {
# Line 1418  YY_RULE_SETUP Line 1417  YY_RULE_SETUP
1417          YY_BREAK          YY_BREAK
1418  case 53:  case 53:
1419  YY_RULE_SETUP  YY_RULE_SETUP
1420  #line 240 "scan-gram.l"  #line 239 "scan-gram.l"
1421  if (yy_top_state () != INITIAL) YY_OBS_GROW;  if (yy_top_state () != INITIAL) YY_OBS_GROW;
1422          YY_BREAK          YY_BREAK
1423  case 54:  case 54:
1424  YY_RULE_SETUP  YY_RULE_SETUP
1425  #line 241 "scan-gram.l"  #line 240 "scan-gram.l"
1426  if (yy_top_state () != INITIAL) YY_OBS_GROW; YY_LINES;  if (yy_top_state () != INITIAL) YY_OBS_GROW; YY_LINES;
1427          YY_BREAK          YY_BREAK
1428  case 55:  case 55:
1429  YY_RULE_SETUP  YY_RULE_SETUP
1430  #line 242 "scan-gram.l"  #line 241 "scan-gram.l"
1431  /* Stray `*'. */if (yy_top_state () != INITIAL) YY_OBS_GROW;  /* Stray `*'. */if (yy_top_state () != INITIAL) YY_OBS_GROW;
1432          YY_BREAK          YY_BREAK
1433  case YY_STATE_EOF(SC_COMMENT):  case YY_STATE_EOF(SC_COMMENT):
1434  #line 244 "scan-gram.l"  #line 243 "scan-gram.l"
1435  {  {
1436      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1437      fprintf (stderr, ": unexpected end of file in a comment\n");      fprintf (stderr, ": unexpected end of file in a comment\n");
# Line 1448  case YY_STATE_EOF(SC_COMMENT): Line 1447  case YY_STATE_EOF(SC_COMMENT):
1447    
1448  case 56:  case 56:
1449  YY_RULE_SETUP  YY_RULE_SETUP
1450  #line 259 "scan-gram.l"  #line 258 "scan-gram.l"
1451  {  {
1452      assert (yy_top_state () == INITIAL);      assert (yy_top_state () == INITIAL);
1453      YY_OBS_GROW;      YY_OBS_GROW;
# Line 1460  YY_RULE_SETUP Line 1459  YY_RULE_SETUP
1459          YY_BREAK          YY_BREAK
1460  case 57:  case 57:
1461  YY_RULE_SETUP  YY_RULE_SETUP
1462  #line 268 "scan-gram.l"  #line 267 "scan-gram.l"
1463  YY_OBS_GROW;  YY_OBS_GROW;
1464          YY_BREAK          YY_BREAK
1465  case 58:  case 58:
1466  YY_RULE_SETUP  YY_RULE_SETUP
1467  #line 270 "scan-gram.l"  #line 269 "scan-gram.l"
1468  obstack_1grow (&string_obstack, '\n'); YY_LINES;  obstack_1grow (&string_obstack, '\n'); YY_LINES;
1469          YY_BREAK          YY_BREAK
1470  case YY_STATE_EOF(SC_ESCAPED_STRING):  case YY_STATE_EOF(SC_ESCAPED_STRING):
1471  #line 272 "scan-gram.l"  #line 271 "scan-gram.l"
1472  {  {
1473      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1474      fprintf (stderr, ": unexpected end of file in a string\n");      fprintf (stderr, ": unexpected end of file in a string\n");
# Line 1489  case YY_STATE_EOF(SC_ESCAPED_STRING): Line 1488  case YY_STATE_EOF(SC_ESCAPED_STRING):
1488    
1489  case 59:  case 59:
1490  YY_RULE_SETUP  YY_RULE_SETUP
1491  #line 290 "scan-gram.l"  #line 289 "scan-gram.l"
1492  {  {
1493      YY_OBS_GROW;      YY_OBS_GROW;
1494      assert (yy_top_state () == INITIAL);      assert (yy_top_state () == INITIAL);
# Line 1507  YY_RULE_SETUP Line 1506  YY_RULE_SETUP
1506          YY_BREAK          YY_BREAK
1507  case 60:  case 60:
1508  YY_RULE_SETUP  YY_RULE_SETUP
1509  #line 305 "scan-gram.l"  #line 304 "scan-gram.l"
1510  YY_OBS_GROW;  YY_OBS_GROW;
1511          YY_BREAK          YY_BREAK
1512  case 61:  case 61:
1513  YY_RULE_SETUP  YY_RULE_SETUP
1514  #line 307 "scan-gram.l"  #line 306 "scan-gram.l"
1515  obstack_1grow (&string_obstack, '\n'); YY_LINES;  obstack_1grow (&string_obstack, '\n'); YY_LINES;
1516          YY_BREAK          YY_BREAK
1517  case YY_STATE_EOF(SC_ESCAPED_CHARACTER):  case YY_STATE_EOF(SC_ESCAPED_CHARACTER):
1518  #line 309 "scan-gram.l"  #line 308 "scan-gram.l"
1519  {  {
1520      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1521      fprintf (stderr, ": unexpected end of file in a character\n");      fprintf (stderr, ": unexpected end of file in a character\n");
# Line 1535  case YY_STATE_EOF(SC_ESCAPED_CHARACTER): Line 1534  case YY_STATE_EOF(SC_ESCAPED_CHARACTER):
1534    
1535  case 62:  case 62:
1536  YY_RULE_SETUP  YY_RULE_SETUP
1537  #line 327 "scan-gram.l"  #line 326 "scan-gram.l"
1538  {  {
1539      long c = strtol (yytext + 1, 0, 8);      long c = strtol (yytext + 1, 0, 8);
1540      if (c > 255)      if (c > 255)
# Line 1550  YY_RULE_SETUP Line 1549  YY_RULE_SETUP
1549          YY_BREAK          YY_BREAK
1550  case 63:  case 63:
1551  YY_RULE_SETUP  YY_RULE_SETUP
1552  #line 339 "scan-gram.l"  #line 338 "scan-gram.l"
1553  {  {
1554      obstack_1grow (&string_obstack, strtol (yytext + 2, 0, 16));      obstack_1grow (&string_obstack, strtol (yytext + 2, 0, 16));
1555    }    }
1556          YY_BREAK          YY_BREAK
1557  case 64:  case 64:
1558  YY_RULE_SETUP  YY_RULE_SETUP
1559  #line 343 "scan-gram.l"  #line 342 "scan-gram.l"
1560  obstack_1grow (&string_obstack, '\a');  obstack_1grow (&string_obstack, '\a');
1561          YY_BREAK          YY_BREAK
1562  case 65:  case 65:
1563  YY_RULE_SETUP  YY_RULE_SETUP
1564  #line 344 "scan-gram.l"  #line 343 "scan-gram.l"
1565  obstack_1grow (&string_obstack, '\b');  obstack_1grow (&string_obstack, '\b');
1566          YY_BREAK          YY_BREAK
1567  case 66:  case 66:
1568  YY_RULE_SETUP  YY_RULE_SETUP
1569  #line 345 "scan-gram.l"  #line 344 "scan-gram.l"
1570  obstack_1grow (&string_obstack, '\f');  obstack_1grow (&string_obstack, '\f');
1571          YY_BREAK          YY_BREAK
1572  case 67:  case 67:
1573  YY_RULE_SETUP  YY_RULE_SETUP
1574  #line 346 "scan-gram.l"  #line 345 "scan-gram.l"
1575  obstack_1grow (&string_obstack, '\n');  obstack_1grow (&string_obstack, '\n');
1576          YY_BREAK          YY_BREAK
1577  case 68:  case 68:
1578  YY_RULE_SETUP  YY_RULE_SETUP
1579  #line 347 "scan-gram.l"  #line 346 "scan-gram.l"
1580  obstack_1grow (&string_obstack, '\r');  obstack_1grow (&string_obstack, '\r');
1581          YY_BREAK          YY_BREAK
1582  case 69:  case 69:
1583  YY_RULE_SETUP  YY_RULE_SETUP
1584  #line 348 "scan-gram.l"  #line 347 "scan-gram.l"
1585  obstack_1grow (&string_obstack, '\t');  obstack_1grow (&string_obstack, '\t');
1586          YY_BREAK          YY_BREAK
1587  case 70:  case 70:
1588  YY_RULE_SETUP  YY_RULE_SETUP
1589  #line 349 "scan-gram.l"  #line 348 "scan-gram.l"
1590  obstack_1grow (&string_obstack, '\v');  obstack_1grow (&string_obstack, '\v');
1591          YY_BREAK          YY_BREAK
1592  case 71:  case 71:
1593  YY_RULE_SETUP  YY_RULE_SETUP
1594  #line 350 "scan-gram.l"  #line 349 "scan-gram.l"
1595  obstack_1grow (&string_obstack, yytext[1]);  obstack_1grow (&string_obstack, yytext[1]);
1596          YY_BREAK          YY_BREAK
1597  case 72:  case 72:
1598  YY_RULE_SETUP  YY_RULE_SETUP
1599  #line 351 "scan-gram.l"  #line 350 "scan-gram.l"
1600  {  {
1601      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1602      fprintf (stderr, ": unrecognized escape: %s\n", quote (yytext));      fprintf (stderr, ": unrecognized escape: %s\n", quote (yytext));
# Line 1607  YY_RULE_SETUP Line 1606  YY_RULE_SETUP
1606  /* FLex wants this rule, in case of a `\<<EOF>>'. */  /* FLex wants this rule, in case of a `\<<EOF>>'. */
1607  case 73:  case 73:
1608  YY_RULE_SETUP  YY_RULE_SETUP
1609  #line 357 "scan-gram.l"  #line 356 "scan-gram.l"
1610  YY_OBS_GROW;  YY_OBS_GROW;
1611          YY_BREAK          YY_BREAK
1612    
# Line 1619  YY_OBS_GROW; Line 1618  YY_OBS_GROW;
1618    
1619  case 74:  case 74:
1620  YY_RULE_SETUP  YY_RULE_SETUP
1621  #line 368 "scan-gram.l"  #line 367 "scan-gram.l"
1622  {  {
1623      YY_OBS_GROW;      YY_OBS_GROW;
1624      assert (yy_top_state () != INITIAL);      assert (yy_top_state () != INITIAL);
# Line 1628  YY_RULE_SETUP Line 1627  YY_RULE_SETUP
1627          YY_BREAK          YY_BREAK
1628  case 75:  case 75:
1629  YY_RULE_SETUP  YY_RULE_SETUP
1630  #line 374 "scan-gram.l"  #line 373 "scan-gram.l"
1631  YY_OBS_GROW;  YY_OBS_GROW;
1632          YY_BREAK          YY_BREAK
1633  case 76:  case 76:
1634  YY_RULE_SETUP  YY_RULE_SETUP
1635  #line 375 "scan-gram.l"  #line 374 "scan-gram.l"
1636  YY_OBS_GROW;  YY_OBS_GROW;
1637          YY_BREAK          YY_BREAK
1638  /* FLex wants this rule, in case of a `\<<EOF>>'. */  /* FLex wants this rule, in case of a `\<<EOF>>'. */
1639  case 77:  case 77:
1640  YY_RULE_SETUP  YY_RULE_SETUP
1641  #line 377 "scan-gram.l"  #line 376 "scan-gram.l"
1642  YY_OBS_GROW;  YY_OBS_GROW;
1643          YY_BREAK          YY_BREAK
1644  case 78:  case 78:
1645  YY_RULE_SETUP  YY_RULE_SETUP
1646  #line 379 "scan-gram.l"  #line 378 "scan-gram.l"
1647  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1648          YY_BREAK          YY_BREAK
1649  case YY_STATE_EOF(SC_CHARACTER):  case YY_STATE_EOF(SC_CHARACTER):
1650  #line 381 "scan-gram.l"  #line 380 "scan-gram.l"
1651  {  {
1652      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1653      fprintf (stderr, ": unexpected end of file in a character\n");      fprintf (stderr, ": unexpected end of file in a character\n");
# Line 1665  case YY_STATE_EOF(SC_CHARACTER): Line 1664  case YY_STATE_EOF(SC_CHARACTER):
1664    
1665  case 79:  case 79:
1666  YY_RULE_SETUP  YY_RULE_SETUP
1667  #line 397 "scan-gram.l"  #line 396 "scan-gram.l"
1668  {  {
1669      assert (yy_top_state () != INITIAL);      assert (yy_top_state () != INITIAL);
1670      YY_OBS_GROW;      YY_OBS_GROW;
# Line 1674  YY_RULE_SETUP Line 1673  YY_RULE_SETUP
1673          YY_BREAK          YY_BREAK
1674  case 80:  case 80:
1675  YY_RULE_SETUP  YY_RULE_SETUP
1676  #line 403 "scan-gram.l"  #line 402 "scan-gram.l"
1677  YY_OBS_GROW;  YY_OBS_GROW;
1678          YY_BREAK          YY_BREAK
1679  case 81:  case 81:
1680  YY_RULE_SETUP  YY_RULE_SETUP
1681  #line 404 "scan-gram.l"  #line 403 "scan-gram.l"
1682  YY_OBS_GROW;  YY_OBS_GROW;
1683          YY_BREAK          YY_BREAK
1684  /* FLex wants this rule, in case of a `\<<EOF>>'. */  /* FLex wants this rule, in case of a `\<<EOF>>'. */
1685  case 82:  case 82:
1686  YY_RULE_SETUP  YY_RULE_SETUP
1687  #line 406 "scan-gram.l"  #line 405 "scan-gram.l"
1688  YY_OBS_GROW;  YY_OBS_GROW;
1689          YY_BREAK          YY_BREAK
1690  case 83:  case 83:
1691  YY_RULE_SETUP  YY_RULE_SETUP
1692  #line 408 "scan-gram.l"  #line 407 "scan-gram.l"
1693  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1694          YY_BREAK          YY_BREAK
1695  case YY_STATE_EOF(SC_STRING):  case YY_STATE_EOF(SC_STRING):
1696  #line 410 "scan-gram.l"  #line 409 "scan-gram.l"
1697  {  {
1698      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1699      fprintf (stderr, ": unexpected end of file in a string\n");      fprintf (stderr, ": unexpected end of file in a string\n");
# Line 1711  case YY_STATE_EOF(SC_STRING): Line 1710  case YY_STATE_EOF(SC_STRING):
1710  /* Characters.  We don't check there is only one.  */  /* Characters.  We don't check there is only one.  */
1711  case 84:  case 84:
1712  YY_RULE_SETUP  YY_RULE_SETUP
1713  #line 426 "scan-gram.l"  #line 425 "scan-gram.l"
1714  YY_OBS_GROW; yy_push_state (SC_CHARACTER);  YY_OBS_GROW; yy_push_state (SC_CHARACTER);
1715          YY_BREAK          YY_BREAK
1716  /* Strings. */  /* Strings. */
1717  case 85:  case 85:
1718  YY_RULE_SETUP  YY_RULE_SETUP
1719  #line 429 "scan-gram.l"  #line 428 "scan-gram.l"
1720  YY_OBS_GROW; yy_push_state (SC_STRING);  YY_OBS_GROW; yy_push_state (SC_STRING);
1721          YY_BREAK          YY_BREAK
1722  /* Comments. */  /* Comments. */
1723  case 86:  case 86:
1724  YY_RULE_SETUP  YY_RULE_SETUP
1725  #line 432 "scan-gram.l"  #line 431 "scan-gram.l"
1726  YY_OBS_GROW; yy_push_state (SC_COMMENT);  YY_OBS_GROW; yy_push_state (SC_COMMENT);
1727          YY_BREAK          YY_BREAK
1728  case 87:  case 87:
1729  YY_RULE_SETUP  YY_RULE_SETUP
1730  #line 433 "scan-gram.l"  #line 432 "scan-gram.l"
1731  YY_OBS_GROW;  YY_OBS_GROW;
1732          YY_BREAK          YY_BREAK
1733  /* Not comments. */  /* Not comments. */
1734  case 88:  case 88:
1735  YY_RULE_SETUP  YY_RULE_SETUP
1736  #line 436 "scan-gram.l"  #line 435 "scan-gram.l"
1737  YY_OBS_GROW;  YY_OBS_GROW;
1738          YY_BREAK          YY_BREAK
1739    
# Line 1746  YY_OBS_GROW; Line 1745  YY_OBS_GROW;
1745    
1746  case 89:  case 89:
1747  YY_RULE_SETUP  YY_RULE_SETUP
1748  #line 447 "scan-gram.l"  #line 446 "scan-gram.l"
1749  {  {
1750      YY_OBS_GROW;      YY_OBS_GROW;
1751      if (--braces_level == 0)      if (--braces_level == 0)
# Line 1760  YY_RULE_SETUP Line 1759  YY_RULE_SETUP
1759          YY_BREAK          YY_BREAK
1760  case 90:  case 90:
1761  YY_RULE_SETUP  YY_RULE_SETUP
1762  #line 458 "scan-gram.l"  #line 457 "scan-gram.l"
1763  YY_OBS_GROW; braces_level++;  YY_OBS_GROW; braces_level++;
1764          YY_BREAK          YY_BREAK
1765  case 91:  case 91:
1766  YY_RULE_SETUP  YY_RULE_SETUP
1767  #line 460 "scan-gram.l"  #line 459 "scan-gram.l"
1768  { handle_dollar (current_braced_code,  { handle_dollar (current_braced_code,
1769                                                     yytext, *yylloc); }                                                     yytext, *yylloc); }
1770          YY_BREAK          YY_BREAK
1771  case 92:  case 92:
1772  YY_RULE_SETUP  YY_RULE_SETUP
1773  #line 462 "scan-gram.l"  #line 461 "scan-gram.l"
1774  { handle_at (current_braced_code,  { handle_at (current_braced_code,
1775                                                 yytext, *yylloc); }                                                 yytext, *yylloc); }
1776          YY_BREAK          YY_BREAK
1777  case 93:  case 93:
1778  YY_RULE_SETUP  YY_RULE_SETUP
1779  #line 465 "scan-gram.l"  #line 464 "scan-gram.l"
1780  YY_OBS_GROW;  YY_OBS_GROW;
1781          YY_BREAK          YY_BREAK
1782  case 94:  case 94:
1783  YY_RULE_SETUP  YY_RULE_SETUP
1784  #line 466 "scan-gram.l"  #line 465 "scan-gram.l"
1785  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1786          YY_BREAK          YY_BREAK
1787  /* A lose $, or /, or etc. */  /* A lose $, or /, or etc. */
1788  case 95:  case 95:
1789  YY_RULE_SETUP  YY_RULE_SETUP
1790  #line 469 "scan-gram.l"  #line 468 "scan-gram.l"
1791  YY_OBS_GROW;  YY_OBS_GROW;
1792          YY_BREAK          YY_BREAK
1793  case YY_STATE_EOF(SC_BRACED_CODE):  case YY_STATE_EOF(SC_BRACED_CODE):
1794  #line 471 "scan-gram.l"  #line 470 "scan-gram.l"
1795  {  {
1796      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1797      fprintf (stderr, ": unexpected end of file in a braced code\n");      fprintf (stderr, ": unexpected end of file in a braced code\n");
# Line 1810  case YY_STATE_EOF(SC_BRACED_CODE): Line 1809  case YY_STATE_EOF(SC_BRACED_CODE):
1809    
1810  case 96:  case 96:
1811  YY_RULE_SETUP  YY_RULE_SETUP
1812  #line 489 "scan-gram.l"  #line 488 "scan-gram.l"
1813  {  {
1814      yy_pop_state ();      yy_pop_state ();
1815      YY_OBS_FINISH;      YY_OBS_FINISH;
# Line 1820  YY_RULE_SETUP Line 1819  YY_RULE_SETUP
1819          YY_BREAK          YY_BREAK
1820  case 97:  case 97:
1821  YY_RULE_SETUP  YY_RULE_SETUP
1822  #line 496 "scan-gram.l"  #line 495 "scan-gram.l"
1823  YY_OBS_GROW;  YY_OBS_GROW;
1824          YY_BREAK          YY_BREAK
1825  case 98:  case 98:
1826  YY_RULE_SETUP  YY_RULE_SETUP
1827  #line 497 "scan-gram.l"  #line 496 "scan-gram.l"
1828  YY_OBS_GROW;  YY_OBS_GROW;
1829          YY_BREAK          YY_BREAK
1830  case 99:  case 99:
1831  YY_RULE_SETUP  YY_RULE_SETUP
1832  #line 498 "scan-gram.l"  #line 497 "scan-gram.l"
1833  YY_OBS_GROW; YY_LINES;  YY_OBS_GROW; YY_LINES;
1834          YY_BREAK          YY_BREAK
1835  case YY_STATE_EOF(SC_PROLOGUE):  case YY_STATE_EOF(SC_PROLOGUE):
1836  #line 500 "scan-gram.l"  #line 499 "scan-gram.l"
1837  {  {
1838      LOCATION_PRINT (stderr, *yylloc);      LOCATION_PRINT (stderr, *yylloc);
1839      fprintf (stderr, ": unexpected end of file in a prologue\n");      fprintf (stderr, ": unexpected end of file in a prologue\n");
# Line 1853  case YY_STATE_EOF(SC_PROLOGUE): Line 1852  case YY_STATE_EOF(SC_PROLOGUE):
1852    
1853  case 100:  case 100:
1854  YY_RULE_SETUP  YY_RULE_SETUP
1855  #line 518 "scan-gram.l"  #line 517 "scan-gram.l"
1856  YY_OBS_GROW;  YY_OBS_GROW;
1857          YY_BREAK          YY_BREAK
1858  case YY_STATE_EOF(SC_EPILOGUE):  case YY_STATE_EOF(SC_EPILOGUE):
1859  #line 520 "scan-gram.l"  #line 519 "scan-gram.l"
1860  {  {
1861      yy_pop_state ();      yy_pop_state ();
1862      YY_OBS_FINISH;      YY_OBS_FINISH;
# Line 1868  case YY_STATE_EOF(SC_EPILOGUE): Line 1867  case YY_STATE_EOF(SC_EPILOGUE):
1867    
1868  case 101:  case 101:
1869  YY_RULE_SETUP  YY_RULE_SETUP
1870  #line 529 "scan-gram.l"  #line 528 "scan-gram.l"
1871  YY_FATAL_ERROR( "flex scanner jammed" );  YY_FATAL_ERROR( "flex scanner jammed" );
1872          YY_BREAK          YY_BREAK
1873  #line 1875 "lex.yy.c"  #line 1874 "lex.yy.c"
1874  case YY_STATE_EOF(INITIAL):  case YY_STATE_EOF(INITIAL):
1875          yyterminate();          yyterminate();
1876    
# Line 2761  int main() Line 2760  int main()
2760          return 0;          return 0;
2761          }          }
2762  #endif  #endif
2763  #line 529 "scan-gram.l"  #line 528 "scan-gram.l"
2764    
2765    
2766  /*------------------------------------------------------------------.  /*------------------------------------------------------------------.
# Line 2967  void Line 2966  void
2966  scanner_free (void)  scanner_free (void)
2967  {  {
2968    obstack_free (&string_obstack, 0);    obstack_free (&string_obstack, 0);
2969      /* Reclaim Flex's buffers.  */
2970      yy_delete_buffer (YY_CURRENT_BUFFER);
2971  }  }

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

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