123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741 |
- #define CONTIG 57346
- #define QTEXT 57347
- #define SPACE 57348
- #define THIN 57349
- #define TAB 57350
- #define MATRIX 57351
- #define LCOL 57352
- #define CCOL 57353
- #define RCOL 57354
- #define COL 57355
- #define ABOVE 57356
- #define MARK 57357
- #define LINEUP 57358
- #define SUM 57359
- #define INT 57360
- #define PROD 57361
- #define UNION 57362
- #define INTER 57363
- #define DEFINE 57364
- #define TDEFINE 57365
- #define NDEFINE 57366
- #define DELIM 57367
- #define GSIZE 57368
- #define GFONT 57369
- #define INCLUDE 57370
- #define IFDEF 57371
- #define DOTEQ 57372
- #define DOTEN 57373
- #define FROM 57374
- #define TO 57375
- #define OVER 57376
- #define SQRT 57377
- #define SUP 57378
- #define SUB 57379
- #define SIZE 57380
- #define FONT 57381
- #define ROMAN 57382
- #define ITALIC 57383
- #define BOLD 57384
- #define FAT 57385
- #define UP 57386
- #define DOWN 57387
- #define BACK 57388
- #define FWD 57389
- #define LEFT 57390
- #define RIGHT 57391
- #define DOT 57392
- #define DOTDOT 57393
- #define HAT 57394
- #define TILDE 57395
- #define BAR 57396
- #define LOWBAR 57397
- #define HIGHBAR 57398
- #define UNDER 57399
- #define VEC 57400
- #define DYAD 57401
- #define UTILDE 57402
- #line 17 "/sys/src/cmd/eqn/eqn.y"
- #include "e.h"
- int yylex(void);
- extern int yyerrflag;
- #ifndef YYMAXDEPTH
- #define YYMAXDEPTH 150
- #endif
- #ifndef YYSTYPE
- #define YYSTYPE int
- #endif
- YYSTYPE yylval;
- YYSTYPE yyval;
- #define YYEOFCODE 1
- #define YYERRCODE 2
- #line 140 "/sys/src/cmd/eqn/eqn.y"
- short yyexca[] =
- {-1, 0,
- 1, 3,
- -2, 0,
- -1, 1,
- 1, -1,
- -2, 0,
- };
- #define YYNPROD 90
- #define YYPRIVATE 57344
- #define YYLAST 469
- short yyact[] =
- {
- 4, 103, 119, 45, 27, 118, 104, 2, 102, 41,
- 42, 43, 44, 65, 80, 81, 79, 66, 67, 68,
- 69, 70, 50, 49, 74, 75, 76, 77, 105, 73,
- 40, 80, 81, 80, 81, 114, 61, 64, 54, 62,
- 57, 58, 59, 60, 55, 56, 63, 78, 91, 92,
- 82, 26, 83, 85, 86, 87, 88, 90, 51, 52,
- 48, 124, 50, 49, 117, 25, 45, 117, 72, 71,
- 80, 81, 113, 24, 45, 23, 61, 64, 54, 62,
- 57, 58, 59, 60, 55, 56, 63, 53, 89, 100,
- 84, 22, 96, 95, 106, 107, 108, 109, 99, 110,
- 111, 41, 42, 43, 44, 45, 98, 115, 21, 94,
- 93, 18, 130, 123, 17, 116, 121, 46, 112, 125,
- 127, 128, 1, 129, 126, 0, 0, 45, 8, 7,
- 9, 10, 11, 28, 41, 42, 43, 44, 0, 16,
- 47, 12, 34, 13, 14, 15, 61, 64, 54, 62,
- 57, 58, 59, 60, 55, 56, 63, 0, 0, 20,
- 0, 0, 29, 33, 30, 31, 32, 19, 37, 39,
- 38, 36, 35, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 6, 97, 8, 7, 9,
- 10, 11, 28, 41, 42, 43, 44, 0, 16, 47,
- 12, 34, 13, 14, 15, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 20, 0,
- 0, 29, 33, 30, 31, 32, 19, 37, 39, 38,
- 36, 35, 101, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 3, 6, 8, 7, 9, 10, 11,
- 28, 41, 42, 43, 44, 0, 16, 5, 12, 34,
- 13, 14, 15, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 20, 0, 0, 29,
- 33, 30, 31, 32, 19, 37, 39, 38, 36, 35,
- 0, 0, 8, 7, 9, 10, 11, 28, 41, 42,
- 43, 44, 6, 16, 47, 12, 34, 13, 14, 15,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 20, 0, 0, 29, 33, 30, 31,
- 32, 19, 37, 39, 38, 36, 35, 0, 0, 8,
- 7, 9, 10, 11, 28, 41, 42, 43, 44, 6,
- 16, 5, 12, 34, 13, 14, 15, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 20, 0, 0, 29, 33, 30, 31, 32, 19, 37,
- 39, 38, 36, 35, 8, 7, 9, 10, 11, 28,
- 41, 42, 43, 44, 0, 16, 6, 12, 34, 13,
- 14, 15, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 20, 0, 0, 29, 33,
- 30, 31, 32, 19, 37, 39, 38, 36, 35, 51,
- 122, 48, 0, 50, 49, 0, 0, 0, 0, 0,
- 0, 6, 0, 0, 120, 49, 0, 61, 64, 54,
- 62, 57, 58, 59, 60, 55, 56, 63, 61, 64,
- 54, 62, 57, 58, 59, 60, 55, 56, 63
- };
- short yypact[] =
- {
- 241,-1000, 288,-1000, 26,-1000, 335,-1000,-1000,-1000,
- -1000,-1000,-1000,-1000,-1000,-1000, 380, 380, 380, 380,
- 380, 32, 335, 380, 380, 380, 380,-1000,-1000, 66,
- -1000,-1000,-1000, 66,-1000, 29, 66, 66, 66, 66,
- 27,-1000,-1000,-1000,-1000, 26,-1000, 380, 380,-1000,
- -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
- -1000,-1000,-1000,-1000,-1000, 124, 26, 96, 96, 96,
- -14,-1000,-1000, 183, 96, 96, 96, 96, -53,-1000,
- -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000, 335,
- -1000, 26, -14, 380, 380, 380, 380,-1000, 380, 380,
- -1000, 10, 91, 53, 288, -56, 408, -14, 397, 26,
- 408, -14,-1000,-1000, -1,-1000,-1000, 335, 335,-1000,
- 380,-1000, 380,-1000,-1000,-1000, 288, 50, -14, 26,
- -1000
- };
- short yypgo[] =
- {
- 0, 122, 6, 0, 117, 2, 116, 114, 111, 110,
- 109, 108, 106, 98, 93, 92, 91, 89, 87, 75,
- 73, 65, 51, 4, 47, 35, 16, 30, 1, 28
- };
- short yyr1[] =
- {
- 0, 1, 1, 1, 2, 2, 2, 2, 4, 5,
- 5, 6, 6, 3, 3, 3, 3, 3, 3, 3,
- 3, 3, 3, 3, 3, 3, 3, 3, 3, 9,
- 3, 10, 3, 12, 3, 13, 3, 3, 14, 3,
- 15, 3, 3, 3, 3, 3, 3, 3, 3, 3,
- 24, 3, 11, 19, 20, 21, 22, 18, 18, 18,
- 18, 18, 18, 18, 18, 18, 18, 18, 16, 16,
- 17, 17, 25, 25, 23, 29, 23, 27, 27, 27,
- 27, 28, 28, 7, 8, 8, 8, 8, 26, 26
- };
- short yyr2[] =
- {
- 0, 1, 1, 0, 1, 2, 2, 1, 2, 2,
- 0, 2, 0, 3, 1, 1, 1, 1, 1, 1,
- 1, 1, 1, 3, 2, 2, 2, 2, 2, 0,
- 5, 0, 4, 0, 5, 0, 4, 1, 0, 5,
- 0, 4, 3, 2, 2, 2, 2, 2, 2, 1,
- 0, 5, 1, 2, 2, 2, 2, 1, 1, 1,
- 1, 1, 1, 1, 1, 1, 1, 1, 2, 2,
- 2, 2, 1, 2, 4, 0, 6, 1, 1, 1,
- 1, 1, 3, 2, 1, 1, 1, 2, 1, 1
- };
- short yychk[] =
- {
- -1000, -1, -2, 2, -3, 16, 61, 5, 4, 6,
- 7, 8, 17, 19, 20, 21, 15, -7, -8, 43,
- 35, -11, -16, -19, -20, -21, -22, -23, 9, 38,
- 40, 41, 42, 39, 18, 48, 47, 44, 46, 45,
- -27, 10, 11, 12, 13, -3, -4, 16, 34, 37,
- 36, 32, 33, -18, 52, 58, 59, 54, 55, 56,
- 57, 50, 53, 60, 51, -2, -3, -3, -3, -3,
- -3, 37, 36, -2, -3, -3, -3, -3, -24, -26,
- 4, 5, -26, -26, 61, -26, -26, -26, -26, 61,
- -26, -3, -3, -9, -10, -14, -15, 62, -12, -13,
- -17, 49, 61, -28, -2, -29, -3, -3, -3, -3,
- -3, -3, -26, 62, -25, -23, 62, 14, 61, -5,
- 36, -6, 33, -5, 62, -23, -2, -28, -3, -3,
- 62
- };
- short yydef[] =
- {
- -2, -2, 1, 2, 4, 7, 0, 14, 15, 16,
- 17, 18, 19, 20, 21, 22, 0, 0, 0, 0,
- 0, 37, 0, 0, 0, 0, 0, 49, 50, 0,
- 84, 85, 86, 0, 52, 0, 0, 0, 0, 0,
- 0, 77, 78, 79, 80, 5, 6, 0, 0, 29,
- 31, 38, 40, 44, 57, 58, 59, 60, 61, 62,
- 63, 64, 65, 66, 67, 0, 24, 25, 26, 27,
- 28, 33, 35, 43, 45, 46, 47, 48, 0, 83,
- 88, 89, 87, 68, 69, 53, 54, 55, 56, 0,
- 75, 8, 23, 0, 0, 0, 0, 13, 0, 0,
- 42, 0, 0, 0, 81, 0, 10, 32, 12, 41,
- 10, 36, 70, 71, 0, 72, 74, 0, 0, 30,
- 0, 39, 0, 34, 51, 73, 82, 0, 9, 11,
- 76
- };
- short yytok1[] =
- {
- 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, 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, 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, 61, 0, 62
- };
- short yytok2[] =
- {
- 2, 3, 4, 5, 6, 7, 8, 9, 10, 11,
- 12, 13, 14, 15, 16, 17, 18, 19, 20, 21,
- 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
- 32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
- 42, 43, 44, 45, 46, 47, 48, 49, 50, 51,
- 52, 53, 54, 55, 56, 57, 58, 59, 60
- };
- long yytok3[] =
- {
- 0
- };
- #define YYFLAG -1000
- #define YYERROR goto yyerrlab
- #define YYACCEPT return(0)
- #define YYABORT return(1)
- #define yyclearin yychar = -1
- #define yyerrok yyerrflag = 0
- #ifdef yydebug
- #include "y.debug"
- #else
- #define yydebug 0
- char* yytoknames[1]; /* for debugging */
- char* yystates[1]; /* for debugging */
- #endif
- /* parser for yacc output */
- int yynerrs = 0; /* number of errors */
- int yyerrflag = 0; /* error recovery flag */
- char*
- yytokname(int yyc)
- {
- static char x[16];
- if(yyc > 0 && yyc <= sizeof(yytoknames)/sizeof(yytoknames[0]))
- if(yytoknames[yyc-1])
- return yytoknames[yyc-1];
- sprintf(x, "<%d>", yyc);
- return x;
- }
- char*
- yystatname(int yys)
- {
- static char x[16];
- if(yys >= 0 && yys < sizeof(yystates)/sizeof(yystates[0]))
- if(yystates[yys])
- return yystates[yys];
- sprintf(x, "<%d>\n", yys);
- return x;
- }
- long
- yylex1(void)
- {
- long yychar;
- long *t3p;
- int c;
- yychar = yylex();
- if(yychar <= 0) {
- c = yytok1[0];
- goto out;
- }
- if(yychar < sizeof(yytok1)/sizeof(yytok1[0])) {
- c = yytok1[yychar];
- goto out;
- }
- if(yychar >= YYPRIVATE)
- if(yychar < YYPRIVATE+sizeof(yytok2)/sizeof(yytok2[0])) {
- c = yytok2[yychar-YYPRIVATE];
- goto out;
- }
- for(t3p=yytok3;; t3p+=2) {
- c = t3p[0];
- if(c == yychar) {
- c = t3p[1];
- goto out;
- }
- if(c == 0)
- break;
- }
- c = 0;
- out:
- if(c == 0)
- c = yytok2[1]; /* unknown char */
- if(yydebug >= 3)
- printf("lex %.4lX %s\n", yychar, yytokname(c));
- return c;
- }
- int
- yyparse(void)
- {
- struct
- {
- YYSTYPE yyv;
- int yys;
- } yys[YYMAXDEPTH], *yyp, *yypt;
- short *yyxi;
- int yyj, yym, yystate, yyn, yyg;
- YYSTYPE save1, save2;
- int save3, save4;
- long yychar;
- save1 = yylval;
- save2 = yyval;
- save3 = yynerrs;
- save4 = yyerrflag;
- yystate = 0;
- yychar = -1;
- yynerrs = 0;
- yyerrflag = 0;
- yyp = &yys[-1];
- goto yystack;
- ret0:
- yyn = 0;
- goto ret;
- ret1:
- yyn = 1;
- goto ret;
- ret:
- yylval = save1;
- yyval = save2;
- yynerrs = save3;
- yyerrflag = save4;
- return yyn;
- yystack:
- /* put a state and value onto the stack */
- if(yydebug >= 4)
- printf("char %s in %s", yytokname(yychar), yystatname(yystate));
- yyp++;
- if(yyp >= &yys[YYMAXDEPTH]) {
- yyerror("yacc stack overflow");
- goto ret1;
- }
- yyp->yys = yystate;
- yyp->yyv = yyval;
- yynewstate:
- yyn = yypact[yystate];
- if(yyn <= YYFLAG)
- goto yydefault; /* simple state */
- if(yychar < 0)
- yychar = yylex1();
- yyn += yychar;
- if(yyn < 0 || yyn >= YYLAST)
- goto yydefault;
- yyn = yyact[yyn];
- if(yychk[yyn] == yychar) { /* valid shift */
- yychar = -1;
- yyval = yylval;
- yystate = yyn;
- if(yyerrflag > 0)
- yyerrflag--;
- goto yystack;
- }
- yydefault:
- /* default state action */
- yyn = yydef[yystate];
- if(yyn == -2) {
- if(yychar < 0)
- yychar = yylex1();
- /* look through exception table */
- for(yyxi=yyexca;; yyxi+=2)
- if(yyxi[0] == -1 && yyxi[1] == yystate)
- break;
- for(yyxi += 2;; yyxi += 2) {
- yyn = yyxi[0];
- if(yyn < 0 || yyn == yychar)
- break;
- }
- yyn = yyxi[1];
- if(yyn < 0)
- goto ret0;
- }
- if(yyn == 0) {
- /* error ... attempt to resume parsing */
- switch(yyerrflag) {
- case 0: /* brand new error */
- yyerror("syntax error");
- if(yydebug >= 1) {
- printf("%s", yystatname(yystate));
- printf("saw %s\n", yytokname(yychar));
- }
- yyerrlab:
- yynerrs++;
- case 1:
- case 2: /* incompletely recovered error ... try again */
- yyerrflag = 3;
- /* find a state where "error" is a legal shift action */
- while(yyp >= yys) {
- yyn = yypact[yyp->yys] + YYERRCODE;
- if(yyn >= 0 && yyn < YYLAST) {
- yystate = yyact[yyn]; /* simulate a shift of "error" */
- if(yychk[yystate] == YYERRCODE)
- goto yystack;
- }
- /* the current yyp has no shift onn "error", pop stack */
- if(yydebug >= 2)
- printf("error recovery pops state %d, uncovers %d\n",
- yyp->yys, (yyp-1)->yys );
- yyp--;
- }
- /* there is no state on the stack with an error shift ... abort */
- goto ret1;
- case 3: /* no shift yet; clobber input char */
- if(yydebug >= YYEOFCODE)
- printf("error recovery discards %s\n", yytokname(yychar));
- if(yychar == YYEOFCODE)
- goto ret1;
- yychar = -1;
- goto yynewstate; /* try again in the same state */
- }
- }
- /* reduction by production yyn */
- if(yydebug >= 2)
- printf("reduce %d in:\n\t%s", yyn, yystatname(yystate));
- yypt = yyp;
- yyp -= yyr2[yyn];
- yyval = (yyp+1)->yyv;
- yym = yyn;
- /* consult goto table to find next state */
- yyn = yyr1[yyn];
- yyg = yypgo[yyn];
- yyj = yyg + yyp->yys + 1;
- if(yyj >= YYLAST || yychk[yystate=yyact[yyj]] != -yyn)
- yystate = yyact[yyg];
- switch(yym) {
-
- case 1:
- #line 24 "/sys/src/cmd/eqn/eqn.y"
- { putout(yypt[-0].yyv); } break;
- case 2:
- #line 25 "/sys/src/cmd/eqn/eqn.y"
- { ERROR "syntax error" WARNING; } break;
- case 3:
- #line 26 "/sys/src/cmd/eqn/eqn.y"
- { eqnreg = 0; } break;
- case 5:
- #line 30 "/sys/src/cmd/eqn/eqn.y"
- { eqnbox(yypt[-1].yyv, yypt[-0].yyv, 0); } break;
- case 6:
- #line 31 "/sys/src/cmd/eqn/eqn.y"
- { eqnbox(yypt[-1].yyv, yypt[-0].yyv, 1); } break;
- case 7:
- #line 32 "/sys/src/cmd/eqn/eqn.y"
- { lineup(0); } break;
- case 8:
- #line 35 "/sys/src/cmd/eqn/eqn.y"
- { yyval = yypt[-0].yyv; lineup(1); } break;
- case 9:
- #line 38 "/sys/src/cmd/eqn/eqn.y"
- { yyval = yypt[-0].yyv; } break;
- case 10:
- #line 39 "/sys/src/cmd/eqn/eqn.y"
- { yyval = 0; } break;
- case 11:
- #line 42 "/sys/src/cmd/eqn/eqn.y"
- { yyval = yypt[-0].yyv; } break;
- case 12:
- #line 43 "/sys/src/cmd/eqn/eqn.y"
- { yyval = 0; } break;
- case 13:
- #line 46 "/sys/src/cmd/eqn/eqn.y"
- { yyval = yypt[-1].yyv; } break;
- case 14:
- #line 47 "/sys/src/cmd/eqn/eqn.y"
- { text(QTEXT, (char *) yypt[-0].yyv); } break;
- case 15:
- #line 48 "/sys/src/cmd/eqn/eqn.y"
- { text(CONTIG, (char *) yypt[-0].yyv); } break;
- case 16:
- #line 49 "/sys/src/cmd/eqn/eqn.y"
- { text(SPACE, (char *) 0); } break;
- case 17:
- #line 50 "/sys/src/cmd/eqn/eqn.y"
- { text(THIN, (char *) 0); } break;
- case 18:
- #line 51 "/sys/src/cmd/eqn/eqn.y"
- { text(TAB, (char *) 0); } break;
- case 19:
- #line 52 "/sys/src/cmd/eqn/eqn.y"
- { funny(SUM); } break;
- case 20:
- #line 53 "/sys/src/cmd/eqn/eqn.y"
- { funny(PROD); } break;
- case 21:
- #line 54 "/sys/src/cmd/eqn/eqn.y"
- { funny(UNION); } break;
- case 22:
- #line 55 "/sys/src/cmd/eqn/eqn.y"
- { funny(INTER); } break;
- case 23:
- #line 56 "/sys/src/cmd/eqn/eqn.y"
- { boverb(yypt[-2].yyv, yypt[-0].yyv); } break;
- case 24:
- #line 57 "/sys/src/cmd/eqn/eqn.y"
- { mark(yypt[-0].yyv); } break;
- case 25:
- #line 58 "/sys/src/cmd/eqn/eqn.y"
- { size(yypt[-1].yyv, yypt[-0].yyv); } break;
- case 26:
- #line 59 "/sys/src/cmd/eqn/eqn.y"
- { font(yypt[-1].yyv, yypt[-0].yyv); } break;
- case 27:
- #line 60 "/sys/src/cmd/eqn/eqn.y"
- { fatbox(yypt[-0].yyv); } break;
- case 28:
- #line 61 "/sys/src/cmd/eqn/eqn.y"
- { sqrt(yypt[-0].yyv); } break;
- case 29:
- #line 62 "/sys/src/cmd/eqn/eqn.y"
- {ps -= deltaps;} break;
- case 30:
- #line 62 "/sys/src/cmd/eqn/eqn.y"
- { subsup(yypt[-4].yyv, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 31:
- #line 63 "/sys/src/cmd/eqn/eqn.y"
- {ps -= deltaps;} break;
- case 32:
- #line 63 "/sys/src/cmd/eqn/eqn.y"
- { subsup(yypt[-3].yyv, 0, yypt[-0].yyv); } break;
- case 33:
- #line 64 "/sys/src/cmd/eqn/eqn.y"
- {ps -= deltaps;} break;
- case 34:
- #line 64 "/sys/src/cmd/eqn/eqn.y"
- { integral(yypt[-4].yyv, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 35:
- #line 65 "/sys/src/cmd/eqn/eqn.y"
- {ps -= deltaps;} break;
- case 36:
- #line 65 "/sys/src/cmd/eqn/eqn.y"
- { integral(yypt[-3].yyv, 0, yypt[-0].yyv); } break;
- case 37:
- #line 66 "/sys/src/cmd/eqn/eqn.y"
- { integral(yypt[-0].yyv, 0, 0); } break;
- case 38:
- #line 67 "/sys/src/cmd/eqn/eqn.y"
- {ps -= deltaps;} break;
- case 39:
- #line 67 "/sys/src/cmd/eqn/eqn.y"
- { fromto(yypt[-4].yyv, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 40:
- #line 68 "/sys/src/cmd/eqn/eqn.y"
- {ps -= deltaps;} break;
- case 41:
- #line 68 "/sys/src/cmd/eqn/eqn.y"
- { fromto(yypt[-3].yyv, 0, yypt[-0].yyv); } break;
- case 42:
- #line 69 "/sys/src/cmd/eqn/eqn.y"
- { paren(yypt[-2].yyv, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 43:
- #line 70 "/sys/src/cmd/eqn/eqn.y"
- { paren(yypt[-1].yyv, yypt[-0].yyv, 0); } break;
- case 44:
- #line 71 "/sys/src/cmd/eqn/eqn.y"
- { diacrit(yypt[-1].yyv, yypt[-0].yyv); } break;
- case 45:
- #line 72 "/sys/src/cmd/eqn/eqn.y"
- { move(FWD, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 46:
- #line 73 "/sys/src/cmd/eqn/eqn.y"
- { move(UP, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 47:
- #line 74 "/sys/src/cmd/eqn/eqn.y"
- { move(BACK, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 48:
- #line 75 "/sys/src/cmd/eqn/eqn.y"
- { move(DOWN, yypt[-1].yyv, yypt[-0].yyv); } break;
- case 49:
- #line 76 "/sys/src/cmd/eqn/eqn.y"
- { pile(yypt[-0].yyv); ct = yypt[-0].yyv; } break;
- case 50:
- #line 77 "/sys/src/cmd/eqn/eqn.y"
- {yyval=ct;} break;
- case 51:
- #line 77 "/sys/src/cmd/eqn/eqn.y"
- { matrix(yypt[-3].yyv); ct = yypt[-3].yyv; } break;
- case 52:
- #line 80 "/sys/src/cmd/eqn/eqn.y"
- { setintegral(); } break;
- case 53:
- #line 83 "/sys/src/cmd/eqn/eqn.y"
- { yyval = atoi((char *) yypt[-1].yyv); } break;
- case 54:
- #line 84 "/sys/src/cmd/eqn/eqn.y"
- { yyval = atoi((char *) yypt[-1].yyv); } break;
- case 55:
- #line 85 "/sys/src/cmd/eqn/eqn.y"
- { yyval = atoi((char *) yypt[-1].yyv); } break;
- case 56:
- #line 86 "/sys/src/cmd/eqn/eqn.y"
- { yyval = atoi((char *) yypt[-1].yyv); } break;
- case 57:
- #line 88 "/sys/src/cmd/eqn/eqn.y"
- { yyval = HAT; } break;
- case 58:
- #line 89 "/sys/src/cmd/eqn/eqn.y"
- { yyval = VEC; } break;
- case 59:
- #line 90 "/sys/src/cmd/eqn/eqn.y"
- { yyval = DYAD; } break;
- case 60:
- #line 91 "/sys/src/cmd/eqn/eqn.y"
- { yyval = BAR; } break;
- case 61:
- #line 92 "/sys/src/cmd/eqn/eqn.y"
- { yyval = LOWBAR; } break;
- case 62:
- #line 93 "/sys/src/cmd/eqn/eqn.y"
- { yyval = HIGHBAR; } break;
- case 63:
- #line 94 "/sys/src/cmd/eqn/eqn.y"
- { yyval = UNDER; } break;
- case 64:
- #line 95 "/sys/src/cmd/eqn/eqn.y"
- { yyval = DOT; } break;
- case 65:
- #line 96 "/sys/src/cmd/eqn/eqn.y"
- { yyval = TILDE; } break;
- case 66:
- #line 97 "/sys/src/cmd/eqn/eqn.y"
- { yyval = UTILDE; } break;
- case 67:
- #line 98 "/sys/src/cmd/eqn/eqn.y"
- { yyval = DOTDOT; } break;
- case 68:
- #line 101 "/sys/src/cmd/eqn/eqn.y"
- { yyval = ((char *)yypt[-0].yyv)[0]; } break;
- case 69:
- #line 102 "/sys/src/cmd/eqn/eqn.y"
- { yyval = '{'; } break;
- case 70:
- #line 105 "/sys/src/cmd/eqn/eqn.y"
- { yyval = ((char *)yypt[-0].yyv)[0]; } break;
- case 71:
- #line 106 "/sys/src/cmd/eqn/eqn.y"
- { yyval = '}'; } break;
- case 74:
- #line 113 "/sys/src/cmd/eqn/eqn.y"
- { column(yypt[-3].yyv, DEFGAP); } break;
- case 75:
- #line 114 "/sys/src/cmd/eqn/eqn.y"
- {yyval=atoi((char*)yypt[-0].yyv);} break;
- case 76:
- #line 114 "/sys/src/cmd/eqn/eqn.y"
- { column(yypt[-5].yyv, yypt[-3].yyv); } break;
- case 77:
- #line 117 "/sys/src/cmd/eqn/eqn.y"
- { yyval = startcol(LCOL); } break;
- case 78:
- #line 118 "/sys/src/cmd/eqn/eqn.y"
- { yyval = startcol(CCOL); } break;
- case 79:
- #line 119 "/sys/src/cmd/eqn/eqn.y"
- { yyval = startcol(RCOL); } break;
- case 80:
- #line 120 "/sys/src/cmd/eqn/eqn.y"
- { yyval = startcol(COL); } break;
- case 81:
- #line 123 "/sys/src/cmd/eqn/eqn.y"
- { lp[ct++] = yypt[-0].yyv; } break;
- case 82:
- #line 124 "/sys/src/cmd/eqn/eqn.y"
- { lp[ct++] = yypt[-0].yyv; } break;
- case 83:
- #line 127 "/sys/src/cmd/eqn/eqn.y"
- { yyval = ps; setsize((char *) yypt[-0].yyv); } break;
- case 84:
- #line 130 "/sys/src/cmd/eqn/eqn.y"
- { static char R[]="R"; setfont(R); } break;
- case 85:
- #line 131 "/sys/src/cmd/eqn/eqn.y"
- { static char I[]="I"; setfont(I); } break;
- case 86:
- #line 132 "/sys/src/cmd/eqn/eqn.y"
- { static char B[]="B"; setfont(B); } break;
- case 87:
- #line 133 "/sys/src/cmd/eqn/eqn.y"
- { setfont((char *)yypt[-0].yyv); } break;
- }
- goto yystack; /* stack new state and value */
- }
|