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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
#include "evaluator.h"
#include "value.h"
evaluator::evaluator(const char * display_name) :
m_display_name(display_name)
{ }
/* XXX: This is really ugly. I'm sure there is a way to do this with function
* overloads, but I can't figure out how. */
value *
evaluator::evaluate(
value * l,
value * r)
{
if (!l || !r) {
return default_evaluate(l, r);
}
enum value_type l_type = l->get_type();
enum value_type r_type = r->get_type();
switch(l_type) {
case VALUE_TYPE_FLOAT:
return evaluate((float_value*)l, r);
default:
switch(r_type) {
case VALUE_TYPE_FLOAT:
return evaluate(l, (float_value*)r);
default:
return default_evaluate(l, r);
}
}
}
value *
evaluator::evaluate(
float_value * l,
value * r)
{
enum value_type r_type = r->get_type();
switch(r_type) {
case VALUE_TYPE_FLOAT:
return evaluate(l, (float_value*)r);
default:
return default_evaluate(l, r);
}
}
value *
evaluator::evaluate(
value * l,
float_value * r)
{
enum value_type l_type = l->get_type();
switch(l_type) {
case VALUE_TYPE_FLOAT:
return evaluate((float_value*)l, r);
default:
return default_evaluate(l, r);
}
}
value *
evaluator::default_evaluate(
value * l,
value * r)
{
return new tree_value(this, l, r);
}
std::string
evaluator::to_string()
{
return m_display_name;
}
add_evaluator::add_evaluator() :
evaluator("+")
{ }
value *
add_evaluator::evaluate(
float_value * l,
float_value * r)
{
float_value * new_val;
if (!l->m_has_value || !r->m_has_value) {
return default_evaluate(l, r);
}
new_val = new float_value();
new_val->set_value(l->m_value + r->m_value);
return new_val;
}
mul_evaluator::mul_evaluator() :
evaluator("*")
{ }
value *
mul_evaluator::evaluate(
float_value * l,
float_value * r)
{
float_value * new_val;
if (!l || !r || !l->m_has_value || !r->m_has_value) {
return default_evaluate(l,r);
}
new_val = new float_value(l->m_value * r->m_value);
return new_val;
}
|
