lex.c

編譯器的辭法分析器工具

return p_exactly0('$');
}
static STATUS hid114(){
return p_exactly0('$');
}
static STATUS hid115(){
PARSER hid113, hid114;
static STATUS p_tok;
P_PAND((TOPARSER hid113)(),(TOPARSER hid114)());
return p_tok;
}
static VOID hid116(){
VV(2)=putname("(TOVALUE p_1)");
}
static STATUS hid117(){
PARSER hid115;ACTION hid116;
return p_attach0n(TOPARSER hid115,0,hid116,0);
}
static STATUS hid118(){
PARSER hid117, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid117)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid119(){
return p_exactly0('$');
}
static VOID hid120(){
putname("(TOVALUE )p_");                   /*putint((1+getcount())*PSTACKLENGTH/10); */                    
}
static STATUS hid121(){
PARSER hid119;ACTION hid120;
return p_attach0n(TOPARSER hid119,0,hid120,0);
}
static STATUS hid122(){
PARSER hid121, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid121)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid123(){
PARSER hid122, integer;
static STATUS p_tok;
P_PAND((TOPARSER hid122)(),(TOPARSER integer)());
return p_tok;
}
static VOID hid124(){
VV(2)=V(2);putchar(')');
}
static STATUS hid125(){
PARSER hid123;ACTION hid124;
return p_attach0n(TOPARSER hid123,0,hid124,0);
}
static STATUS hid126(){
PARSER hid125, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid125)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid127(){
return p_exactly0('$');
}
static VOID hid128(){
putname("(TOVALUE ");
}
static STATUS hid129(){
PARSER hid127;ACTION hid128;
return p_attach0n(TOPARSER hid127,0,hid128,0);
}
static STATUS hid130(){
PARSER hid129, IDENTIFIER;
static STATUS p_tok;
P_PAND((TOPARSER hid129)(),(TOPARSER IDENTIFIER)());
return p_tok;
}
static VOID hid131(){
VV(2)=putchar(')');
}
static STATUS hid132(){
PARSER hid130;ACTION hid131;
return p_attach0n(TOPARSER hid130,0,hid131,0);
}
static STATUS hid133 (){
PARSER hid126, hid132;
static STATUS p_tok;
p_tok = (TOPARSER hid126) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid132) ();
}
static STATUS hid134 (){
PARSER hid118, hid133;
static STATUS p_tok;
p_tok = (TOPARSER hid118) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid133) ();
}
STATUS DOLLARID(){
PARSER hid134;
return((TOPARSER hid134)());
}

static STATUS hid135(){
PARSER optsign, somedigits;
static STATUS p_tok;
P_PAND((TOPARSER optsign)(),(TOPARSER somedigits)());
return p_tok;
}
static VOID hid136(){
VV(2)=V(2);
}
static STATUS hid137(){
PARSER hid135;ACTION hid136;
return p_attach0n(TOPARSER hid135,0,hid136,0);
}
STATUS integer(){
PARSER hid137;
return((TOPARSER hid137)());
}

