showendf.c

这可是我的倾情制作

void FShowResult(int Result,FILE *fp)
{
switch(Result)
{
case  NUM     :fprintf(fp, " (\t Int16          , \t%ld)" ,token0);          break;
case  ID      :fprintf(fp, " (\t identifier     , \t%s)"  ,CurSymbol->pInfo);break;
case  INT     :fprintf(fp, " (\t integer        , \t_)"   );                 break;
case  DOUBLE  :fprintf(fp, " (\t double         , \t_)"   );                 break;
case  STRUCT  :fprintf(fp, " (\t struct         , \t_)"   );                 break;
case  BREAK   :fprintf(fp, " (\t break          , \t_)"   );                 break;
case  ELSE    :fprintf(fp, " (\t else           , \t_)"   );                 break;
case  LONG    :fprintf(fp, " (\t long           , \t_)"   );                 break;
case  SWITCH  :fprintf(fp, " (\t switch         , \t_)"   );                 break;
case  CASE    :fprintf(fp, " (\t case           , \t_)"   );                 break;
case  ENUM    :fprintf(fp, " (\t enum           , \t_)"   );                 break;
case  TYPEDEF :fprintf(fp, " (\t typedef        , \t_)"   );                 break;
case  CHAR    :fprintf(fp, " (\t char           , \t_)"   );                 break;
case  RETURN  :fprintf(fp, " (\t return         , \t_)"   );                 break;
case  EXTERN  :fprintf(fp, " (\t extern         , \t_)"   );                 break;
case  UNION   :fprintf(fp, " (\t union          , \t_)"   );                 break;
case  FLOAT   :fprintf(fp, " (\t float          , \t_)"   );                 break;
case  SHORT   :fprintf(fp, " (\t short          , \t_)"   );                 break;
case  UNSIGNED:fprintf(fp, " (\t unsigned       , \t_)"   );                 break;
case  CONTINUE:fprintf(fp, " (\t continue       , \t_)"   );                 break;
case  FOR     :fprintf(fp, " (\t for            , \t_)"   );                 break;
case  SIGNED  :fprintf(fp, " (\t signed         , \t_)"   );                 break;
case  VOID    :fprintf(fp, " (\t void           , \t_)"   );                 break;
case  DEFAULT :fprintf(fp, " (\t default        , \t_)"   );                 break;
case  GOTO    :fprintf(fp, " (\t goto           , \t_)"   );                 break;
case  SIZEOF  :fprintf(fp, " (\t sizeof         , \t_)"   );                 break;
case  DO      :fprintf(fp, " (\t do             , \t_)"   );                 break;
case  IF      :fprintf(fp, " (\t if             , \t_)"   );                 break;
case  WHILE   :fprintf(fp, " (\t while          , \t_)"   );                 break;
case  ADD     :fprintf(fp, " (\t +              , \t_)"   );                 break;
case  DEC     :fprintf(fp, " (\t -              , \t_)"   );                 break;
case  MUL     :fprintf(fp, " (\t *              , \t_)"   );                 break;
case  DIV     :fprintf(fp, " (\t \\              , \t_)"   );                 break;
case  MOD     :fprintf(fp, " (\t %              , \t_)"   );                 break;
case  INC     :fprintf(fp, " (\t ++             , \t_)"   );                 break;
case  DEE     :fprintf(fp, " (\t --             , \t_)"   );                 break;
case  INQ     :fprintf(fp, " (\t +=             , \t_)"   );                 break;
case  DEQ     :fprintf(fp, " (\t -=             , \t_)"   );                 break;
case  MUQ     :fprintf(fp, " (\t *=             , \t_)"   );                 break;
case  DIQ     :fprintf(fp, " (\t \\=             , \t_)"   );                 break;
case  LOR     :fprintf(fp, " (\t ||             , \t_)"   );                 break;
case  LAND    :fprintf(fp, " (\t &&             , \t_)"   );                 break;
case  LNOT    :fprintf(fp, " (\t !              , \t_)"   );                 break;
case  RLARG   :fprintf(fp, " (\t >              , \t_)"   );                 break;
case  RSMAL   :fprintf(fp, " (\t <              , \t_)"   );                 break;
case  RLARQ   :fprintf(fp, " (\t >=             , \t_)"   );                 break;
case  RSMAQ   :fprintf(fp, " (\t <=             , \t_)"   );                 break;
case  RNOTQ   :fprintf(fp, " (\t !=             , \t_)"   );                 break;
case  REQUA   :fprintf(fp, " (\t ==             , \t_)"   );                 break;
case  EQUA    :fprintf(fp, " (\t =              , \t_)"   );                 break;
case  QUES    :fprintf(fp, " (\t ?              , \t_)"   );                 break;
case  COMA    :fprintf(fp, " (\t ,              , \t_)"   );                 break;
case  LBRAKET :fprintf(fp, " (\t (              , \t_)"   );                 break;
case  RBRAKET :fprintf(fp, " (\t )              , \t_)"   );                 break;
case  LBRACE  :fprintf(fp, " (\t {              , \t_)"   );                 break;
case  RBRACE  :fprintf(fp, " (\t }              , \t_)"   );                 break;
case  BMOVR   :fprintf(fp, " (\t >>             , \t_)"   );                 break;
case  BMOVL   :fprintf(fp, " (\t <<             , \t_)"   );                 break;
case  BOR     :fprintf(fp, " (\t |              , \t_)"   );                 break;
case  BAND    :fprintf(fp, " (\t &              , \t_)"   );                 break;
case  BNOT    :fprintf(fp, " (\t ~              , \t_)"   );                 break;
case  FMAIN   :fprintf(fp, " (\t main           , \t_)"   );                 break;
case  SHARP   :fprintf(fp, " (\t #              , \t_)"   );                 break;
case  CDEF    :fprintf(fp, " (\t define         , \t_)"   );                 break;
case  CINC    :fprintf(fp, " (\t include        , \t_)"   );                 break;
case  COMML   :fprintf(fp, " (\t \\*             , \t_)"   );                 break;
case  COMMR   :fprintf(fp, " (\t *\\             , \t_)"   );                 break;
case  NUM1    :fprintf(fp, " (\t int32          , \t%ld)" ,token1);          break;
case  NUM2    :fprintf(fp, " (\t float32        , \t%f)"  ,token2);          break;
case  LOWLINE :fprintf(fp, " (\t _              , \t_)"   );                 break;
case  DONE    :fprintf(fp, " (\t Finish         , \t_)"   );                 break;
case  ERROR   :fprintf(fp, " (\t Error          , \t_)"   );                 break;
case  POINTTO :fprintf(fp, " (\t ->Pointer      , \t_)"   );                 break;
case  BEOR    :fprintf(fp, " (\t ^              , \t_)"   );                 break;
case  BEORQ   :fprintf(fp, " (\t ^=             , \t_)"   );                 break;
case  BMOVLQ  :fprintf(fp, " (\t <<=            , \t_)"   );                 break;
case  BMOVRQ  :fprintf(fp, " (\t >>=            , \t_)"   );                 break;
case  BANDQ   :fprintf(fp, " (\t &=             , \t_)"   );                 break;
case  BORQ    :fprintf(fp, " (\t |=             , \t_)"   );                 break;
case  DOT     :fprintf(fp, " (\t .              , \t_)"   );                 break;
case  COLON   :fprintf(fp, " (\t :              , \t_)"   );                 break;
case  SCOLON  :fprintf(fp, " (\t ;              , \t_)"   );                 break;
case  LSBRACE :fprintf(fp, " (\t [              , \t_)"   );                 break;
case  RSBRACE :fprintf(fp, " (\t ]              , \t_)"   );                 break;
case  MODQ    :fprintf(fp, " (\t %=             , \t_)"   );                 break;
case  STRINGS :fprintf(fp, " (\t Constant string, \t%s)"  ,CurSymbol->pInfo);break;
case  CHARONE :fprintf(fp, " (\t Constant char  , \t%c)"  ,token1);          break;
}/*End switch(Result)*/
}/*End ShowResult Func5*/