diff options
Diffstat (limited to 'Build/source/texk/web2c/web2c/web2c-lexer.c')
-rw-r--r-- | Build/source/texk/web2c/web2c/web2c-lexer.c | 557 |
1 files changed, 282 insertions, 275 deletions
diff --git a/Build/source/texk/web2c/web2c/web2c-lexer.c b/Build/source/texk/web2c/web2c/web2c-lexer.c index 215d01c89f6..22f00ed1d81 100644 --- a/Build/source/texk/web2c/web2c/web2c-lexer.c +++ b/Build/source/texk/web2c/web2c/web2c-lexer.c @@ -378,8 +378,8 @@ static void yy_fatal_error (yyconst char msg[] ); (yy_more_offset) = 0; \ (yy_c_buf_p) = yy_cp; -#define YY_NUM_RULES 73 -#define YY_END_OF_BUFFER 74 +#define YY_NUM_RULES 74 +#define YY_END_OF_BUFFER 75 /* This struct is not used in this scanner, but its presence is necessary. */ struct yy_trans_info @@ -387,46 +387,46 @@ struct yy_trans_info flex_int32_t yy_verify; flex_int32_t yy_nxt; }; -static yyconst flex_int16_t yy_acclist[312] = +static yyconst flex_int16_t yy_acclist[319] = { 0, - 74, 72, 73, 1, 72, 73, 1, 73, 3, 72, - 73, 72, 73, 60, 72, 73, 61, 72, 73, 52, - 72, 73, 50, 72, 73, 67, 72, 73, 51, 72, - 73, 66, 72, 73, 53, 72, 73, 47, 72, 73, - 69, 72, 73, 68, 72, 73, 56, 72, 73, 54, - 72, 73, 57, 72, 73, 72, 73, 71, 72, 73, - 62, 72, 73, 63, 72, 73, 70, 72, 73, 71, - 72, 73, 71, 72, 73, 71, 72, 73, 71, 72, - 73, 71, 72, 73, 71, 72, 73, 71, 72, 73, - 71, 72, 73, 71, 72, 73, 71, 72, 73, 71, - - 72, 73, 71, 72, 73, 71, 72, 73, 71, 72, - 73, 71, 72, 73, 71, 72, 73, 71, 72, 73, - 71, 72, 73, 71, 72, 73, 2, 72, 73, 1, - 49, 65, 47, 64, 58, 55, 59, 71, 71, 71, - 71, 71, 71, 71, 71, 19, 71, 71, 71, 71, - 71, 71, 71, 71, 27, 71, 71, 71, 71, 31, - 71, 32, 71, 71, 71, 71, 71, 71, 40, 71, - 71, 71, 71, 71, 48, 49, 46, 46, 12, 71, - 71, 71, 71, 71, 71, 17, 71, 71, 71, 22, - 71, 71, 24, 71, 71, 71, 71, 71, 71, 71, - - 29, 71, 30, 71, 71, 71, 71, 71, 71, 71, - 71, 71, 43, 71, 71, 49, 71, 71, 71, 15, - 71, 71, 71, 21, 71, 71, 23, 71, 71, 26, - 71, 71, 71, 71, 71, 71, 71, 71, 71, 71, - 71, 39, 71, 41, 71, 71, 71, 46, 13, 71, - 14, 71, 18, 71, 16, 71, 71, 71, 71, 37, - 38, 71, 71, 71, 28, 71, 71, 71, 71, 71, - 71, 71, 42, 71, 44, 71, 11, 20, 71, 5, - 71, 71, 71, 4, 71, 45, 71, 71, 71, 71, - 35, 71, 36, 71, 10, 7, 71, 71, 6, 1, - - 71, 34, 71, 25, 71, 71, 71, 33, 71, 9, - 8 + 75, 73, 74, 1, 73, 74, 1, 74, 3, 73, + 74, 73, 74, 61, 73, 74, 62, 73, 74, 53, + 73, 74, 51, 73, 74, 68, 73, 74, 52, 73, + 74, 67, 73, 74, 54, 73, 74, 48, 73, 74, + 70, 73, 74, 69, 73, 74, 57, 73, 74, 55, + 73, 74, 58, 73, 74, 73, 74, 72, 73, 74, + 63, 73, 74, 64, 73, 74, 71, 73, 74, 72, + 73, 74, 72, 73, 74, 72, 73, 74, 72, 73, + 74, 72, 73, 74, 72, 73, 74, 72, 73, 74, + 72, 73, 74, 72, 73, 74, 72, 73, 74, 72, + + 73, 74, 72, 73, 74, 72, 73, 74, 72, 73, + 74, 72, 73, 74, 72, 73, 74, 72, 73, 74, + 72, 73, 74, 72, 73, 74, 2, 73, 74, 1, + 50, 66, 48, 65, 59, 56, 60, 72, 72, 72, + 72, 72, 72, 72, 72, 19, 72, 72, 72, 72, + 72, 72, 72, 72, 27, 72, 72, 72, 72, 32, + 72, 33, 72, 72, 72, 72, 72, 72, 41, 72, + 72, 72, 72, 72, 49, 50, 47, 47, 12, 72, + 72, 72, 72, 72, 72, 17, 72, 72, 72, 22, + 72, 72, 24, 72, 72, 72, 72, 72, 72, 72, + + 29, 72, 72, 31, 72, 72, 72, 72, 72, 72, + 72, 72, 72, 44, 72, 72, 50, 72, 72, 72, + 15, 72, 72, 72, 21, 72, 72, 23, 72, 72, + 26, 72, 72, 72, 72, 72, 72, 72, 72, 72, + 72, 72, 72, 40, 72, 42, 72, 72, 72, 47, + 13, 72, 14, 72, 18, 72, 16, 72, 72, 72, + 72, 38, 39, 72, 72, 72, 28, 72, 72, 72, + 72, 72, 72, 72, 72, 43, 72, 45, 72, 11, + 20, 72, 5, 72, 72, 72, 4, 72, 72, 46, + 72, 72, 72, 72, 36, 72, 37, 72, 10, 7, + + 72, 72, 6, 72, 1, 72, 35, 72, 25, 72, + 72, 30, 72, 72, 34, 72, 9, 8 } ; -static yyconst flex_int16_t yy_accept[273] = +static yyconst flex_int16_t yy_accept[279] = { 0, 1, 1, 1, 2, 4, 7, 9, 12, 14, 17, 20, 23, 26, 29, 32, 35, 38, 41, 44, 47, @@ -441,23 +441,23 @@ static yyconst flex_int16_t yy_accept[273] = 179, 179, 181, 182, 183, 184, 185, 186, 188, 189, 190, 192, 193, 195, 196, 197, 197, 197, 197, 198, - 198, 199, 200, 201, 203, 205, 206, 207, 208, 209, - 210, 211, 212, 213, 215, 216, 216, 217, 217, 217, - 217, 218, 219, 220, 222, 223, 224, 226, 227, 229, - 230, 232, 232, 232, 232, 232, 232, 232, 232, 233, - 233, 233, 234, 235, 236, 237, 238, 239, 240, 241, - 242, 244, 246, 247, 248, 248, 248, 249, 249, 249, - 251, 253, 255, 257, 258, 259, 260, 260, 260, 260, - 260, 261, 262, 262, 262, 262, 263, 264, 265, 267, - - 268, 269, 270, 271, 272, 273, 275, 277, 277, 277, - 278, 280, 281, 282, 283, 283, 283, 283, 283, 284, - 285, 286, 288, 289, 290, 291, 293, 295, 295, 296, - 297, 298, 298, 298, 299, 300, 301, 302, 304, 306, - 306, 306, 307, 308, 308, 308, 308, 310, 310, 310, - 310, 310, 310, 310, 310, 310, 310, 310, 310, 310, - 310, 310, 310, 310, 310, 310, 310, 310, 311, 311, - 312, 312 + 198, 199, 200, 201, 203, 204, 206, 207, 208, 209, + 210, 211, 212, 213, 214, 216, 217, 217, 218, 218, + 218, 218, 219, 220, 221, 223, 224, 225, 227, 228, + 230, 231, 233, 233, 233, 233, 233, 233, 233, 233, + 234, 234, 234, 235, 236, 237, 238, 239, 240, 241, + 242, 243, 244, 246, 248, 249, 250, 250, 250, 251, + 251, 251, 253, 255, 257, 259, 260, 261, 262, 262, + 262, 262, 262, 263, 264, 264, 264, 264, 265, 266, + + 267, 269, 270, 271, 272, 273, 274, 275, 276, 278, + 280, 280, 280, 281, 283, 284, 285, 286, 286, 286, + 286, 286, 287, 288, 289, 290, 292, 293, 294, 295, + 297, 299, 299, 300, 301, 302, 302, 302, 303, 304, + 305, 306, 307, 309, 311, 311, 311, 312, 314, 315, + 315, 315, 315, 317, 317, 317, 317, 317, 317, 317, + 317, 317, 317, 317, 317, 317, 317, 317, 317, 317, + 317, 317, 317, 317, 318, 318, 319, 319 } ; static yyconst flex_int32_t yy_ec[256] = @@ -502,75 +502,77 @@ static yyconst flex_int32_t yy_meta[54] = 4, 1, 1 } ; -static yyconst flex_int16_t yy_base[281] = +static yyconst flex_int16_t yy_base[287] = { 0, - 0, 0, 397, 398, 52, 55, 398, 390, 398, 398, - 398, 398, 398, 398, 382, 398, 47, 373, 398, 44, - 398, 372, 35, 0, 398, 398, 398, 26, 28, 41, - 35, 34, 38, 349, 355, 356, 360, 345, 344, 43, - 50, 353, 46, 343, 355, 347, 398, 89, 353, 375, - 374, 398, 85, 90, 98, 398, 398, 398, 398, 346, - 341, 0, 345, 331, 340, 341, 327, 330, 322, 320, - 323, 336, 327, 321, 323, 317, 114, 62, 333, 330, - 314, 0, 0, 324, 328, 315, 54, 324, 0, 312, - 308, 309, 316, 321, 345, 344, 109, 113, 119, 315, - - 315, 0, 318, 309, 316, 311, 297, 0, 300, 308, - 303, 306, 0, 307, 294, 136, 327, 143, 306, 281, - 300, 300, 298, 0, 0, 297, 290, 52, 285, 294, - 284, 292, 287, 0, 283, 283, 315, 144, 283, 279, - 267, 275, 277, 0, 268, 267, 0, 279, 0, 265, - 0, 282, 301, 160, 300, 96, 279, 254, 275, 252, - 172, 270, 270, 262, 256, 267, 266, 253, 252, 267, - 0, 0, 255, 261, 260, 136, 153, 250, 259, 0, - 0, 0, 0, 247, 102, 252, 257, 278, 278, 276, - 398, 398, 253, 230, 179, 243, 274, 246, 0, 233, - - 246, 245, 247, 243, 226, 0, 0, 212, 210, 398, - 0, 398, 235, 198, 201, 230, 230, 197, 202, 398, - 227, 0, 226, 181, 186, 0, 0, 222, 398, 398, - 183, 189, 188, 188, 398, 189, 174, 0, 214, 185, - 179, 206, 175, 0, 199, 195, 190, 170, 0, 194, - 165, 198, 135, 203, 132, 211, 129, 121, 120, 128, - 105, 103, 112, 105, 87, 112, 90, 398, 101, 398, - 398, 245, 247, 251, 255, 259, 263, 267, 270, 115 + 0, 0, 403, 404, 52, 55, 404, 396, 404, 404, + 404, 404, 404, 404, 388, 404, 47, 379, 404, 44, + 404, 378, 35, 0, 404, 404, 404, 26, 28, 41, + 35, 34, 38, 355, 361, 362, 366, 351, 350, 43, + 50, 359, 46, 349, 361, 353, 404, 89, 359, 381, + 380, 404, 85, 90, 98, 404, 404, 404, 404, 352, + 347, 0, 351, 337, 346, 347, 333, 336, 328, 326, + 329, 342, 333, 327, 329, 323, 114, 62, 339, 336, + 38, 0, 0, 331, 335, 322, 67, 331, 0, 319, + 315, 316, 323, 328, 352, 351, 109, 113, 119, 322, + + 322, 0, 325, 316, 323, 318, 304, 0, 307, 315, + 310, 313, 0, 314, 301, 136, 334, 143, 313, 288, + 307, 307, 305, 0, 304, 0, 303, 296, 106, 291, + 300, 290, 298, 293, 0, 289, 289, 321, 144, 289, + 285, 273, 281, 283, 0, 274, 273, 0, 285, 0, + 271, 0, 288, 307, 160, 306, 104, 285, 260, 281, + 258, 172, 276, 276, 268, 260, 261, 272, 271, 258, + 257, 272, 0, 0, 260, 266, 265, 136, 153, 255, + 264, 0, 0, 0, 0, 252, 80, 257, 262, 283, + 283, 281, 404, 404, 258, 235, 179, 248, 279, 251, + + 0, 236, 237, 250, 249, 251, 247, 231, 0, 0, + 245, 243, 404, 0, 404, 268, 230, 205, 234, 234, + 202, 207, 404, 232, 193, 0, 232, 187, 193, 0, + 0, 226, 404, 404, 187, 194, 193, 193, 404, 180, + 189, 176, 0, 216, 187, 186, 213, 0, 178, 0, + 206, 204, 199, 180, 0, 194, 175, 198, 146, 203, + 139, 211, 135, 127, 127, 142, 115, 112, 126, 116, + 99, 113, 99, 404, 93, 404, 404, 245, 247, 251, + 255, 259, 263, 267, 270, 105 } ; -static yyconst flex_int16_t yy_def[281] = +static yyconst flex_int16_t yy_def[287] = { 0, - 271, 1, 271, 271, 271, 271, 271, 272, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 273, 271, 271, 271, 273, 273, 273, - 273, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 273, 273, 273, 271, 271, 271, 274, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 271, 274, 271, 271, 271, 271, 271, - - 271, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 273, 273, 271, 271, 271, 273, 275, - 273, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 273, 273, 271, 271, 271, 271, 271, - 273, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 271, 276, 271, 271, 271, 271, 277, 273, 275, - 271, 273, 273, 273, 273, 273, 273, 273, 273, 273, - 273, 273, 273, 273, 271, 271, 271, 271, 271, 273, - 273, 273, 273, 273, 273, 273, 271, 276, 276, 278, - 271, 271, 271, 277, 271, 273, 273, 273, 273, 273, - - 273, 273, 273, 273, 273, 273, 273, 271, 271, 271, - 273, 271, 273, 273, 271, 278, 278, 271, 273, 271, - 273, 273, 273, 273, 273, 273, 273, 271, 271, 271, - 273, 271, 271, 273, 271, 271, 273, 273, 273, 271, - 271, 273, 273, 279, 271, 271, 273, 279, 280, 271, - 280, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 0, 271, 271, 271, 271, 271, 271, 271, 271, 271 + 277, 1, 277, 277, 277, 277, 277, 278, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 279, 277, 277, 277, 279, 279, 279, + 279, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 279, 279, 279, 277, 277, 277, 280, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 277, 280, 277, 277, 277, 277, 277, + + 277, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 279, 279, 277, 277, 277, 279, 281, + 279, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 279, 279, 279, 277, 277, 277, 277, + 277, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 277, 282, 277, 277, 277, 277, 283, 279, + 281, 277, 279, 279, 279, 279, 279, 279, 279, 279, + 279, 279, 279, 279, 279, 279, 277, 277, 277, 277, + 277, 279, 279, 279, 279, 279, 279, 279, 277, 282, + 282, 284, 277, 277, 277, 283, 277, 279, 279, 279, + + 279, 279, 279, 279, 279, 279, 279, 279, 279, 279, + 277, 277, 277, 279, 277, 279, 279, 277, 284, 284, + 277, 279, 277, 279, 279, 279, 279, 279, 279, 279, + 279, 277, 277, 277, 279, 277, 277, 279, 277, 279, + 277, 279, 279, 279, 277, 277, 279, 279, 279, 285, + 277, 277, 279, 285, 286, 277, 286, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 0, 277, 277, 277, + 277, 277, 277, 277, 277, 277 } ; -static yyconst flex_int16_t yy_nxt[452] = +static yyconst flex_int16_t yy_nxt[458] = { 0, 4, 5, 6, 5, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 17, 17, 18, 19, 20, @@ -580,51 +582,51 @@ static yyconst flex_int16_t yy_nxt[452] = 24, 47, 4, 48, 48, 48, 48, 48, 48, 53, 65, 54, 54, 54, 57, 58, 60, 63, 61, 67, 64, 69, 66, 71, 73, 72, 82, 70, 85, 55, - 74, 88, 167, 68, 129, 75, 168, 83, 89, 84, + 74, 88, 125, 68, 126, 75, 215, 83, 89, 84, 48, 48, 48, 121, 86, 49, 90, 130, 49, 97, - 97, 97, 53, 122, 54, 54, 54, 98, 212, 98, - 191, 192, 99, 99, 99, 116, 116, 116, 251, 270, - 117, 269, 55, 97, 97, 97, 118, 99, 99, 99, - 268, 267, 49, 99, 99, 99, 266, 116, 116, 116, - 265, 138, 117, 213, 154, 154, 154, 264, 118, 155, - 177, 177, 177, 176, 263, 176, 262, 119, 177, 177, - 177, 154, 154, 154, 261, 120, 155, 177, 177, 177, - 260, 259, 156, 116, 116, 116, 258, 255, 117, 152, - 154, 154, 154, 254, 118, 155, 157, 120, 250, 156, - 48, 48, 48, 249, 158, 252, 252, 252, 195, 252, - - 252, 252, 161, 157, 256, 256, 256, 247, 156, 161, - 246, 158, 256, 256, 256, 152, 245, 244, 243, 242, - 241, 240, 157, 120, 239, 236, 238, 253, 237, 236, - 158, 253, 49, 235, 234, 233, 257, 195, 217, 232, - 231, 230, 229, 228, 257, 50, 50, 50, 50, 62, - 62, 95, 95, 95, 95, 160, 160, 160, 160, 188, - 188, 188, 188, 194, 194, 194, 194, 216, 216, 216, - 216, 248, 227, 248, 226, 225, 224, 223, 222, 221, - 220, 219, 195, 218, 217, 161, 189, 215, 214, 211, - 210, 209, 208, 207, 206, 205, 204, 203, 202, 201, - - 200, 199, 198, 197, 161, 196, 195, 193, 190, 189, - 187, 186, 185, 184, 183, 182, 181, 180, 179, 178, - 95, 175, 174, 173, 172, 171, 170, 169, 166, 165, - 164, 163, 162, 161, 159, 153, 151, 150, 149, 148, - 147, 146, 145, 144, 143, 142, 141, 140, 139, 95, - 137, 136, 135, 134, 133, 132, 131, 128, 127, 126, - 125, 124, 123, 115, 114, 113, 112, 111, 110, 109, - 108, 107, 106, 105, 104, 103, 102, 101, 100, 50, - 96, 94, 93, 92, 91, 87, 81, 80, 79, 78, - 77, 76, 59, 56, 52, 51, 271, 3, 271, 271, - - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271 + 97, 97, 53, 122, 54, 54, 54, 98, 257, 98, + 131, 276, 99, 99, 99, 116, 116, 116, 193, 194, + 117, 216, 55, 97, 97, 97, 118, 99, 99, 99, + 275, 274, 49, 99, 99, 99, 169, 116, 116, 116, + 170, 139, 117, 273, 155, 155, 155, 272, 118, 156, + 179, 179, 179, 178, 271, 178, 270, 119, 179, 179, + 179, 155, 155, 155, 269, 120, 156, 179, 179, 179, + 268, 267, 157, 116, 116, 116, 266, 265, 117, 153, + 155, 155, 155, 264, 118, 156, 158, 120, 261, 157, + 48, 48, 48, 260, 159, 258, 258, 258, 256, 258, + + 258, 258, 255, 158, 262, 262, 262, 197, 157, 162, + 253, 159, 262, 262, 262, 153, 162, 252, 251, 250, + 249, 248, 158, 120, 247, 246, 245, 259, 244, 241, + 159, 259, 49, 243, 242, 241, 263, 240, 239, 238, + 237, 197, 220, 236, 263, 50, 50, 50, 50, 62, + 62, 95, 95, 95, 95, 161, 161, 161, 161, 190, + 190, 190, 190, 196, 196, 196, 196, 219, 219, 219, + 219, 254, 235, 254, 234, 233, 232, 231, 230, 229, + 228, 227, 226, 225, 224, 223, 222, 197, 221, 220, + 162, 191, 218, 217, 214, 213, 212, 211, 210, 209, + + 208, 207, 206, 205, 204, 203, 202, 201, 200, 199, + 162, 198, 197, 195, 192, 191, 189, 188, 187, 186, + 185, 184, 183, 182, 181, 180, 95, 177, 176, 175, + 174, 173, 172, 171, 168, 167, 166, 165, 164, 163, + 162, 160, 154, 152, 151, 150, 149, 148, 147, 146, + 145, 144, 143, 142, 141, 140, 95, 138, 137, 136, + 135, 134, 133, 132, 129, 128, 127, 124, 123, 115, + 114, 113, 112, 111, 110, 109, 108, 107, 106, 105, + 104, 103, 102, 101, 100, 50, 96, 94, 93, 92, + 91, 87, 81, 80, 79, 78, 77, 76, 59, 56, + + 52, 51, 277, 3, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277 } ; -static yyconst flex_int16_t yy_chk[452] = +static yyconst flex_int16_t yy_chk[458] = { 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, @@ -634,57 +636,57 @@ static yyconst flex_int16_t yy_chk[452] = 1, 1, 1, 5, 5, 5, 6, 6, 6, 17, 29, 17, 17, 17, 20, 20, 23, 28, 23, 30, 28, 31, 29, 32, 33, 32, 40, 31, 41, 17, - 33, 43, 128, 30, 87, 33, 128, 40, 43, 40, + 33, 43, 81, 30, 81, 33, 187, 40, 43, 40, 48, 48, 48, 78, 41, 5, 43, 87, 6, 53, - 53, 53, 54, 78, 54, 54, 54, 55, 185, 55, - 156, 156, 55, 55, 55, 77, 77, 77, 280, 269, - 77, 267, 54, 97, 97, 97, 77, 98, 98, 98, - 266, 265, 48, 99, 99, 99, 264, 116, 116, 116, - 263, 97, 116, 185, 118, 118, 118, 262, 116, 118, - 176, 176, 176, 138, 261, 138, 260, 77, 138, 138, - 138, 154, 154, 154, 259, 77, 154, 177, 177, 177, - 258, 257, 118, 161, 161, 161, 255, 253, 161, 116, - 195, 195, 195, 251, 161, 195, 118, 116, 248, 154, - 236, 236, 236, 247, 118, 250, 250, 250, 246, 252, - - 252, 252, 245, 154, 254, 254, 254, 243, 195, 242, - 241, 154, 256, 256, 256, 161, 240, 239, 237, 234, - 233, 232, 195, 161, 231, 228, 225, 250, 224, 223, - 195, 252, 236, 221, 219, 218, 254, 217, 216, 215, - 214, 213, 209, 208, 256, 272, 272, 272, 272, 273, - 273, 274, 274, 274, 274, 275, 275, 275, 275, 276, - 276, 276, 276, 277, 277, 277, 277, 278, 278, 278, - 278, 279, 205, 279, 204, 203, 202, 201, 200, 198, - 197, 196, 194, 193, 190, 189, 188, 187, 186, 184, - 179, 178, 175, 174, 173, 170, 169, 168, 167, 166, - - 165, 164, 163, 162, 160, 159, 158, 157, 155, 153, - 152, 150, 148, 146, 145, 143, 142, 141, 140, 139, - 137, 136, 135, 133, 132, 131, 130, 129, 127, 126, - 123, 122, 121, 120, 119, 117, 115, 114, 112, 111, - 110, 109, 107, 106, 105, 104, 103, 101, 100, 96, - 95, 94, 93, 92, 91, 90, 88, 86, 85, 84, - 81, 80, 79, 76, 75, 74, 73, 72, 71, 70, - 69, 68, 67, 66, 65, 64, 63, 61, 60, 51, - 50, 49, 46, 45, 44, 42, 39, 38, 37, 36, - 35, 34, 22, 18, 15, 8, 3, 271, 271, 271, - - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271, 271, 271, 271, 271, 271, 271, 271, 271, 271, - 271 + 53, 53, 54, 78, 54, 54, 54, 55, 286, 55, + 87, 275, 55, 55, 55, 77, 77, 77, 157, 157, + 77, 187, 54, 97, 97, 97, 77, 98, 98, 98, + 273, 272, 48, 99, 99, 99, 129, 116, 116, 116, + 129, 97, 116, 271, 118, 118, 118, 270, 116, 118, + 178, 178, 178, 139, 269, 139, 268, 77, 139, 139, + 139, 155, 155, 155, 267, 77, 155, 179, 179, 179, + 266, 265, 118, 162, 162, 162, 264, 263, 162, 116, + 197, 197, 197, 261, 162, 197, 118, 116, 259, 155, + 241, 241, 241, 257, 118, 256, 256, 256, 254, 258, + + 258, 258, 253, 155, 260, 260, 260, 252, 197, 251, + 249, 155, 262, 262, 262, 162, 247, 246, 245, 244, + 242, 240, 197, 162, 238, 237, 236, 256, 235, 232, + 197, 258, 241, 229, 228, 227, 260, 225, 224, 222, + 221, 220, 219, 218, 262, 278, 278, 278, 278, 279, + 279, 280, 280, 280, 280, 281, 281, 281, 281, 282, + 282, 282, 282, 283, 283, 283, 283, 284, 284, 284, + 284, 285, 217, 285, 216, 212, 211, 208, 207, 206, + 205, 204, 203, 202, 200, 199, 198, 196, 195, 192, + 191, 190, 189, 188, 186, 181, 180, 177, 176, 175, + + 172, 171, 170, 169, 168, 167, 166, 165, 164, 163, + 161, 160, 159, 158, 156, 154, 153, 151, 149, 147, + 146, 144, 143, 142, 141, 140, 138, 137, 136, 134, + 133, 132, 131, 130, 128, 127, 125, 123, 122, 121, + 120, 119, 117, 115, 114, 112, 111, 110, 109, 107, + 106, 105, 104, 103, 101, 100, 96, 95, 94, 93, + 92, 91, 90, 88, 86, 85, 84, 80, 79, 76, + 75, 74, 73, 72, 71, 70, 69, 68, 67, 66, + 65, 64, 63, 61, 60, 51, 50, 49, 46, 45, + 44, 42, 39, 38, 37, 36, 35, 34, 22, 18, + + 15, 8, 3, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277, 277, 277, 277, + 277, 277, 277, 277, 277, 277, 277 } ; /* Table of booleans, true if rule could match eol. */ -static yyconst flex_int32_t yy_rule_can_match_eol[74] = +static yyconst flex_int32_t yy_rule_can_match_eol[75] = { 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; extern int yy_flex_debug; int yy_flex_debug = 0; @@ -718,7 +720,7 @@ char yytext[YYLMAX]; char *yytext_ptr; #line 1 "web2c-lexer.l" #line 2 "web2c-lexer.l" -/* web2c.l -- lexical analysis for Tangle output. Public domain. */ +/* web2c-lexer.l -- lexical analysis for Tangle output. Public domain. */ #include "web2c.h" #include "web2c-parser.h" @@ -749,7 +751,7 @@ yywrap (void) return 1; } #define YY_SKIP_YYWRAP /* not that it matters */ -#line 753 "web2c-lexer.c" +#line 755 "web2c-lexer.c" #define INITIAL 0 @@ -933,7 +935,7 @@ YY_DECL #line 49 "web2c-lexer.l" -#line 937 "web2c-lexer.c" +#line 939 "web2c-lexer.c" if ( !(yy_init) ) { @@ -991,14 +993,14 @@ yy_match: while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 272 ) + if ( yy_current_state >= 278 ) yy_c = yy_meta[(unsigned int) yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; *(yy_state_ptr)++ = yy_current_state; ++yy_cp; } - while ( yy_base[yy_current_state] != 398 ); + while ( yy_base[yy_current_state] != 404 ); yy_find_action: yy_current_state = *--(yy_state_ptr); @@ -1234,118 +1236,123 @@ return last_tok=mod_tok; case 30: YY_RULE_SETUP #line 136 "web2c-lexer.l" -return last_tok=not_tok; +return last_tok=noreturn_tok; YY_BREAK case 31: YY_RULE_SETUP #line 137 "web2c-lexer.l" -return last_tok=of_tok; +return last_tok=not_tok; YY_BREAK case 32: YY_RULE_SETUP #line 138 "web2c-lexer.l" -return last_tok=or_tok; +return last_tok=of_tok; YY_BREAK case 33: YY_RULE_SETUP #line 139 "web2c-lexer.l" -return last_tok=procedure_tok; +return last_tok=or_tok; YY_BREAK case 34: YY_RULE_SETUP #line 140 "web2c-lexer.l" -return last_tok=program_tok; +return last_tok=procedure_tok; YY_BREAK case 35: YY_RULE_SETUP #line 141 "web2c-lexer.l" -return last_tok=record_tok; +return last_tok=program_tok; YY_BREAK case 36: YY_RULE_SETUP #line 142 "web2c-lexer.l" -return last_tok=repeat_tok; +return last_tok=record_tok; YY_BREAK case 37: -/* rule 37 can match eol */ YY_RULE_SETUP #line 143 "web2c-lexer.l" -return last_tok=hhb0_tok; +return last_tok=repeat_tok; YY_BREAK case 38: /* rule 38 can match eol */ YY_RULE_SETUP #line 144 "web2c-lexer.l" -return last_tok=hhb1_tok; +return last_tok=hhb0_tok; YY_BREAK case 39: +/* rule 39 can match eol */ YY_RULE_SETUP #line 145 "web2c-lexer.l" -return last_tok=then_tok; +return last_tok=hhb1_tok; YY_BREAK case 40: YY_RULE_SETUP #line 146 "web2c-lexer.l" -return last_tok=to_tok; +return last_tok=then_tok; YY_BREAK case 41: YY_RULE_SETUP #line 147 "web2c-lexer.l" -return last_tok=type_tok; +return last_tok=to_tok; YY_BREAK case 42: YY_RULE_SETUP #line 148 "web2c-lexer.l" -return last_tok=until_tok; +return last_tok=type_tok; YY_BREAK case 43: YY_RULE_SETUP #line 149 "web2c-lexer.l" -return last_tok=var_tok; +return last_tok=until_tok; YY_BREAK case 44: YY_RULE_SETUP #line 150 "web2c-lexer.l" -return last_tok=while_tok; +return last_tok=var_tok; YY_BREAK case 45: YY_RULE_SETUP #line 151 "web2c-lexer.l" -return last_tok=others_tok; +return last_tok=while_tok; YY_BREAK case 46: YY_RULE_SETUP -#line 153 "web2c-lexer.l" -{ +#line 152 "web2c-lexer.l" +return last_tok=others_tok; + YY_BREAK +case 47: +YY_RULE_SETUP +#line 154 "web2c-lexer.l" +{ sprintf (temp, "%s%s", negbuf, yytext); negbuf[0] = '\0'; return last_tok=r_num_tok; } YY_BREAK -case 47: +case 48: YY_RULE_SETUP -#line 159 "web2c-lexer.l" +#line 160 "web2c-lexer.l" { sprintf (temp, "%s%s", negbuf, yytext); negbuf[0] = '\0'; return last_tok=i_num_tok; } YY_BREAK -case 48: -/* rule 48 can match eol */ +case 49: +/* rule 49 can match eol */ YY_RULE_SETUP -#line 165 "web2c-lexer.l" +#line 166 "web2c-lexer.l" return last_tok=single_char_tok; YY_BREAK -case 49: -/* rule 49 can match eol */ +case 50: +/* rule 50 can match eol */ YY_RULE_SETUP -#line 167 "web2c-lexer.l" +#line 168 "web2c-lexer.l" return last_tok=string_literal_tok; YY_BREAK -case 50: +case 51: YY_RULE_SETUP -#line 169 "web2c-lexer.l" +#line 170 "web2c-lexer.l" { if ((last_tok>=undef_id_tok && last_tok<=field_id_tok) || last_tok==i_num_tok || @@ -1355,9 +1362,9 @@ YY_RULE_SETUP return last_tok='+'; else return last_tok=unary_plus_tok; } YY_BREAK -case 51: +case 52: YY_RULE_SETUP -#line 178 "web2c-lexer.l" +#line 179 "web2c-lexer.l" { if ((last_tok>=undef_id_tok && last_tok<=field_id_tok) || last_tok==i_num_tok || @@ -1369,129 +1376,129 @@ YY_RULE_SETUP int c; while ((c = webinput()) == ' ' || c == '\t') ; - unput(c); + unput(c); if (c < '0' || c > '9') { return last_tok = unary_minus_tok; } negbuf[0] = '-'; }} YY_BREAK -case 52: -YY_RULE_SETUP -#line 196 "web2c-lexer.l" -return last_tok='*'; - YY_BREAK case 53: YY_RULE_SETUP #line 197 "web2c-lexer.l" -return last_tok='/'; +return last_tok='*'; YY_BREAK case 54: YY_RULE_SETUP #line 198 "web2c-lexer.l" -return last_tok='='; +return last_tok='/'; YY_BREAK case 55: YY_RULE_SETUP #line 199 "web2c-lexer.l" -return last_tok=not_eq_tok; +return last_tok='='; YY_BREAK case 56: YY_RULE_SETUP #line 200 "web2c-lexer.l" -return last_tok='<'; +return last_tok=not_eq_tok; YY_BREAK case 57: YY_RULE_SETUP #line 201 "web2c-lexer.l" -return last_tok='>'; +return last_tok='<'; YY_BREAK case 58: YY_RULE_SETUP #line 202 "web2c-lexer.l" -return last_tok=less_eq_tok; +return last_tok='>'; YY_BREAK case 59: YY_RULE_SETUP #line 203 "web2c-lexer.l" -return last_tok=great_eq_tok; +return last_tok=less_eq_tok; YY_BREAK case 60: YY_RULE_SETUP #line 204 "web2c-lexer.l" -return last_tok='('; +return last_tok=great_eq_tok; YY_BREAK case 61: YY_RULE_SETUP #line 205 "web2c-lexer.l" -return last_tok=')'; +return last_tok='('; YY_BREAK case 62: YY_RULE_SETUP #line 206 "web2c-lexer.l" -return last_tok='['; +return last_tok=')'; YY_BREAK case 63: YY_RULE_SETUP #line 207 "web2c-lexer.l" -return last_tok=']'; +return last_tok='['; YY_BREAK case 64: YY_RULE_SETUP #line 208 "web2c-lexer.l" -return last_tok=assign_tok; +return last_tok=']'; YY_BREAK case 65: YY_RULE_SETUP #line 209 "web2c-lexer.l" -return last_tok=two_dots_tok; +return last_tok=assign_tok; YY_BREAK case 66: YY_RULE_SETUP #line 210 "web2c-lexer.l" -return last_tok='.'; +return last_tok=two_dots_tok; YY_BREAK case 67: YY_RULE_SETUP #line 211 "web2c-lexer.l" -return last_tok=','; +return last_tok='.'; YY_BREAK case 68: YY_RULE_SETUP #line 212 "web2c-lexer.l" -return last_tok=';'; +return last_tok=','; YY_BREAK case 69: YY_RULE_SETUP #line 213 "web2c-lexer.l" -return last_tok=':'; +return last_tok=';'; YY_BREAK case 70: YY_RULE_SETUP #line 214 "web2c-lexer.l" -return last_tok='^'; +return last_tok=':'; YY_BREAK case 71: YY_RULE_SETUP -#line 216 "web2c-lexer.l" +#line 215 "web2c-lexer.l" +return last_tok='^'; + YY_BREAK +case 72: +YY_RULE_SETUP +#line 217 "web2c-lexer.l" { strcpy (last_id, yytext); l_s = search_table (last_id); return last_tok = (l_s == -1 ? undef_id_tok : sym_table[l_s].typ); } YY_BREAK -case 72: +case 73: YY_RULE_SETUP -#line 223 "web2c-lexer.l" +#line 224 "web2c-lexer.l" { /* Any bizarre token will do. */ return last_tok = two_dots_tok; } YY_BREAK -case 73: +case 74: YY_RULE_SETUP -#line 225 "web2c-lexer.l" +#line 226 "web2c-lexer.l" ECHO; YY_BREAK -#line 1495 "web2c-lexer.c" +#line 1502 "web2c-lexer.c" case YY_STATE_EOF(INITIAL): yyterminate(); @@ -1752,7 +1759,7 @@ static int yy_get_next_buffer (void) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 272 ) + if ( yy_current_state >= 278 ) yy_c = yy_meta[(unsigned int) yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; @@ -1775,11 +1782,11 @@ static int yy_get_next_buffer (void) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 272 ) + if ( yy_current_state >= 278 ) yy_c = yy_meta[(unsigned int) yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - yy_is_jam = (yy_current_state == 271); + yy_is_jam = (yy_current_state == 277); if ( ! yy_is_jam ) *(yy_state_ptr)++ = yy_current_state; @@ -2475,7 +2482,7 @@ void yyfree (void * ptr ) #define YYTABLES_NAME "yytables" -#line 225 "web2c-lexer.l" +#line 226 "web2c-lexer.l" /* Some helper routines. Defining these here means we don't have references @@ -2525,7 +2532,7 @@ get_result_type (char *s) bad status. */ int -yyerror (string s) +yyerror (const_string s) { /* This is so the convert script can delete the output file on error. */ puts ("@error@"); |