static STATUS hid138(){
return p_exactly0('+');
}
static STATUS hid139(){
return p_exactly0('-');
}
static STATUS hid140(){
return p_exactly0('*');
}
static STATUS hid141(){
return p_exactly0('/');
}
static STATUS hid142(){
return p_exactly0('%');
}
static STATUS hid143(){
return p_exactly0('&');
}
static STATUS hid144(){
return p_exactly0('|');
}
static STATUS hid145(){
return p_exactly0('!');
}
static STATUS hid146(){
return p_exactly0('=');
}
static STATUS hid147(){
return p_exactly0('<');
}
static STATUS hid148(){
return p_exactly0(RIGHT_ANGLE_BRACKET);
}
static STATUS hid149 (){
PARSER hid147, hid148;
static STATUS p_tok;
p_tok = (TOPARSER hid147) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid148) ();
}
static STATUS hid150 (){
PARSER hid146, hid149;
static STATUS p_tok;
p_tok = (TOPARSER hid146) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid149) ();
}
static STATUS hid151 (){
PARSER hid145, hid150;
static STATUS p_tok;
p_tok = (TOPARSER hid145) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid150) ();
}
static STATUS hid152 (){
PARSER hid144, hid151;
static STATUS p_tok;
p_tok = (TOPARSER hid144) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid151) ();
}
static STATUS hid153 (){
PARSER hid143, hid152;
static STATUS p_tok;
p_tok = (TOPARSER hid143) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid152) ();
}
static STATUS hid154 (){
PARSER hid142, hid153;
static STATUS p_tok;
p_tok = (TOPARSER hid142) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid153) ();
}
static STATUS hid155 (){
PARSER hid141, hid154;
static STATUS p_tok;
p_tok = (TOPARSER hid141) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid154) ();
}
static STATUS hid156 (){
PARSER hid140, hid155;
static STATUS p_tok;
p_tok = (TOPARSER hid140) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid155) ();
}
static STATUS hid157 (){
PARSER hid139, hid156;
static STATUS p_tok;
p_tok = (TOPARSER hid139) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid156) ();
}
static STATUS hid158 (){
PARSER hid138, hid157;
static STATUS p_tok;
p_tok = (TOPARSER hid138) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid157) ();
}
STATUS BINOPCHAR(){
PARSER hid158;
return((TOPARSER hid158)());
}

static STATUS hid159(){
return p_exactly0('+');
}
static STATUS hid160(){
return p_exactly0('+');
}
static STATUS hid161(){
PARSER hid159, hid160;
static STATUS p_tok;
P_PAND((TOPARSER hid159)(),(TOPARSER hid160)());
return p_tok;
}
STATUS PLUSPLUS(){
PARSER hid161;
return((TOPARSER hid161)());
}

static STATUS hid162(){
return p_exactly0('-');
}
static STATUS hid163(){
return p_exactly0('-');
}
static STATUS hid164(){
PARSER hid162, hid163;
static STATUS p_tok;
P_PAND((TOPARSER hid162)(),(TOPARSER hid163)());
return p_tok;
}
STATUS MINUSMINUS(){
PARSER hid164;
return((TOPARSER hid164)());
}

static STATUS hid165(){
return p_exactly0('+');
}
static STATUS hid166(){
return p_exactly0('-');
}
static STATUS hid167(){
return p_exactly0('&');
}
static STATUS hid168(){
return p_exactly0('*');
}
static STATUS hid169(){
return p_exactly0('!');
}
static STATUS hid170 (){
PARSER hid168, hid169;
static STATUS p_tok;
p_tok = (TOPARSER hid168) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid169) ();
}
static STATUS hid171 (){
PARSER hid167, hid170;
static STATUS p_tok;
p_tok = (TOPARSER hid167) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid170) ();
}
static STATUS hid172 (){
PARSER hid166, hid171;
static STATUS p_tok;
p_tok = (TOPARSER hid166) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid171) ();
}
static STATUS hid173 (){
PARSER hid165, hid172;
static STATUS p_tok;
p_tok = (TOPARSER hid165) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid172) ();
}
STATUS MONOPCHAR(){
PARSER hid173;
return((TOPARSER hid173)());
}

static STATUS hid174(){
return p_exactly0('<');
}
STATUS LEFTANGLEBRACKET(){
PARSER hid174;
return((TOPARSER hid174)());
}

static STATUS hid175(){
return p_exactly0(RIGHT_ANGLE_BRACKET);
}
STATUS RIGHTANGLEBRACKET(){
PARSER hid175;
return((TOPARSER hid175)());
}

static STATUS hid176(){
PARSER escape, ANYTHING;
static STATUS p_tok;
P_PAND((TOPARSER escape)(),(TOPARSER ANYTHING)());
return p_tok;
}
static VOID hid177(){
VV(2)=V(2);
}
static STATUS hid178(){
PARSER hid176;ACTION hid177;
return p_attach0n(TOPARSER hid176,0,hid177,0);
}
static STATUS hid179(){
PARSER hid178, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid178)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid180(){
return p_notexactly0('>');
}
static STATUS hid181 (){
PARSER hid179, hid180;
static STATUS p_tok;
p_tok = (TOPARSER hid179) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid180) ();
}
STATUS NOTARIGHTANGLEBRACKET(){
PARSER hid181;
return((TOPARSER hid181)());
}

