Blame examples/manual/expr.y

Packit f00812
/*
Packit f00812
 * expr.y : A simple yacc expression parser
Packit f00812
 *          Based on the Bison manual example. 
Packit f00812
 */
Packit f00812
Packit f00812
%{
Packit f00812
#include <stdio.h>
Packit f00812
#include <math.h>
Packit f00812
Packit f00812
%}
Packit f00812
Packit f00812
%union {
Packit f00812
   float val;
Packit f00812
}
Packit f00812
Packit f00812
%token NUMBER
Packit f00812
%token PLUS MINUS MULT DIV EXPON
Packit f00812
%token EOL
Packit f00812
%token LB RB
Packit f00812
Packit f00812
%left  MINUS PLUS
Packit f00812
%left  MULT DIV
Packit f00812
%right EXPON
Packit f00812
Packit f00812
%type  <val> exp NUMBER
Packit f00812
Packit f00812
%%
Packit f00812
input   :
Packit f00812
        | input line
Packit f00812
        ;
Packit f00812
Packit f00812
line    : EOL
Packit f00812
        | exp EOL { printf("%g\n",$1);}
Packit f00812
Packit f00812
exp     : NUMBER                 { $$ = $1;        }
Packit f00812
        | exp PLUS  exp          { $$ = $1 + $3;   }
Packit f00812
        | exp MINUS exp          { $$ = $1 - $3;   }
Packit f00812
        | exp MULT  exp          { $$ = $1 * $3;   }
Packit f00812
        | exp DIV   exp          { $$ = $1 / $3;   }
Packit f00812
        | MINUS  exp %prec MINUS { $$ = -$2;       }
Packit f00812
        | exp EXPON exp          { $$ = pow($1,$3);}
Packit f00812
        | LB exp RB                      { $$ = $2;        }
Packit f00812
        ;
Packit f00812
Packit f00812
%%
Packit f00812
Packit f00812
yyerror(char *message)
Packit f00812
{
Packit f00812
  printf("%s\n",message);
Packit f00812
}
Packit f00812
Packit f00812
int main(int argc, char *argv[])
Packit f00812
{
Packit f00812
  yyparse();
Packit f00812
  return(0);
Packit f00812
}
Packit f00812
Packit f00812
Packit f00812
Packit f00812
Packit f00812
Packit f00812
Packit f00812
Packit f00812