add_action(M4QSTART); \
yy_push_state(CODEBLOCK); \
if ((indented_code = x)) ACTION_ECHO; \
- flush(); \
piece_append("<PLex_Section1Or2_CodeBlock>"); \
} while(0)
-#line 7774 "scan.c"
+#line 7773 "scan.c"
#define INITIAL 0
#define SECT2 1
register char *yy_cp, *yy_bp;
register int yy_act;
-#line 171 "scan.l"
+#line 170 "scan.l"
static int bracelevel, didadef, indented_code;
static int doing_rule_action = false;
char nmdef[MAXLINE];
-#line 8009 "scan.c"
+#line 8008 "scan.c"
if ( !(yy_init) )
{
case 1:
YY_RULE_SETUP
-#line 182 "scan.l"
-START_CODEBLOCK(true);
+#line 181 "scan.l"
+START_CODEBLOCK(true); piece_append("<PLex_Text>");
YY_BREAK
case 2:
YY_RULE_SETUP
-#line 183 "scan.l"
+#line 182 "scan.l"
add_action("/*[""["); yy_push_state( COMMENT );
YY_BREAK
case 3:
YY_RULE_SETUP
-#line 184 "scan.l"
+#line 183 "scan.l"
yy_push_state( LINEDIR );
YY_BREAK
case 4:
YY_RULE_SETUP
-#line 185 "scan.l"
+#line 184 "scan.l"
return SCDECL;
YY_BREAK
case 5:
YY_RULE_SETUP
-#line 186 "scan.l"
+#line 185 "scan.l"
return XSCDECL;
YY_BREAK
case 6:
/* rule 6 can match eol */
YY_RULE_SETUP
-#line 187 "scan.l"
-START_CODEBLOCK(false);
+#line 186 "scan.l"
+START_CODEBLOCK(false); flush(); piece_append("<PLex_Text>");
YY_BREAK
case 7:
/* rule 7 can match eol */
YY_RULE_SETUP
-#line 188 "scan.l"
+#line 187 "scan.l"
{
brace_start_line = linenum;
++linenum;
YY_BREAK
case 8:
YY_RULE_SETUP
-#line 196 "scan.l"
+#line 195 "scan.l"
synerr( _("malformed '%top' directive") );
YY_BREAK
case 9:
YY_RULE_SETUP
-#line 198 "scan.l"
+#line 197 "scan.l"
/* discard */
YY_BREAK
case 10:
YY_RULE_SETUP
-#line 200 "scan.l"
+#line 199 "scan.l"
{
sectnum = 2;
bracelevel = 0;
#if 1
piece_append("</PLex_Section1>");
piece_pack();
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- sprintf(piece_temp, "<token value=\"%d\">", SECTEND);
- piece_append(piece_temp);
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_append("<PLex_Section2>");
piece_pack();
return ~SECTEND;
case 11:
/* rule 11 can match eol */
YY_RULE_SETUP
-#line 225 "scan.l"
+#line 217 "scan.l"
yytext_is_array = false; ++linenum;
YY_BREAK
case 12:
/* rule 12 can match eol */
YY_RULE_SETUP
-#line 226 "scan.l"
+#line 218 "scan.l"
yytext_is_array = true; ++linenum;
YY_BREAK
case 13:
YY_RULE_SETUP
-#line 228 "scan.l"
+#line 220 "scan.l"
BEGIN(OPTION); return TOK_OPTION;
YY_BREAK
case 14:
/* rule 14 can match eol */
YY_RULE_SETUP
-#line 230 "scan.l"
+#line 222 "scan.l"
++linenum; /* ignore */
YY_BREAK
case 15:
/* rule 15 can match eol */
YY_RULE_SETUP
-#line 231 "scan.l"
+#line 223 "scan.l"
++linenum; /* ignore */
YY_BREAK
/* xgettext: no-c-format */
case 16:
/* rule 16 can match eol */
YY_RULE_SETUP
-#line 234 "scan.l"
+#line 226 "scan.l"
synerr( _( "unrecognized '%' directive" ) );
YY_BREAK
case 17:
YY_RULE_SETUP
-#line 236 "scan.l"
+#line 228 "scan.l"
{
if(yyleng < MAXLINE)
{
YY_BREAK
case 18:
YY_RULE_SETUP
-#line 251 "scan.l"
+#line 243 "scan.l"
RETURNNAME;
YY_BREAK
case 19:
/* rule 19 can match eol */
YY_RULE_SETUP
-#line 252 "scan.l"
+#line 244 "scan.l"
++linenum; /* allows blank lines in section 1 */
YY_BREAK
case 20:
/* rule 20 can match eol */
YY_RULE_SETUP
-#line 253 "scan.l"
+#line 245 "scan.l"
ACTION_ECHO; ++linenum; /* maybe end of comment line */
YY_BREAK
/* */
case 21:
YY_RULE_SETUP
-#line 258 "scan.l"
+#line 250 "scan.l"
ACTION_ECHO;
YY_BREAK
case 22:
YY_RULE_SETUP
-#line 259 "scan.l"
+#line 251 "scan.l"
ACTION_ECHO;
YY_BREAK
case 23:
/* rule 23 can match eol */
YY_RULE_SETUP
-#line 261 "scan.l"
+#line 253 "scan.l"
++linenum; ACTION_ECHO;
YY_BREAK
case 24:
YY_RULE_SETUP
-#line 264 "scan.l"
+#line 256 "scan.l"
add_action("*/]""]"); yy_pop_state();
YY_BREAK
case 25:
YY_RULE_SETUP
-#line 267 "scan.l"
+#line 259 "scan.l"
ACTION_ECHO; yy_pop_state();
YY_BREAK
/* This is the same as COMMENT, but is discarded rather than output. */
case 26:
YY_RULE_SETUP
-#line 272 "scan.l"
+#line 264 "scan.l"
yy_pop_state();
YY_BREAK
case 27:
YY_RULE_SETUP
-#line 273 "scan.l"
+#line 265 "scan.l"
;
YY_BREAK
case 28:
YY_RULE_SETUP
-#line 274 "scan.l"
+#line 266 "scan.l"
;
YY_BREAK
case 29:
/* rule 29 can match eol */
YY_RULE_SETUP
-#line 275 "scan.l"
+#line 267 "scan.l"
++linenum;
YY_BREAK
case 30:
YY_RULE_SETUP
-#line 279 "scan.l"
+#line 271 "scan.l"
yy_pop_state();
YY_BREAK
case 31:
YY_RULE_SETUP
-#line 280 "scan.l"
+#line 272 "scan.l"
;
YY_BREAK
case 32:
/* rule 32 can match eol */
YY_RULE_SETUP
-#line 281 "scan.l"
+#line 273 "scan.l"
++linenum;
YY_BREAK
case 33:
/* rule 33 can match eol */
YY_RULE_SETUP
-#line 285 "scan.l"
+#line 277 "scan.l"
yy_pop_state();
YY_BREAK
case 34:
YY_RULE_SETUP
-#line 286 "scan.l"
+#line 278 "scan.l"
linenum = myctoi( yytext );
YY_BREAK
case 35:
YY_RULE_SETUP
-#line 288 "scan.l"
+#line 280 "scan.l"
{
free(infilename);
infilename = xstrdup(yytext + 1);
YY_BREAK
case 36:
YY_RULE_SETUP
-#line 293 "scan.l"
+#line 285 "scan.l"
/* ignore spurious characters */
YY_BREAK
case 37:
YY_RULE_SETUP
-#line 296 "scan.l"
+#line 288 "scan.l"
ACTION_ECHO_QSTART;
YY_BREAK
case 38:
YY_RULE_SETUP
-#line 297 "scan.l"
+#line 289 "scan.l"
ACTION_ECHO_QEND;
YY_BREAK
case 39:
/* rule 39 can match eol */
YY_RULE_SETUP
-#line 301 "scan.l"
-++linenum; END_CODEBLOCK;
+#line 293 "scan.l"
+++linenum; piece_append("</PLex_Text>"); flush(); END_CODEBLOCK;
YY_BREAK
case 40:
YY_RULE_SETUP
-#line 302 "scan.l"
+#line 294 "scan.l"
ACTION_ECHO;
YY_BREAK
case 41:
YY_RULE_SETUP
-#line 303 "scan.l"
+#line 295 "scan.l"
ACTION_ECHO;
YY_BREAK
case 42:
/* rule 42 can match eol */
YY_RULE_SETUP
-#line 304 "scan.l"
+#line 296 "scan.l"
{
++linenum;
ACTION_ECHO;
- if ( indented_code ) { flush(); END_CODEBLOCK; }
+ if ( indented_code ) { flush(); piece_append("</PLex_Text>"); END_CODEBLOCK; }
}
YY_BREAK
case 43:
YY_RULE_SETUP
-#line 312 "scan.l"
+#line 304 "scan.l"
{
if( --brace_depth == 0){
/* TODO: Matched. */
YY_BREAK
case 44:
YY_RULE_SETUP
-#line 320 "scan.l"
+#line 312 "scan.l"
{
brace_depth++;
buf_strnappend(&top_buf, yytext, yyleng);
case 45:
/* rule 45 can match eol */
YY_RULE_SETUP
-#line 325 "scan.l"
+#line 317 "scan.l"
{
++linenum;
buf_strnappend(&top_buf, yytext, yyleng);
YY_BREAK
case 46:
YY_RULE_SETUP
-#line 330 "scan.l"
+#line 322 "scan.l"
buf_strnappend(&top_buf, escaped_qstart, (int) strlen(escaped_qstart));
YY_BREAK
case 47:
YY_RULE_SETUP
-#line 331 "scan.l"
+#line 323 "scan.l"
buf_strnappend(&top_buf, escaped_qend, (int) strlen(escaped_qend));
YY_BREAK
case 48:
YY_RULE_SETUP
-#line 332 "scan.l"
+#line 324 "scan.l"
{
buf_strnappend(&top_buf, yytext, yyleng);
}
YY_BREAK
case YY_STATE_EOF(CODEBLOCK_MATCH_BRACE):
-#line 336 "scan.l"
+#line 328 "scan.l"
{
linenum = brace_start_line;
synerr(_("Unmatched '{'"));
case 49:
YY_RULE_SETUP
-#line 345 "scan.l"
+#line 337 "scan.l"
/* separates name and definition */
YY_BREAK
case 50:
YY_RULE_SETUP
-#line 347 "scan.l"
+#line 339 "scan.l"
{
if(yyleng < MAXLINE)
{
case 51:
/* rule 51 can match eol */
YY_RULE_SETUP
-#line 369 "scan.l"
+#line 361 "scan.l"
{
if ( ! didadef )
synerr( _( "incomplete name definition" ) );
case 52:
/* rule 52 can match eol */
YY_RULE_SETUP
-#line 379 "scan.l"
+#line 371 "scan.l"
++linenum; BEGIN(INITIAL);
YY_BREAK
case 53:
YY_RULE_SETUP
-#line 380 "scan.l"
+#line 372 "scan.l"
option_sense = true;
YY_BREAK
case 54:
YY_RULE_SETUP
-#line 382 "scan.l"
+#line 374 "scan.l"
return '=';
YY_BREAK
case 55:
YY_RULE_SETUP
-#line 384 "scan.l"
+#line 376 "scan.l"
option_sense = ! option_sense;
YY_BREAK
case 56:
YY_RULE_SETUP
-#line 386 "scan.l"
+#line 378 "scan.l"
csize = option_sense ? 128 : 256; markup_option("7bit", option_sense);
YY_BREAK
case 57:
YY_RULE_SETUP
-#line 387 "scan.l"
+#line 379 "scan.l"
csize = option_sense ? 256 : 128; markup_option("8bit", option_sense);
YY_BREAK
case 58:
YY_RULE_SETUP
-#line 389 "scan.l"
+#line 381 "scan.l"
long_align = option_sense; markup_option("Align", option_sense);
YY_BREAK
case 59:
YY_RULE_SETUP
-#line 390 "scan.l"
+#line 382 "scan.l"
{ markup_option("AlwaysInteractive", option_sense);
ACTION_M4_IFDEF( "M4""_YY_ALWAYS_INTERACTIVE", option_sense );
interactive = option_sense;
YY_BREAK
case 60:
YY_RULE_SETUP
-#line 394 "scan.l"
+#line 386 "scan.l"
yytext_is_array = option_sense; markup_option("Array", option_sense);
YY_BREAK
case 61:
YY_RULE_SETUP
-#line 395 "scan.l"
+#line 387 "scan.l"
backing_up_report = option_sense; markup_option("Backup", option_sense);
YY_BREAK
case 62:
YY_RULE_SETUP
-#line 396 "scan.l"
+#line 388 "scan.l"
interactive = ! option_sense; markup_option("Batch", option_sense);
YY_BREAK
case 63:
YY_RULE_SETUP
-#line 397 "scan.l"
+#line 389 "scan.l"
bison_bridge_lval = option_sense; markup_option("BisonBridge", option_sense);
YY_BREAK
case 64:
YY_RULE_SETUP
-#line 398 "scan.l"
+#line 390 "scan.l"
{ if((bison_bridge_lloc = option_sense)) markup_option("BisonLocations", option_sense);
bison_bridge_lval = true;
}
YY_BREAK
case 65:
YY_RULE_SETUP
-#line 401 "scan.l"
+#line 393 "scan.l"
C_plus_plus = option_sense; markup_option("CPlusPlus", option_sense);
YY_BREAK
case 66:
YY_RULE_SETUP
-#line 402 "scan.l"
+#line 394 "scan.l"
sf_set_case_ins(!option_sense); markup_option("CaseSensitive", option_sense);
YY_BREAK
case 67:
YY_RULE_SETUP
-#line 403 "scan.l"
+#line 395 "scan.l"
sf_set_case_ins(option_sense); markup_option("CaseInsensitive", option_sense);
YY_BREAK
case 68:
YY_RULE_SETUP
-#line 404 "scan.l"
+#line 396 "scan.l"
ddebug = option_sense; markup_option("Debug", option_sense);
YY_BREAK
case 69:
YY_RULE_SETUP
-#line 405 "scan.l"
+#line 397 "scan.l"
spprdflt = ! option_sense; markup_option("Default", option_sense);
YY_BREAK
case 70:
YY_RULE_SETUP
-#line 406 "scan.l"
+#line 398 "scan.l"
useecs = option_sense; markup_option("ECS", option_sense);
YY_BREAK
case 71:
YY_RULE_SETUP
-#line 407 "scan.l"
+#line 399 "scan.l"
{ markup_option("Fast", option_sense);
useecs = usemecs = false;
use_read = fullspd = true;
YY_BREAK
case 72:
YY_RULE_SETUP
-#line 411 "scan.l"
+#line 403 "scan.l"
{ markup_option("Full", option_sense);
useecs = usemecs = false;
use_read = fulltbl = true;
YY_BREAK
case 73:
YY_RULE_SETUP
-#line 415 "scan.l"
+#line 407 "scan.l"
ACTION_IFDEF("YY_NO_INPUT", ! option_sense); markup_option("Input", option_sense);
YY_BREAK
case 74:
YY_RULE_SETUP
-#line 416 "scan.l"
+#line 408 "scan.l"
interactive = option_sense; markup_option("Interactive", option_sense);
YY_BREAK
case 75:
YY_RULE_SETUP
-#line 417 "scan.l"
+#line 409 "scan.l"
lex_compat = option_sense; markup_option("LexCompat", option_sense);
YY_BREAK
case 76:
YY_RULE_SETUP
-#line 418 "scan.l"
+#line 410 "scan.l"
posix_compat = option_sense; markup_option("PosixCompat", option_sense);
YY_BREAK
case 77:
YY_RULE_SETUP
-#line 419 "scan.l"
+#line 411 "scan.l"
gen_line_dirs = option_sense; markup_option("Line", option_sense);
YY_BREAK
case 78:
YY_RULE_SETUP
-#line 420 "scan.l"
+#line 412 "scan.l"
{ markup_option("Main", option_sense);
ACTION_M4_IFDEF( "M4""_YY_MAIN", option_sense);
/* Override yywrap */
YY_BREAK
case 79:
YY_RULE_SETUP
-#line 426 "scan.l"
+#line 418 "scan.l"
usemecs = option_sense; markup_option("MetaECS", option_sense);
YY_BREAK
case 80:
YY_RULE_SETUP
-#line 427 "scan.l"
+#line 419 "scan.l"
{ markup_option("NeverInteractive", option_sense);
ACTION_M4_IFDEF( "M4""_YY_NEVER_INTERACTIVE", option_sense );
interactive = !option_sense;
YY_BREAK
case 81:
YY_RULE_SETUP
-#line 431 "scan.l"
+#line 423 "scan.l"
performance_report += option_sense ? 1 : -1; markup_option("PerfReport", option_sense);
YY_BREAK
case 82:
YY_RULE_SETUP
-#line 432 "scan.l"
+#line 424 "scan.l"
yytext_is_array = ! option_sense; markup_option("Pointer", option_sense);
YY_BREAK
case 83:
YY_RULE_SETUP
-#line 433 "scan.l"
+#line 425 "scan.l"
use_read = option_sense; markup_option("Read", option_sense);
YY_BREAK
case 84:
YY_RULE_SETUP
-#line 434 "scan.l"
+#line 426 "scan.l"
reentrant = option_sense; markup_option("Reentrant", option_sense);
YY_BREAK
case 85:
YY_RULE_SETUP
-#line 435 "scan.l"
+#line 427 "scan.l"
reject_really_used = option_sense; markup_option("Reject", option_sense);
YY_BREAK
case 86:
YY_RULE_SETUP
-#line 436 "scan.l"
+#line 428 "scan.l"
ACTION_M4_IFDEF( "M4""_YY_STACK_USED", option_sense ); markup_option("Stack", option_sense);
YY_BREAK
case 87:
YY_RULE_SETUP
-#line 437 "scan.l"
+#line 429 "scan.l"
do_stdinit = option_sense; markup_option("StdInit", option_sense);
YY_BREAK
case 88:
YY_RULE_SETUP
-#line 438 "scan.l"
+#line 430 "scan.l"
use_stdout = option_sense; markup_option("StdOut", option_sense);
YY_BREAK
case 89:
YY_RULE_SETUP
-#line 439 "scan.l"
+#line 431 "scan.l"
ACTION_IFDEF("YY_NO_UNISTD_H", ! option_sense); markup_option("Unistd", option_sense);
YY_BREAK
case 90:
YY_RULE_SETUP
-#line 440 "scan.l"
+#line 432 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_UNPUT", ! option_sense); markup_option("Unput", option_sense);
YY_BREAK
case 91:
YY_RULE_SETUP
-#line 441 "scan.l"
+#line 433 "scan.l"
printstats = option_sense; markup_option("Verbose", option_sense);
YY_BREAK
case 92:
YY_RULE_SETUP
-#line 442 "scan.l"
+#line 434 "scan.l"
nowarn = ! option_sense; markup_option("Warn", option_sense);
YY_BREAK
case 93:
YY_RULE_SETUP
-#line 443 "scan.l"
+#line 435 "scan.l"
do_yylineno = option_sense; ACTION_M4_IFDEF("M4""_YY_USE_LINENO", option_sense); markup_option("YYLineNo", option_sense);
YY_BREAK
case 94:
YY_RULE_SETUP
-#line 444 "scan.l"
+#line 436 "scan.l"
yymore_really_used = option_sense; markup_option("YYMore", option_sense);
YY_BREAK
case 95:
YY_RULE_SETUP
-#line 445 "scan.l"
+#line 437 "scan.l"
do_yywrap = option_sense; markup_option("YYWrap", option_sense);
YY_BREAK
case 96:
YY_RULE_SETUP
-#line 447 "scan.l"
+#line 439 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_PUSH_STATE", ! option_sense); markup_option("YYPushState", option_sense);
YY_BREAK
case 97:
YY_RULE_SETUP
-#line 448 "scan.l"
+#line 440 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_POP_STATE", ! option_sense); markup_option("YYPopState", option_sense);
YY_BREAK
case 98:
YY_RULE_SETUP
-#line 449 "scan.l"
+#line 441 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_TOP_STATE", ! option_sense); markup_option("YYTopState", option_sense);
YY_BREAK
case 99:
YY_RULE_SETUP
-#line 451 "scan.l"
+#line 443 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SCAN_BUFFER", ! option_sense); markup_option("YYScanBuffer", option_sense);
YY_BREAK
case 100:
YY_RULE_SETUP
-#line 452 "scan.l"
+#line 444 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SCAN_BYTES", ! option_sense); markup_option("YYScanBytes", option_sense);
YY_BREAK
case 101:
YY_RULE_SETUP
-#line 453 "scan.l"
+#line 445 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SCAN_STRING", ! option_sense); markup_option("YYScanString", option_sense);
YY_BREAK
case 102:
YY_RULE_SETUP
-#line 455 "scan.l"
+#line 447 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_FLEX_ALLOC", ! option_sense); markup_option("YYAlloc", option_sense);
YY_BREAK
case 103:
YY_RULE_SETUP
-#line 456 "scan.l"
+#line 448 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_FLEX_REALLOC", ! option_sense); markup_option("YYRealloc", option_sense);
YY_BREAK
case 104:
YY_RULE_SETUP
-#line 457 "scan.l"
+#line 449 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_FLEX_FREE", ! option_sense); markup_option("YYFree", option_sense);
YY_BREAK
case 105:
YY_RULE_SETUP
-#line 459 "scan.l"
+#line 451 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_DEBUG", ! option_sense); markup_option("YYGetDebug", option_sense);
YY_BREAK
case 106:
YY_RULE_SETUP
-#line 460 "scan.l"
+#line 452 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_DEBUG", ! option_sense); markup_option("YYSetDebug", option_sense);
YY_BREAK
case 107:
YY_RULE_SETUP
-#line 461 "scan.l"
+#line 453 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_EXTRA", ! option_sense); markup_option("YYGetExtra", option_sense);
YY_BREAK
case 108:
YY_RULE_SETUP
-#line 462 "scan.l"
+#line 454 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_EXTRA", ! option_sense); markup_option("YYSetExtra", option_sense);
YY_BREAK
case 109:
YY_RULE_SETUP
-#line 463 "scan.l"
+#line 455 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_LENG", ! option_sense); markup_option("YYGetLeng", option_sense);
YY_BREAK
case 110:
YY_RULE_SETUP
-#line 464 "scan.l"
+#line 456 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_TEXT", ! option_sense); markup_option("YYGetText", option_sense);
YY_BREAK
case 111:
YY_RULE_SETUP
-#line 465 "scan.l"
+#line 457 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_LINENO", ! option_sense); markup_option("YYGetLineNo", option_sense);
YY_BREAK
case 112:
YY_RULE_SETUP
-#line 466 "scan.l"
+#line 458 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_LINENO", ! option_sense); markup_option("YYSetLineNo", option_sense);
YY_BREAK
case 113:
YY_RULE_SETUP
-#line 467 "scan.l"
+#line 459 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_IN", ! option_sense); markup_option("YYGetIn", option_sense);
YY_BREAK
case 114:
YY_RULE_SETUP
-#line 468 "scan.l"
+#line 460 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_IN", ! option_sense); markup_option("YYSetIn", option_sense);
YY_BREAK
case 115:
YY_RULE_SETUP
-#line 469 "scan.l"
+#line 461 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_OUT", ! option_sense); markup_option("YYGetOut", option_sense);
YY_BREAK
case 116:
YY_RULE_SETUP
-#line 470 "scan.l"
+#line 462 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_OUT", ! option_sense); markup_option("YYSetOut", option_sense);
YY_BREAK
case 117:
YY_RULE_SETUP
-#line 471 "scan.l"
+#line 463 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_LVAL", ! option_sense); markup_option("YYGetLVal", option_sense);
YY_BREAK
case 118:
YY_RULE_SETUP
-#line 472 "scan.l"
+#line 464 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_LVAL", ! option_sense); markup_option("YYSetLVal", option_sense);
YY_BREAK
case 119:
YY_RULE_SETUP
-#line 473 "scan.l"
+#line 465 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_GET_LLOC", ! option_sense); markup_option("YYGetLLoc", option_sense);
YY_BREAK
case 120:
YY_RULE_SETUP
-#line 474 "scan.l"
+#line 466 "scan.l"
ACTION_M4_IFDEF("M4""_YY_NO_SET_LLOC", ! option_sense); markup_option("YYSetLLoc", option_sense);
YY_BREAK
case 121:
YY_RULE_SETUP
-#line 476 "scan.l"
+#line 468 "scan.l"
return TOK_EXTRA_TYPE;
YY_BREAK
case 122:
YY_RULE_SETUP
-#line 477 "scan.l"
+#line 469 "scan.l"
return TOK_OUTFILE;
YY_BREAK
case 123:
YY_RULE_SETUP
-#line 478 "scan.l"
+#line 470 "scan.l"
return TOK_PREFIX;
YY_BREAK
case 124:
YY_RULE_SETUP
-#line 479 "scan.l"
+#line 471 "scan.l"
return TOK_YYCLASS;
YY_BREAK
case 125:
YY_RULE_SETUP
-#line 480 "scan.l"
+#line 472 "scan.l"
return TOK_HEADER_FILE;
YY_BREAK
case 126:
YY_RULE_SETUP
-#line 481 "scan.l"
+#line 473 "scan.l"
return TOK_TABLES_FILE;
YY_BREAK
case 127:
YY_RULE_SETUP
-#line 482 "scan.l"
+#line 474 "scan.l"
{ markup_option("TablesVerify", option_sense);
tablesverify = option_sense;
if(!tablesext && option_sense)
YY_BREAK
case 128:
YY_RULE_SETUP
-#line 489 "scan.l"
+#line 481 "scan.l"
{
if(yyleng-1 < MAXLINE)
{
YY_BREAK
case 129:
YY_RULE_SETUP
-#line 503 "scan.l"
+#line 495 "scan.l"
{
format_synerr( _( "unrecognized %%option: %s" ),
yytext );
case 130:
/* rule 130 can match eol */
YY_RULE_SETUP
-#line 510 "scan.l"
+#line 502 "scan.l"
++linenum; BEGIN(INITIAL);
YY_BREAK
case 131:
YY_RULE_SETUP
-#line 514 "scan.l"
+#line 506 "scan.l"
++bracelevel; yyless( 2 ); /* eat only %{ */
YY_BREAK
case 132:
YY_RULE_SETUP
-#line 515 "scan.l"
+#line 507 "scan.l"
--bracelevel; yyless( 2 ); /* eat only %} */
YY_BREAK
case 133:
YY_RULE_SETUP
-#line 517 "scan.l"
-START_CODEBLOCK(true); /* indented code in prolog */
+#line 509 "scan.l"
+START_CODEBLOCK(true); piece_append("<PLex_Text>"); /* indented code in prolog */
YY_BREAK
case 134:
YY_RULE_SETUP
-#line 519 "scan.l"
+#line 511 "scan.l"
{
/* non-indented code */
if ( bracelevel <= 0 ) {
BEGIN(SECT2);
} else {
START_CODEBLOCK(true);
+ piece_append("<PLex_Text>");
}
}
YY_BREAK
case 135:
YY_RULE_SETUP
-#line 532 "scan.l"
+#line 525 "scan.l"
ACTION_ECHO;
YY_BREAK
case 136:
/* rule 136 can match eol */
YY_RULE_SETUP
-#line 533 "scan.l"
+#line 526 "scan.l"
++linenum; ACTION_ECHO;
YY_BREAK
case YY_STATE_EOF(SECT2PROLOG):
-#line 535 "scan.l"
+#line 528 "scan.l"
{
mark_prolog();
sectnum = 0;
#if 1
piece_pack();
piece_append("</PLex_Section2>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
case 137:
/* rule 137 can match eol */
YY_RULE_SETUP
-#line 553 "scan.l"
+#line 543 "scan.l"
++linenum; /* allow blank lines in section 2 */
YY_BREAK
case 138:
YY_RULE_SETUP
-#line 555 "scan.l"
+#line 545 "scan.l"
{
indented_code = false;
doing_codeblock = true;
bracelevel = 1;
BEGIN(PERCENT_BRACE_ACTION);
- flush();
- piece_append("<PLex_PercentBraceAction>");
+ piece_append("<PLex_Section2_Rule_Action>");
}
YY_BREAK
case 139:
YY_RULE_SETUP
-#line 564 "scan.l"
+#line 553 "scan.l"
{
/* Allow "<" to appear in (?x) patterns. */
if (!sf_skip_ws())
YY_BREAK
case 140:
YY_RULE_SETUP
-#line 570 "scan.l"
+#line 559 "scan.l"
return '^';
YY_BREAK
case 141:
YY_RULE_SETUP
-#line 571 "scan.l"
+#line 560 "scan.l"
BEGIN(QUOTE); return '"';
YY_BREAK
case 142:
(yy_c_buf_p) = yy_cp = yy_bp + 1;
YY_DO_BEFORE_ACTION; /* set up yytext again */
YY_RULE_SETUP
-#line 572 "scan.l"
+#line 561 "scan.l"
{
BEGIN(NUM);
if ( lex_compat || posix_compat )
(yy_c_buf_p) = yy_cp = yy_bp + 1;
YY_DO_BEFORE_ACTION; /* set up yytext again */
YY_RULE_SETUP
-#line 579 "scan.l"
+#line 568 "scan.l"
return '$';
YY_BREAK
case 144:
YY_RULE_SETUP
-#line 581 "scan.l"
+#line 570 "scan.l"
{
bracelevel = 1;
BEGIN(PERCENT_BRACE_ACTION);
+ piece_append("<PLex_Section2_Rule_Action>");
if ( in_rule )
{
in_rule = false;
#if 1
piece_pack();
-#if 1
piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"10\">");
- piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
- piece_append("<PLex_PercentBraceAction>");
+ piece_append("<PLex_Text>");
return ~'\n';
#else
return '\n';
#endif
}
flush();
- piece_append("<PLex_PercentBraceAction>");
+ piece_append("<PLex_Text>");
}
YY_BREAK
case 145:
/* rule 145 can match eol */
YY_RULE_SETUP
-#line 608 "scan.l"
+#line 592 "scan.l"
{
if (sf_skip_ws()){
/* We're in the middle of a (?x: ) pattern. */
YY_BREAK
case 146:
YY_RULE_SETUP
-#line 623 "scan.l"
+#line 607 "scan.l"
{
if (sf_skip_ws()){
YY_BREAK
case 147:
YY_RULE_SETUP
-#line 637 "scan.l"
+#line 621 "scan.l"
/* allow indented rules */ ;
YY_BREAK
case 148:
YY_RULE_SETUP
-#line 639 "scan.l"
+#line 623 "scan.l"
{
if (sf_skip_ws()){
/* We're in the middle of a (?x: ) pattern. */
in_rule = false;
#if 1
piece_pack();
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"10\">");
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
- piece_append("<PLex_Section2_Rule_Action>");
+ piece_append("<PLex_Section2_Rule_Action><PLex_Text>");
return ~'\n';
#else
return '\n';
case 149:
/* rule 149 can match eol */
YY_RULE_SETUP
-#line 675 "scan.l"
+#line 653 "scan.l"
{
if (sf_skip_ws()){
/* We're in the middle of a (?x: ) pattern. */
in_rule = false;
#if 1
piece_pack();
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"10\">");
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
- piece_append("<PLex_Section2_Rule_Action>");
+ piece_append("<PLex_Section2_Rule_Action><PLex_Text>");
return ~'\n';
#else
return '\n';
}
YY_BREAK
case 150:
-#line 714 "scan.l"
+#line 686 "scan.l"
case 151:
YY_RULE_SETUP
-#line 714 "scan.l"
+#line 686 "scan.l"
return EOF_OP;
YY_BREAK
case 152:
YY_RULE_SETUP
-#line 716 "scan.l"
+#line 688 "scan.l"
{
sectnum = 3;
BEGIN(no_section3_escape ? SECT3_NOESCAPE : SECT3);
#if 1
piece_pack();
piece_append("</PLex_Section2>");
-#if 1
piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"0\">");
- piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
piece_append("<PLex_Section3>");
return ~YY_NULL;
YY_BREAK
case 153:
YY_RULE_SETUP
-#line 739 "scan.l"
+#line 705 "scan.l"
{
int cclval;
YY_BREAK
case 154:
YY_RULE_SETUP
-#line 785 "scan.l"
+#line 751 "scan.l"
return CCL_OP_DIFF;
YY_BREAK
case 155:
YY_RULE_SETUP
-#line 786 "scan.l"
+#line 752 "scan.l"
return CCL_OP_UNION;
YY_BREAK
/* Check for :space: at the end of the rule so we don't
case 156:
/* rule 156 can match eol */
YY_RULE_SETUP
-#line 793 "scan.l"
+#line 759 "scan.l"
{
char *nmdefptr;
int end_is_ws, end_ch;
YY_BREAK
case 157:
YY_RULE_SETUP
-#line 845 "scan.l"
+#line 811 "scan.l"
{
if (sf_skip_ws())
yy_push_state(COMMENT_DISCARD);
YY_BREAK
case 158:
YY_RULE_SETUP
-#line 855 "scan.l"
+#line 821 "scan.l"
{
if (lex_compat || posix_compat){
/* Push back the "?#" and treat it like a normal parens. */
YY_BREAK
case 159:
YY_RULE_SETUP
-#line 865 "scan.l"
+#line 831 "scan.l"
{
sf_push();
if (lex_compat || posix_compat)
YY_BREAK
case 160:
YY_RULE_SETUP
-#line 874 "scan.l"
+#line 840 "scan.l"
sf_push(); return '(';
YY_BREAK
case 161:
YY_RULE_SETUP
-#line 875 "scan.l"
+#line 841 "scan.l"
{
if (_sf_top_ix > 0) {
sf_pop();
YY_BREAK
case 162:
YY_RULE_SETUP
-#line 883 "scan.l"
+#line 849 "scan.l"
return (unsigned char) yytext[0];
YY_BREAK
case 163:
YY_RULE_SETUP
-#line 884 "scan.l"
+#line 850 "scan.l"
RETURNCHAR;
YY_BREAK
/* Nick added this rule for consistency with rest of scanner */
case YY_STATE_EOF(SECT2):
-#line 887 "scan.l"
+#line 853 "scan.l"
{
sectnum = 0;
#if 1
piece_pack();
piece_append("</PLex_Section2>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
case 164:
/* rule 164 can match eol */
YY_RULE_SETUP
-#line 905 "scan.l"
+#line 868 "scan.l"
++linenum; /* Allow blank lines & continuations */
YY_BREAK
case 165:
YY_RULE_SETUP
-#line 906 "scan.l"
+#line 869 "scan.l"
return (unsigned char) yytext[0];
YY_BREAK
case 166:
YY_RULE_SETUP
-#line 907 "scan.l"
+#line 870 "scan.l"
BEGIN(SECT2); return '>';
YY_BREAK
case 167:
(yy_c_buf_p) = yy_cp = yy_bp + 1;
YY_DO_BEFORE_ACTION; /* set up yytext again */
YY_RULE_SETUP
-#line 908 "scan.l"
+#line 871 "scan.l"
BEGIN(CARETISBOL); return '>';
YY_BREAK
case 168:
YY_RULE_SETUP
-#line 909 "scan.l"
+#line 872 "scan.l"
RETURNNAME;
YY_BREAK
case 169:
YY_RULE_SETUP
-#line 910 "scan.l"
+#line 873 "scan.l"
{
format_synerr( _( "bad <start condition>: %s" ),
yytext );
case 170:
YY_RULE_SETUP
-#line 916 "scan.l"
+#line 879 "scan.l"
BEGIN(SECT2); return '^';
YY_BREAK
case 171:
YY_RULE_SETUP
-#line 920 "scan.l"
+#line 883 "scan.l"
RETURNCHAR;
YY_BREAK
case 172:
YY_RULE_SETUP
-#line 921 "scan.l"
+#line 884 "scan.l"
BEGIN(SECT2); return '"';
YY_BREAK
case 173:
/* rule 173 can match eol */
YY_RULE_SETUP
-#line 923 "scan.l"
+#line 886 "scan.l"
{
synerr( _( "missing quote" ) );
BEGIN(SECT2);
case 174:
YY_RULE_SETUP
-#line 932 "scan.l"
+#line 895 "scan.l"
BEGIN(SECT2);
YY_BREAK
case 175:
YY_RULE_SETUP
-#line 933 "scan.l"
+#line 896 "scan.l"
BEGIN(GROUP_MINUS_PARAMS);
YY_BREAK
case 176:
YY_RULE_SETUP
-#line 934 "scan.l"
+#line 897 "scan.l"
sf_set_case_ins(1);
YY_BREAK
case 177:
YY_RULE_SETUP
-#line 935 "scan.l"
+#line 898 "scan.l"
sf_set_dot_all(1);
YY_BREAK
case 178:
YY_RULE_SETUP
-#line 936 "scan.l"
+#line 899 "scan.l"
sf_set_skip_ws(1);
YY_BREAK
case 179:
YY_RULE_SETUP
-#line 939 "scan.l"
+#line 902 "scan.l"
BEGIN(SECT2);
YY_BREAK
case 180:
YY_RULE_SETUP
-#line 940 "scan.l"
+#line 903 "scan.l"
sf_set_case_ins(0);
YY_BREAK
case 181:
YY_RULE_SETUP
-#line 941 "scan.l"
+#line 904 "scan.l"
sf_set_dot_all(0);
YY_BREAK
case 182:
YY_RULE_SETUP
-#line 942 "scan.l"
+#line 905 "scan.l"
sf_set_skip_ws(0);
YY_BREAK
(yy_c_buf_p) = yy_cp = yy_bp + 1;
YY_DO_BEFORE_ACTION; /* set up yytext again */
YY_RULE_SETUP
-#line 946 "scan.l"
+#line 909 "scan.l"
BEGIN(CCL); return '^';
YY_BREAK
case 184:
(yy_c_buf_p) = yy_cp = yy_bp + 1;
YY_DO_BEFORE_ACTION; /* set up yytext again */
YY_RULE_SETUP
-#line 947 "scan.l"
+#line 910 "scan.l"
return '^';
YY_BREAK
case 185:
YY_RULE_SETUP
-#line 948 "scan.l"
+#line 911 "scan.l"
BEGIN(CCL); RETURNCHAR;
YY_BREAK
(yy_c_buf_p) = yy_cp = yy_bp + 1;
YY_DO_BEFORE_ACTION; /* set up yytext again */
YY_RULE_SETUP
-#line 952 "scan.l"
+#line 915 "scan.l"
return '-';
YY_BREAK
case 187:
YY_RULE_SETUP
-#line 953 "scan.l"
+#line 916 "scan.l"
RETURNCHAR;
YY_BREAK
case 188:
YY_RULE_SETUP
-#line 954 "scan.l"
+#line 917 "scan.l"
BEGIN(SECT2); return ']';
YY_BREAK
case 189:
/* rule 189 can match eol */
YY_RULE_SETUP
-#line 955 "scan.l"
+#line 918 "scan.l"
{
synerr( _( "bad character class" ) );
BEGIN(SECT2);
case 190:
YY_RULE_SETUP
-#line 963 "scan.l"
+#line 926 "scan.l"
BEGIN(CCL); return CCE_ALNUM;
YY_BREAK
case 191:
YY_RULE_SETUP
-#line 964 "scan.l"
+#line 927 "scan.l"
BEGIN(CCL); return CCE_ALPHA;
YY_BREAK
case 192:
YY_RULE_SETUP
-#line 965 "scan.l"
+#line 928 "scan.l"
BEGIN(CCL); return CCE_BLANK;
YY_BREAK
case 193:
YY_RULE_SETUP
-#line 966 "scan.l"
+#line 929 "scan.l"
BEGIN(CCL); return CCE_CNTRL;
YY_BREAK
case 194:
YY_RULE_SETUP
-#line 967 "scan.l"
+#line 930 "scan.l"
BEGIN(CCL); return CCE_DIGIT;
YY_BREAK
case 195:
YY_RULE_SETUP
-#line 968 "scan.l"
+#line 931 "scan.l"
BEGIN(CCL); return CCE_GRAPH;
YY_BREAK
case 196:
YY_RULE_SETUP
-#line 969 "scan.l"
+#line 932 "scan.l"
BEGIN(CCL); return CCE_LOWER;
YY_BREAK
case 197:
YY_RULE_SETUP
-#line 970 "scan.l"
+#line 933 "scan.l"
BEGIN(CCL); return CCE_PRINT;
YY_BREAK
case 198:
YY_RULE_SETUP
-#line 971 "scan.l"
+#line 934 "scan.l"
BEGIN(CCL); return CCE_PUNCT;
YY_BREAK
case 199:
YY_RULE_SETUP
-#line 972 "scan.l"
+#line 935 "scan.l"
BEGIN(CCL); return CCE_SPACE;
YY_BREAK
case 200:
YY_RULE_SETUP
-#line 973 "scan.l"
+#line 936 "scan.l"
BEGIN(CCL); return CCE_UPPER;
YY_BREAK
case 201:
YY_RULE_SETUP
-#line 974 "scan.l"
+#line 937 "scan.l"
BEGIN(CCL); return CCE_XDIGIT;
YY_BREAK
case 202:
YY_RULE_SETUP
-#line 976 "scan.l"
+#line 939 "scan.l"
BEGIN(CCL); return CCE_NEG_ALNUM;
YY_BREAK
case 203:
YY_RULE_SETUP
-#line 977 "scan.l"
+#line 940 "scan.l"
BEGIN(CCL); return CCE_NEG_ALPHA;
YY_BREAK
case 204:
YY_RULE_SETUP
-#line 978 "scan.l"
+#line 941 "scan.l"
BEGIN(CCL); return CCE_NEG_BLANK;
YY_BREAK
case 205:
YY_RULE_SETUP
-#line 979 "scan.l"
+#line 942 "scan.l"
BEGIN(CCL); return CCE_NEG_CNTRL;
YY_BREAK
case 206:
YY_RULE_SETUP
-#line 980 "scan.l"
+#line 943 "scan.l"
BEGIN(CCL); return CCE_NEG_DIGIT;
YY_BREAK
case 207:
YY_RULE_SETUP
-#line 981 "scan.l"
+#line 944 "scan.l"
BEGIN(CCL); return CCE_NEG_GRAPH;
YY_BREAK
case 208:
YY_RULE_SETUP
-#line 982 "scan.l"
+#line 945 "scan.l"
BEGIN(CCL); return CCE_NEG_LOWER;
YY_BREAK
case 209:
YY_RULE_SETUP
-#line 983 "scan.l"
+#line 946 "scan.l"
BEGIN(CCL); return CCE_NEG_PRINT;
YY_BREAK
case 210:
YY_RULE_SETUP
-#line 984 "scan.l"
+#line 947 "scan.l"
BEGIN(CCL); return CCE_NEG_PUNCT;
YY_BREAK
case 211:
YY_RULE_SETUP
-#line 985 "scan.l"
+#line 948 "scan.l"
BEGIN(CCL); return CCE_NEG_SPACE;
YY_BREAK
case 212:
YY_RULE_SETUP
-#line 986 "scan.l"
+#line 949 "scan.l"
BEGIN(CCL); return CCE_NEG_UPPER;
YY_BREAK
case 213:
YY_RULE_SETUP
-#line 987 "scan.l"
+#line 950 "scan.l"
BEGIN(CCL); return CCE_NEG_XDIGIT;
YY_BREAK
case 214:
YY_RULE_SETUP
-#line 988 "scan.l"
+#line 951 "scan.l"
{
format_synerr(
_( "bad character class expression: %s" ),
case 215:
YY_RULE_SETUP
-#line 997 "scan.l"
+#line 960 "scan.l"
{
yylval = myctoi( yytext );
return NUMBER;
YY_BREAK
case 216:
YY_RULE_SETUP
-#line 1002 "scan.l"
+#line 965 "scan.l"
return ',';
YY_BREAK
case 217:
YY_RULE_SETUP
-#line 1003 "scan.l"
+#line 966 "scan.l"
{
BEGIN(SECT2);
if ( lex_compat || posix_compat )
YY_BREAK
case 218:
YY_RULE_SETUP
-#line 1011 "scan.l"
+#line 974 "scan.l"
{
synerr( _( "bad character inside {}'s" ) );
BEGIN(SECT2);
case 219:
/* rule 219 can match eol */
YY_RULE_SETUP
-#line 1017 "scan.l"
+#line 980 "scan.l"
{
synerr( _( "missing }" ) );
BEGIN(SECT2);
case 220:
YY_RULE_SETUP
-#line 1027 "scan.l"
-bracelevel = 0;
+#line 990 "scan.l"
+bracelevel = 0; piece_append("</PLex_Text>");
YY_BREAK
case 221:
YY_RULE_SETUP
-#line 1029 "scan.l"
+#line 992 "scan.l"
ACTION_ECHO; yy_push_state( CODE_COMMENT );
YY_BREAK
case 222:
YY_RULE_SETUP
-#line 1032 "scan.l"
+#line 995 "scan.l"
{
ACTION_ECHO;
CHECK_REJECT(yytext);
YY_BREAK
case 223:
YY_RULE_SETUP
-#line 1036 "scan.l"
+#line 999 "scan.l"
{
ACTION_ECHO;
CHECK_YYMORE(yytext);
case 224:
YY_RULE_SETUP
-#line 1042 "scan.l"
+#line 1005 "scan.l"
ACTION_ECHO;
YY_BREAK
case 225:
/* rule 225 can match eol */
YY_RULE_SETUP
-#line 1043 "scan.l"
+#line 1006 "scan.l"
{
++linenum;
ACTION_ECHO;
doing_rule_action = doing_codeblock = false;
BEGIN(SECT2);
- piece_append("</PLex_PercentBraceAction>");
+ flush();
+ piece_append("</PLex_Section2_Rule_Action>");
}
}
YY_BREAK
case 226:
YY_RULE_SETUP
-#line 1060 "scan.l"
+#line 1024 "scan.l"
ACTION_ECHO; ++bracelevel;
YY_BREAK
case 227:
YY_RULE_SETUP
-#line 1061 "scan.l"
+#line 1025 "scan.l"
ACTION_ECHO; --bracelevel;
YY_BREAK
case 228:
YY_RULE_SETUP
-#line 1062 "scan.l"
+#line 1026 "scan.l"
ACTION_ECHO;
YY_BREAK
case 229:
YY_RULE_SETUP
-#line 1063 "scan.l"
+#line 1027 "scan.l"
ACTION_ECHO;
YY_BREAK
case 230:
YY_RULE_SETUP
-#line 1064 "scan.l"
+#line 1028 "scan.l"
ACTION_ECHO; /* character constant */
YY_BREAK
case 231:
YY_RULE_SETUP
-#line 1065 "scan.l"
+#line 1029 "scan.l"
ACTION_ECHO; BEGIN(CHARACTER_CONSTANT);
YY_BREAK
case 232:
YY_RULE_SETUP
-#line 1066 "scan.l"
+#line 1030 "scan.l"
ACTION_ECHO; BEGIN(ACTION_STRING);
YY_BREAK
case 233:
/* rule 233 can match eol */
YY_RULE_SETUP
-#line 1067 "scan.l"
+#line 1031 "scan.l"
{
++linenum;
ACTION_ECHO;
YY_BREAK
case 234:
YY_RULE_SETUP
-#line 1082 "scan.l"
+#line 1046 "scan.l"
ACTION_ECHO;
YY_BREAK
case 235:
YY_RULE_SETUP
-#line 1086 "scan.l"
+#line 1050 "scan.l"
ACTION_ECHO;
YY_BREAK
case 236:
YY_RULE_SETUP
-#line 1087 "scan.l"
+#line 1051 "scan.l"
ACTION_ECHO; BEGIN(ACTION);
YY_BREAK
case 237:
YY_RULE_SETUP
-#line 1090 "scan.l"
+#line 1054 "scan.l"
ACTION_ECHO;
YY_BREAK
case 238:
YY_RULE_SETUP
-#line 1091 "scan.l"
+#line 1055 "scan.l"
ACTION_ECHO; BEGIN(ACTION);
YY_BREAK
case 239:
/* rule 239 can match eol */
YY_RULE_SETUP
-#line 1094 "scan.l"
+#line 1058 "scan.l"
ACTION_ECHO;
YY_BREAK
case 240:
/* rule 240 can match eol */
YY_RULE_SETUP
-#line 1095 "scan.l"
+#line 1059 "scan.l"
ACTION_ECHO;
YY_BREAK
case 241:
/* rule 241 can match eol */
YY_RULE_SETUP
-#line 1096 "scan.l"
+#line 1060 "scan.l"
++linenum; ACTION_ECHO; if (bracelevel <= 0) { BEGIN(SECT2); flush(); if (doing_rule_action) markup_action(); } else { BEGIN(ACTION); }
YY_BREAK
case 242:
YY_RULE_SETUP
-#line 1097 "scan.l"
+#line 1061 "scan.l"
ACTION_ECHO;
YY_BREAK
case YY_STATE_EOF(ACTION):
case YY_STATE_EOF(ACTION_STRING):
case YY_STATE_EOF(CHARACTER_CONSTANT):
-#line 1100 "scan.l"
+#line 1064 "scan.l"
{
synerr( _( "EOF encountered inside an action" ) );
yyterminate();
case YY_STATE_EOF(EXTENDED_COMMENT):
case YY_STATE_EOF(GROUP_WITH_PARAMS):
case YY_STATE_EOF(GROUP_MINUS_PARAMS):
-#line 1105 "scan.l"
+#line 1069 "scan.l"
{
synerr( _( "EOF encountered inside pattern" ) );
yyterminate();
YY_BREAK
case 243:
YY_RULE_SETUP
-#line 1110 "scan.l"
+#line 1074 "scan.l"
{
yylval = myesc( (unsigned char *) yytext );
case 244:
YY_RULE_SETUP
-#line 1120 "scan.l"
+#line 1084 "scan.l"
fputs(escaped_qstart, yyout);
YY_BREAK
case 245:
YY_RULE_SETUP
-#line 1121 "scan.l"
+#line 1085 "scan.l"
fputs(escaped_qend, yyout);
YY_BREAK
case 246:
/* rule 246 can match eol */
YY_RULE_SETUP
-#line 1122 "scan.l"
+#line 1086 "scan.l"
ECHO;
YY_BREAK
case 247:
YY_RULE_SETUP
-#line 1123 "scan.l"
+#line 1087 "scan.l"
ECHO;
YY_BREAK
case YY_STATE_EOF(SECT3):
-#line 1124 "scan.l"
+#line 1088 "scan.l"
{
sectnum = 0;
#if 1
piece_pack();
piece_append("</PLex_Section3>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
case 248:
YY_RULE_SETUP
-#line 1140 "scan.l"
+#line 1101 "scan.l"
fprintf(yyout, "[""[%s]""]", escaped_qstart);
YY_BREAK
case 249:
YY_RULE_SETUP
-#line 1141 "scan.l"
+#line 1102 "scan.l"
fprintf(yyout, "[""[%s]""]", escaped_qend);
YY_BREAK
case 250:
/* rule 250 can match eol */
YY_RULE_SETUP
-#line 1142 "scan.l"
+#line 1103 "scan.l"
ECHO;
YY_BREAK
case 251:
YY_RULE_SETUP
-#line 1143 "scan.l"
+#line 1104 "scan.l"
ECHO;
YY_BREAK
case YY_STATE_EOF(SECT3_NOESCAPE):
-#line 1144 "scan.l"
+#line 1105 "scan.l"
{
sectnum = 0;
#if 1
piece_pack();
piece_append("</PLex_Section3>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
case 252:
/* rule 252 can match eol */
YY_RULE_SETUP
-#line 1159 "scan.l"
+#line 1117 "scan.l"
format_synerr( _( "bad character: %s" ), yytext );
YY_BREAK
case 253:
YY_RULE_SETUP
-#line 1161 "scan.l"
+#line 1119 "scan.l"
YY_FATAL_ERROR( "flex scanner jammed" );
YY_BREAK
-#line 10077 "scan.c"
+#line 10035 "scan.c"
case YY_STATE_EOF(INITIAL):
case YY_STATE_EOF(CODEBLOCK):
case YY_STATE_EOF(PICKUPDEF):
#define YYTABLES_NAME "yytables"
-#line 1161 "scan.l"
+#line 1119 "scan.l"
if (i < 21 || strcmp(piece[piece0] + i - 21, "</PLex_Section2_Rule>") != 0)
abort();
piece[piece0][i - 21] = 0;
- piece_append("</PLex_Section2_Rule_Action></PLex_Section2_Rule>");
+ piece_append("</PLex_Text></PLex_Section2_Rule_Action></PLex_Section2_Rule>");
piece_pack();
}
add_action(M4QSTART); \
yy_push_state(CODEBLOCK); \
if ((indented_code = x)) ACTION_ECHO; \
- flush(); \
piece_append("<PLex_Section1Or2_CodeBlock>"); \
} while(0)
<INITIAL>{
- ^{WS} START_CODEBLOCK(true);
+ ^{WS} START_CODEBLOCK(true); piece_append("<PLex_Text>");
^"/*" add_action("/*[""["); yy_push_state( COMMENT );
^#{OPTWS}line{WS} yy_push_state( LINEDIR );
^"%s"{NAME}? return SCDECL;
^"%x"{NAME}? return XSCDECL;
- ^"%{".*{NL} START_CODEBLOCK(false);
+ ^"%{".*{NL} START_CODEBLOCK(false); flush(); piece_append("<PLex_Text>");
^"%top"[[:blank:]]*"{"[[:blank:]]*{NL} {
brace_start_line = linenum;
++linenum;
#if 1
piece_append("</PLex_Section1>");
piece_pack();
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- sprintf(piece_temp, "<token value=\"%d\">", SECTEND);
- piece_append(piece_temp);
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_append("<PLex_Section2>");
piece_pack();
return ~SECTEND;
}
<CODEBLOCK>{
- ^"%}".*{NL} ++linenum; END_CODEBLOCK;
+ ^"%}".*{NL} ++linenum; piece_append("</PLex_Text>"); flush(); END_CODEBLOCK;
[^\n%\[\]]* ACTION_ECHO;
. ACTION_ECHO;
{NL} {
++linenum;
ACTION_ECHO;
- if ( indented_code ) { flush(); END_CODEBLOCK; }
+ if ( indented_code ) { flush(); piece_append("</PLex_Text>"); END_CODEBLOCK; }
}
}
^"%{".* ++bracelevel; yyless( 2 ); /* eat only %{ */
^"%}".* --bracelevel; yyless( 2 ); /* eat only %} */
- ^{WS} START_CODEBLOCK(true); /* indented code in prolog */
+ ^{WS} START_CODEBLOCK(true); piece_append("<PLex_Text>"); /* indented code in prolog */
^{NOT_WS}.* {
/* non-indented code */
BEGIN(SECT2);
} else {
START_CODEBLOCK(true);
+ piece_append("<PLex_Text>");
}
}
#if 1
piece_pack();
piece_append("</PLex_Section2>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
doing_codeblock = true;
bracelevel = 1;
BEGIN(PERCENT_BRACE_ACTION);
- flush();
- piece_append("<PLex_PercentBraceAction>");
+ piece_append("<PLex_Section2_Rule_Action>");
}
^{OPTWS}"<" {
{WS}"%{" {
bracelevel = 1;
BEGIN(PERCENT_BRACE_ACTION);
+ piece_append("<PLex_Section2_Rule_Action>");
if ( in_rule )
{
in_rule = false;
#if 1
piece_pack();
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"10\">");
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
- piece_append("<PLex_PercentBraceAction>");
+ piece_append("<PLex_Text>");
return ~'\n';
#else
return '\n';
#endif
}
flush();
- piece_append("<PLex_PercentBraceAction>");
+ piece_append("<PLex_Text>");
}
{WS}"|".*{NL} {
if (sf_skip_ws()){
in_rule = false;
#if 1
piece_pack();
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"10\">");
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
- piece_append("<PLex_Section2_Rule_Action>");
+ piece_append("<PLex_Section2_Rule_Action><PLex_Text>");
return ~'\n';
#else
return '\n';
in_rule = false;
#if 1
piece_pack();
-#if 1
piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"10\">");
- piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
- piece_append("<PLex_Section2_Rule_Action>");
+ piece_append("<PLex_Section2_Rule_Action><PLex_Text>");
return ~'\n';
#else
return '\n';
#if 1
piece_pack();
piece_append("</PLex_Section2>");
-#if 1
- piece_esc(yytext, strlen(yytext));
-#else
- piece_append("<token value=\"0\">");
piece_esc(yytext, strlen(yytext));
- piece_append("</token>");
-#endif
piece_pack();
piece_append("<PLex_Section3>");
return ~YY_NULL;
#if 1
piece_pack();
piece_append("</PLex_Section2>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
<PERCENT_BRACE_ACTION>{
- {OPTWS}"%}".* bracelevel = 0;
+ {OPTWS}"%}".* bracelevel = 0; piece_append("</PLex_Text>");
<ACTION>"/*" ACTION_ECHO; yy_push_state( CODE_COMMENT );
doing_rule_action = doing_codeblock = false;
BEGIN(SECT2);
- piece_append("</PLex_PercentBraceAction>");
+ flush();
+ piece_append("</PLex_Section2_Rule_Action>");
}
}
}
#if 1
piece_pack();
piece_append("</PLex_Section3>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
#if 1
piece_pack();
piece_append("</PLex_Section3>");
-#if 0
- piece_append("<token value=\"0\" />");
-#endif
piece_pack();
return ~YY_NULL;
#else
if (i < 21 || strcmp(piece[piece0] + i - 21, "</PLex_Section2_Rule>") != 0)
abort();
piece[piece0][i - 21] = 0;
- piece_append("</PLex_Section2_Rule_Action></PLex_Section2_Rule>");
+ piece_append("</PLex_Text></PLex_Section2_Rule_Action></PLex_Section2_Rule>");
piece_pack();
}