static STATUS hid182(){
PARSER escape, ANYTHING;
static STATUS p_tok;
P_PAND((TOPARSER escape)(),(TOPARSER ANYTHING)());
return p_tok;
}
static VOID hid183(){
VV(2)=V(2);
}
static STATUS hid184(){
PARSER hid182;ACTION hid183;
return p_attach0n(TOPARSER hid182,0,hid183,0);
}
static STATUS hid185(){
PARSER hid184, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid184)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid186(){
return p_notexactly0(LEFT_ANGLE_BRACKET);
}
static STATUS hid187 (){
PARSER hid185, hid186;
static STATUS p_tok;
p_tok = (TOPARSER hid185) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid186) ();
}
STATUS NOTALEFTANGLEBRACKET(){
PARSER hid187;
return((TOPARSER hid187)());
}

static STATUS hid188(){
return p_exactly0('/');
}
STATUS SLASH(){
PARSER hid188;
return((TOPARSER hid188)());
}

static STATUS hid189(){
return p_exactly0('*');
}
STATUS STAR(){
PARSER hid189;
return((TOPARSER hid189)());
}

static STATUS hid190(){
return p_exactly0('@');
}
STATUS AT(){
PARSER hid190;
return((TOPARSER hid190)());
}

static STATUS hid191(){
return p_exactly0('=');
}
STATUS EQUALS(){
PARSER hid191;
return((TOPARSER hid191)());
}

static STATUS hid192(){
return p_notexactly0('@');
}
STATUS NOTANAT(){
PARSER hid192;
return((TOPARSER hid192)());
}

static STATUS hid193(){
return p_exactly0('|');
}
STATUS OR(){
PARSER hid193;
return((TOPARSER hid193)());
}

static STATUS hid194(){
return p_exactly0(':');
}
STATUS COLON(){
PARSER hid194;
return((TOPARSER hid194)());
}

static STATUS hid195 (){
PARSER COLON, p_last0;
static STATUS p_tok;
p_tok = (TOPARSER COLON) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER p_last0) ();
}
STATUS COLONorEOL(){
PARSER hid195;
return((TOPARSER hid195)());
}

static STATUS hid196(){
return p_exactly0(',');
}
STATUS COMMA(){
PARSER hid196;
return((TOPARSER hid196)());
}

static STATUS hid197(){
PARSER escape, ANYTHING;
static STATUS p_tok;
P_PAND((TOPARSER escape)(),(TOPARSER ANYTHING)());
return p_tok;
}
static VOID hid198(){
VV(2)=V(2);
}
static STATUS hid199(){
PARSER hid197;ACTION hid198;
return p_attach0n(TOPARSER hid197,0,hid198,0);
}
static STATUS hid200(){
PARSER hid199, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid199)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid201(){
return p_notexactly0(':');
}
static STATUS hid202 (){
PARSER hid200, hid201;
static STATUS p_tok;
p_tok = (TOPARSER hid200) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid201) ();
}
STATUS NOTACOLON(){
PARSER hid202;
return((TOPARSER hid202)());
}

static STATUS hid203(){
return p_exactly0('?');
}
STATUS QUESTION(){
PARSER hid203;
return((TOPARSER hid203)());
}

static STATUS hid204(){
PARSER SLASH, STAR;
static STATUS p_tok;
P_PAND((TOPARSER SLASH)(),(TOPARSER STAR)());
return p_tok;
}
static VOID hid205(){
VV(2)=putname("/*");
}
static STATUS hid206(){
PARSER hid204;ACTION hid205;
return p_attach0n(TOPARSER hid204,0,hid205,0);
}
STATUS slashstar(){
PARSER hid206;
return((TOPARSER hid206)());
}

static STATUS hid207(){
PARSER STAR, SLASH;
static STATUS p_tok;
P_PAND((TOPARSER STAR)(),(TOPARSER SLASH)());
return p_tok;
}
static VOID hid208(){
VV(2)=putname("*/");
}
static STATUS hid209(){
PARSER hid207;ACTION hid208;
return p_attach0n(TOPARSER hid207,0,hid208,0);
}
STATUS starslash(){
PARSER hid209;
return((TOPARSER hid209)());
}

