diff options
Diffstat (limited to 'Build/source/texk/web2c/otps/otp-lexer.c')
| -rw-r--r-- | Build/source/texk/web2c/otps/otp-lexer.c | 63 |
1 files changed, 33 insertions, 30 deletions
diff --git a/Build/source/texk/web2c/otps/otp-lexer.c b/Build/source/texk/web2c/otps/otp-lexer.c index 0bbc4df5337..b4a40b2ecfa 100644 --- a/Build/source/texk/web2c/otps/otp-lexer.c +++ b/Build/source/texk/web2c/otps/otp-lexer.c @@ -605,9 +605,8 @@ along with Omega; if not, write to the Free Software Foundation, Inc., #define YY_NO_UNPUT #define OTP_MAXCODE 0xFFFF int line_number = 1; -int i,j,last; extern YYSTYPE yylval; -#line 611 "otp-lexer.c" +#line 610 "otp-lexer.c" #define INITIAL 0 @@ -789,9 +788,9 @@ YY_DECL register char *yy_cp, *yy_bp; register int yy_act; -#line 44 "otp-lexer.l" +#line 43 "otp-lexer.l" -#line 795 "otp-lexer.c" +#line 794 "otp-lexer.c" if ( !(yy_init) ) { @@ -895,25 +894,26 @@ do_action: /* This label is used only to access EOF actions. */ { /* beginning of action switch */ case 1: YY_RULE_SETUP -#line 45 "otp-lexer.l" +#line 44 "otp-lexer.l" {} YY_BREAK case 2: /* rule 2 can match eol */ YY_RULE_SETUP -#line 46 "otp-lexer.l" +#line 45 "otp-lexer.l" { line_number++;} YY_BREAK case 3: /* rule 3 can match eol */ YY_RULE_SETUP -#line 47 "otp-lexer.l" +#line 46 "otp-lexer.l" { line_number++;} YY_BREAK case 4: YY_RULE_SETUP -#line 48 "otp-lexer.l" +#line 47 "otp-lexer.l" { + int i, j; yylval.yint=0; for (i=2; i<yyleng; i++) { j = yytext[i]; @@ -937,6 +937,7 @@ case 5: YY_RULE_SETUP #line 67 "otp-lexer.l" { + int i, j; yylval.yint=0; for (i=2; i<yyleng; i++) { j = yytext[i]; @@ -952,8 +953,9 @@ YY_RULE_SETUP YY_BREAK case 6: YY_RULE_SETUP -#line 80 "otp-lexer.l" +#line 81 "otp-lexer.l" { + int i, j; yylval.yint=0; for (i=0; i<yyleng; i++) { j = yytext[i]; @@ -969,7 +971,7 @@ YY_RULE_SETUP YY_BREAK case 7: YY_RULE_SETUP -#line 93 "otp-lexer.l" +#line 95 "otp-lexer.l" { yylval.yint=yytext[1]; return(NUMBER); @@ -977,14 +979,15 @@ YY_RULE_SETUP YY_BREAK case 8: YY_RULE_SETUP -#line 97 "otp-lexer.l" +#line 99 "otp-lexer.l" { yylval.ystring=xstrdup(yytext); return(ID); } YY_BREAK case 9: /* rule 9 can match eol */ YY_RULE_SETUP -#line 98 "otp-lexer.l" +#line 100 "otp-lexer.l" { + int i, j, last; char *newtext; last=yyleng-2; i=0; @@ -1002,85 +1005,85 @@ YY_RULE_SETUP YY_BREAK case 10: YY_RULE_SETUP -#line 113 "otp-lexer.l" +#line 116 "otp-lexer.l" return(RIGHTARROW); YY_BREAK case 11: YY_RULE_SETUP -#line 114 "otp-lexer.l" +#line 117 "otp-lexer.l" return(LEFTARROW); YY_BREAK case 12: YY_RULE_SETUP -#line 115 "otp-lexer.l" +#line 118 "otp-lexer.l" return(INPUT); YY_BREAK case 13: YY_RULE_SETUP -#line 116 "otp-lexer.l" +#line 119 "otp-lexer.l" return(OUTPUT); YY_BREAK case 14: YY_RULE_SETUP -#line 117 "otp-lexer.l" +#line 120 "otp-lexer.l" return(ALIASES); YY_BREAK case 15: YY_RULE_SETUP -#line 118 "otp-lexer.l" +#line 121 "otp-lexer.l" return(STATES); YY_BREAK case 16: YY_RULE_SETUP -#line 119 "otp-lexer.l" +#line 122 "otp-lexer.l" return(TABLES); YY_BREAK case 17: YY_RULE_SETUP -#line 120 "otp-lexer.l" +#line 123 "otp-lexer.l" return(EXPRESSIONS); YY_BREAK case 18: YY_RULE_SETUP -#line 121 "otp-lexer.l" +#line 124 "otp-lexer.l" return(PUSH); YY_BREAK case 19: YY_RULE_SETUP -#line 122 "otp-lexer.l" +#line 125 "otp-lexer.l" return(POP); YY_BREAK case 20: YY_RULE_SETUP -#line 123 "otp-lexer.l" +#line 126 "otp-lexer.l" return(DIV); YY_BREAK case 21: YY_RULE_SETUP -#line 124 "otp-lexer.l" +#line 127 "otp-lexer.l" return(MOD); YY_BREAK case 22: YY_RULE_SETUP -#line 125 "otp-lexer.l" +#line 128 "otp-lexer.l" return(BEG); YY_BREAK case 23: YY_RULE_SETUP -#line 126 "otp-lexer.l" +#line 129 "otp-lexer.l" return(END); YY_BREAK case 24: YY_RULE_SETUP -#line 127 "otp-lexer.l" +#line 130 "otp-lexer.l" return(yytext[0]); YY_BREAK case 25: YY_RULE_SETUP -#line 129 "otp-lexer.l" +#line 132 "otp-lexer.l" ECHO; YY_BREAK -#line 1084 "otp-lexer.c" +#line 1087 "otp-lexer.c" case YY_STATE_EOF(INITIAL): yyterminate(); @@ -2064,7 +2067,7 @@ void yyfree (void * ptr ) #define YYTABLES_NAME "yytables" -#line 129 "otp-lexer.l" +#line 132 "otp-lexer.l" |