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
|
#include "fpconfig.hh"
#include "fparser.hh"
#include "extrasrc/fptypes.hh"
#include "codetree.hh"
#include "optimize.hh"
#ifdef FP_SUPPORT_OPTIMIZER
template<typename Value_t>
void FunctionParserBase<Value_t>::Optimize()
{
using namespace FPoptimizer_CodeTree;
CopyOnWrite();
//PrintByteCode(std::cout);
/*std::fprintf(stderr,
"O:refCount:%u mVarCount:%u mfuncPtrs:%u mFuncParsers:%u mByteCode:%u mImmed:%u\n",
mData->mReferenceCounter,
mData->mVariablesAmount,
(unsigned)mData->mFuncPtrs.size(),
(unsigned)mData->mFuncParsers.size(),
(unsigned)mData->mByteCode.size(),
(unsigned)mData->mImmed.size()
);*/
CodeTree<Value_t> tree;
tree.GenerateFrom(*mData);
FPoptimizer_Optimize::ApplyGrammars(tree);
std::vector<unsigned> byteCode;
std::vector<Value_t> immed;
size_t stacktop_max = 0;
tree.SynthesizeByteCode(byteCode, immed, stacktop_max);
/*std::cout << std::flush;
std::cerr << std::flush;
fprintf(stderr, "Estimated stacktop %u\n", (unsigned)stacktop_max);
fflush(stderr);*/
if(mData->mStackSize != stacktop_max)
{
mData->mStackSize = unsigned(stacktop_max); // Note: Ignoring GCC warning here.
#if !defined(FP_USE_THREAD_SAFE_EVAL) && \
!defined(FP_USE_THREAD_SAFE_EVAL_WITH_ALLOCA)
mData->mStack.resize(stacktop_max);
#endif
}
mData->mByteCode.swap(byteCode);
mData->mImmed.swap(immed);
//PrintByteCode(std::cout);
}
#define FUNCTIONPARSER_INSTANTIATE_EMPTY_OPTIMIZE(type) \
template<> void FunctionParserBase< type >::Optimize() {}
#ifdef FP_SUPPORT_MPFR_FLOAT_TYPE
FUNCTIONPARSER_INSTANTIATE_EMPTY_OPTIMIZE(MpfrFloat)
#endif
#ifdef FP_SUPPORT_GMP_INT_TYPE
FUNCTIONPARSER_INSTANTIATE_EMPTY_OPTIMIZE(GmpInt)
#endif
#ifdef FP_SUPPORT_COMPLEX_DOUBLE_TYPE
FUNCTIONPARSER_INSTANTIATE_EMPTY_OPTIMIZE(std::complex<double>)
#endif
#ifdef FP_SUPPORT_COMPLEX_FLOAT_TYPE
FUNCTIONPARSER_INSTANTIATE_EMPTY_OPTIMIZE(std::complex<float>)
#endif
#ifdef FP_SUPPORT_COMPLEX_LONG_DOUBLE_TYPE
FUNCTIONPARSER_INSTANTIATE_EMPTY_OPTIMIZE(std::complex<long double>)
#endif
#define FUNCTIONPARSER_INSTANTIATE_OPTIMIZE(type) \
template void FunctionParserBase<type>::Optimize();
#ifndef FP_DISABLE_DOUBLE_TYPE
FUNCTIONPARSER_INSTANTIATE_OPTIMIZE(double)
#endif
#ifdef FP_SUPPORT_FLOAT_TYPE
FUNCTIONPARSER_INSTANTIATE_OPTIMIZE(float)
#endif
#ifdef FP_SUPPORT_LONG_DOUBLE_TYPE
FUNCTIONPARSER_INSTANTIATE_OPTIMIZE(long double)
#endif
#ifdef FP_SUPPORT_LONG_INT_TYPE
FUNCTIONPARSER_INSTANTIATE_OPTIMIZE(long)
#endif
#endif // FP_SUPPORT_OPTIMIZER
|
