1
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
61
|
%{
#include <cmath>
#include <BALL/MATHS/parsedFunction.h>
using namespace BALL;
using namespace std;
extern int ParsedFunctionlex();
extern void ParsedFunctionerror(char const* s);
double ParsedFunctionResult;
%}
%union {
double *var;
double(*func)(double);
double val;
}
%token <val> NUM
%token <func> FNCT
%token <var> VAR
%type <val> exp
%right '='
%left '-' '+'
%left '*' '/'
%left NEG
%right '^'
%%
input: /* empty */
| input line
;
line: '\n'
| exp ';' { ParsedFunctionResult = $1; }
| exp '\n' { ParsedFunctionResult = $1; }
| error '\n' { yyerrok; }
;
exp: NUM { $$ = $1; }
| VAR { $$ = *($1); }
| VAR '=' exp { $$ = $3; *($1) = $3; }
| FNCT '(' exp ')' { $$ = (*($1))($3); }
| exp '+' exp { $$ = $1 + $3; }
| exp '-' exp { $$ = $1 - $3; }
| exp '*' exp { $$ = $1 * $3; }
| exp '/' exp { $$ = $1 / $3; }
| '-' exp %prec NEG { $$ = -$2; }
| exp '^' exp { $$ = pow($1, $3); }
| '(' exp ')' { $$ = $2; }
;
%%
void ParsedFunctionerror(char const* s)
{
//throw Exception::ParseError(__FILE__, 0,
cerr << "Parse Error! (" << String(s) << ")" << endl;
}
|