static VOID hid210(){
VV(2)=V(1);
}
static STATUS hid211(){
PARSER commentchr;ACTION hid210;
return p_attach0n(TOPARSER commentchr,0,hid210,0);
}
static STATUS hid212(){
PARSER hid211, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid211)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid213(){
PARSER hid212;
return p_many0n(TOPARSER hid212,0);
}
static STATUS hid214(){
PARSER hid213, starslash;
static STATUS p_tok;
P_PAND((TOPARSER hid213)(),(TOPARSER starslash)());
return p_tok;
}
static STATUS hid215(){
PARSER slashstar, hid214;
static STATUS p_tok;
P_PAND((TOPARSER slashstar)(),(TOPARSER hid214)());
return p_tok;
}
static VOID hid216(){
VV(2)=V(1);
}
static STATUS hid217(){
PARSER hid215;ACTION hid216;
return p_attach0n(TOPARSER hid215,0,hid216,0);
}
STATUS COMMENT(){
PARSER hid217;
return((TOPARSER hid217)());
}

/* $!{foo} ought to try and recover at foo */

static VOID hid218(){
 VV(1) = putchar(T(1));
}
static STATUS hid219(){
PARSER NOTASTAR;ACTION hid218;
return p_attach0n(TOPARSER NOTASTAR,0,hid218,0);
}
static STATUS hid220(){
PARSER hid219, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid219)(),(TOPARSER p_nothing0)());
return p_tok;
}
static VOID hid221(){
 VV(1) = putchar('\n');
}
static STATUS hid222(){
PARSER p_lastuniq0;ACTION hid221;
return p_attach0n(TOPARSER p_lastuniq0,0,hid221,0);
}
static STATUS hid223(){
PARSER hid222, p_nothing0;
static STATUS p_tok;
P_PAND((TOPARSER hid222)(),(TOPARSER p_nothing0)());
return p_tok;
}
static STATUS hid224(){
PARSER STAR, NOTASLASH;
static STATUS p_tok;
P_PAND((TOPARSER STAR)(),(TOPARSER NOTASLASH)());
return p_tok;
}
static VOID hid225(){
 VV(2) = (putchar('*'),putchar(T(2)));
}
static STATUS hid226(){
PARSER hid224;ACTION hid225;
return p_attach0n(TOPARSER hid224,0,hid225,0);
}
static STATUS hid227 (){
PARSER hid223, hid226;
static STATUS p_tok;
p_tok = (TOPARSER hid223) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid226) ();
}
static STATUS hid228 (){
PARSER hid220, hid227;
static STATUS p_tok;
p_tok = (TOPARSER hid220) ();
return (GOODSTATUS(p_tok))?p_tok:(TOPARSER hid227) ();
}
STATUS commentchr(){
PARSER hid228;
return((TOPARSER hid228)());
}

static STATUS hid229(){
return p_notexactly0('*');
}
STATUS NOTASTAR(){
PARSER hid229;
return((TOPARSER hid229)());
}

static STATUS hid230(){
return p_notexactly0('/');
}
STATUS NOTASLASH(){
PARSER hid230;
return((TOPARSER hid230)());
}

static STATUS hid231(){
return p_exactly0(';');
}
STATUS SEMICOLON(){
PARSER hid231;
return((TOPARSER hid231)());
}

static STATUS hid232(){
return p_exactly0('.');
}
static STATUS hid233(){
return p_exactly0('.');
}
static STATUS hid234(){
return p_exactly0('.');
}
static STATUS hid235(){
PARSER hid233, hid234;
static STATUS p_tok;
P_PAND((TOPARSER hid233)(),(TOPARSER hid234)());
return p_tok;
}
static STATUS hid236(){
PARSER hid232, hid235;
static STATUS p_tok;
P_PAND((TOPARSER hid232)(),(TOPARSER hid235)());
return p_tok;
}
static VOID hid237(){
 VV(3) = V(1);
}
static STATUS hid238(){
PARSER hid236;ACTION hid237;
return p_attach0n(TOPARSER hid236,0,hid237,0);
}
STATUS ELLIPSIS(){
PARSER hid238;
return((TOPARSER hid238)());
}



/*   finis   */