Programming

%{ double vbltable[26]; %}

%union {
       double dval ;
       int vblno; }

%token <vblno> NAME 
%token <dval>  NUMBER

%type  <dval> expression

%%
statement_list:  
  statement '\n'
| statement_list statement '\n'
;

statement: 
  NAME '=' expression { vbltable[$1] = $3; }
| expression          { printf("est %g\n", $1); }
;

expression: 
  expression expression '+' { $$ = $1 + $2; }
| expression expression '-' { $$ = $1 - $2; }
| expression expression '*' { $$ = $1 * $2; }
| expression expression '/' {if($2 == 0.0)
                             printf("erreur ! Division par 0");
                             else
                             $$ = $1 / $2; }
| '(' '-' expression ')'    { $$ = -$3; }
| NUMBER                    { $$ = $1; }
| NAME                      { $$ = vbltable[$1]; }
;
%%

int yyerror() { printf("erreur") ; } 
int main () { yyparse(); }

%{ 
#include "y.tab.h" 
#include <math.h>
extern double vbltable[26];
%}

%%

([0-9]+|([0-9]*"."[0-9]+)) { yylval.dval = atof(yytext); return NUMBER; }
\t;                        { ; }
" "                        { ; }
[a-z]                      { yylval.vblno = yytext[0] - 'a' ; return NAME;}
"$"                        { return 0; 
                             /* symb. de retour pour fin de fichier */}
\n                         { return yytext[0]; }
.                          { return yytext[0]; }

%%