C++ Mathematical Expression Library (ExprTk) http://www.partow.net/programming/exprtk/index.html

This commit is contained in:
Arash Partow
2018-02-28 21:28:48 +11:00
parent 371e3cf0d9
commit 56cb1186b7

View File

@ -85,6 +85,10 @@ namespace exprtk
{
typedef unsigned char uchar_t;
typedef char char_t;
typedef uchar_t* uchar_ptr;
typedef char_t* char_ptr;
typedef uchar_t const* uchar_cptr;
typedef char_t const* char_cptr;
inline bool is_whitespace(const char_t c)
{
@ -389,7 +393,7 @@ namespace exprtk
return (*this);
}
inline build_string& operator << (const char_t* s)
inline build_string& operator << (char_cptr s)
{
data_ += std::string(s);
return (*this);
@ -636,7 +640,7 @@ namespace exprtk
inline bool wc_match(const std::string& wild_card,
const std::string& str)
{
return match_impl<const char_t*,cs_match>(wild_card.data(),
return match_impl<char_cptr,cs_match>(wild_card.data(),
wild_card.data() + wild_card.size(),
str.data(),
str.data() + str.size(),
@ -647,7 +651,7 @@ namespace exprtk
inline bool wc_imatch(const std::string& wild_card,
const std::string& str)
{
return match_impl<const char_t*,cis_match>(wild_card.data(),
return match_impl<char_cptr,cis_match>(wild_card.data(),
wild_card.data() + wild_card.size(),
str.data(),
str.data() + str.size(),
@ -1798,7 +1802,7 @@ namespace exprtk
if ((3 != length) && (inf_length != length))
return false;
const char_t* inf_itr = ('i' == (*itr)) ? inf_lc : inf_uc;
char_cptr inf_itr = ('i' == (*itr)) ? inf_lc : inf_uc;
while (end != itr)
{
@ -1986,8 +1990,8 @@ namespace exprtk
{
const typename numeric::details::number_type<T>::type num_type;
const char_t* begin = s.data();
const char_t* end = s.data() + s.size();
char_cptr begin = s.data();
char_cptr end = s.data() + s.size();
return string_to_real(begin, end, t, num_type);
}
@ -2316,8 +2320,8 @@ namespace exprtk
inline std::string substr(const std::size_t& begin, const std::size_t& end)
{
const char_t* begin_itr = ((base_itr_ + begin) < s_end_) ? (base_itr_ + begin) : s_end_;
const char_t* end_itr = ((base_itr_ + end) < s_end_) ? (base_itr_ + end) : s_end_;
details::char_cptr begin_itr = ((base_itr_ + begin) < s_end_) ? (base_itr_ + begin) : s_end_;
details::char_cptr end_itr = ((base_itr_ + end) < s_end_) ? (base_itr_ + end) : s_end_;
return std::string(begin_itr,end_itr);
}
@ -2334,12 +2338,12 @@ namespace exprtk
private:
inline bool is_end(const char_t* itr)
inline bool is_end(details::char_cptr itr)
{
return (s_end_ == itr);
}
inline bool is_comment_start(const char_t* itr)
inline bool is_comment_start(details::char_cptr itr)
{
#ifndef exprtk_disable_comments
const char_t c0 = *(itr + 0);
@ -2408,7 +2412,7 @@ namespace exprtk
else if (!test::comment_start(*s_itr_, *(s_itr_ + 1), mode, increment))
return;
const char_t* cmt_start = s_itr_;
details::char_cptr cmt_start = s_itr_;
s_itr_ += increment;
@ -2564,7 +2568,7 @@ namespace exprtk
inline void scan_symbol()
{
const char_t* initial_itr = s_itr_;
details::char_cptr initial_itr = s_itr_;
while (!is_end(s_itr_))
{
@ -2615,7 +2619,7 @@ namespace exprtk
(15) .1234e-3
*/
const char_t* initial_itr = s_itr_;
details::char_cptr initial_itr = s_itr_;
bool dot_found = false;
bool e_found = false;
bool post_e_sign_found = false;
@ -2702,7 +2706,7 @@ namespace exprtk
inline void scan_special_function()
{
const char_t* initial_itr = s_itr_;
details::char_cptr initial_itr = s_itr_;
token_t t;
// $fdd(x,x,x) = at least 11 chars
@ -2738,7 +2742,7 @@ namespace exprtk
#ifndef exprtk_disable_string_capabilities
inline void scan_string()
{
const char_t* initial_itr = s_itr_ + 1;
details::char_cptr initial_itr = s_itr_ + 1;
token_t t;
if (std::distance(s_itr_,s_end_) < 2)
@ -2842,9 +2846,9 @@ namespace exprtk
token_list_itr_t token_itr_;
token_list_itr_t store_token_itr_;
token_t eof_token_;
const char_t* base_itr_;
const char_t* s_itr_;
const char_t* s_end_;
details::char_cptr base_itr_;
details::char_cptr s_itr_;
details::char_cptr s_end_;
friend class token_scanner;
friend class token_modifier;
@ -5610,7 +5614,7 @@ namespace exprtk
virtual std::string str () const = 0;
virtual const char_t* base() const = 0;
virtual char_cptr base() const = 0;
virtual std::size_t size() const = 0;
};
@ -5653,7 +5657,7 @@ namespace exprtk
return value_;
}
const char_t* base() const
char_cptr base() const
{
return value_.data();
}
@ -7560,7 +7564,7 @@ namespace exprtk
return ref();
}
const char_t* base() const
char_cptr base() const
{
return &(*value_)[0];
}
@ -7640,7 +7644,7 @@ namespace exprtk
return (*value_);
}
const char_t* base() const
char_cptr base() const
{
return &(*value_)[0];
}
@ -7718,7 +7722,7 @@ namespace exprtk
return value_;
}
const char_t* base() const
char_cptr base() const
{
return value_.data();
}
@ -7848,7 +7852,7 @@ namespace exprtk
return value_;
}
const char_t* base() const
char_cptr base() const
{
return &value_[0];
}
@ -7987,7 +7991,7 @@ namespace exprtk
return value_;
}
const char_t* base() const
char_cptr base() const
{
return &value_[0];
}
@ -8075,7 +8079,7 @@ namespace exprtk
return str0_node_ptr_->str();
}
const char_t* base() const
char_cptr base() const
{
return str0_node_ptr_->base();
}
@ -8189,11 +8193,11 @@ namespace exprtk
const std::size_t size1 = range1.cache_size();
const std::size_t max_size = std::min(size0,size1);
char_t* s0 = const_cast<char_t*>(str0_base_ptr_->base() + str0_r0);
char_t* s1 = const_cast<char_t*>(str1_base_ptr_->base() + str1_r0);
char_ptr s0 = const_cast<char_ptr>(str0_base_ptr_->base() + str0_r0);
char_ptr s1 = const_cast<char_ptr>(str1_base_ptr_->base() + str1_r0);
loop_unroll::details lud(max_size);
const char_t* upper_bound = s0 + lud.upper_bound;
char_cptr upper_bound = s0 + lud.upper_bound;
while (s0 < upper_bound)
{
@ -8351,13 +8355,13 @@ namespace exprtk
struct asn_assignment
{
static inline void execute(std::string& s, const char_t* data, const std::size_t size)
static inline void execute(std::string& s, char_cptr data, const std::size_t size)
{ s.assign(data,size); }
};
struct asn_addassignment
{
static inline void execute(std::string& s, const char_t* data, const std::size_t size)
static inline void execute(std::string& s, char_cptr data, const std::size_t size)
{ s.append(data,size); }
};
@ -8443,7 +8447,7 @@ namespace exprtk
return str0_node_ptr_->str();
}
const char_t* base() const
char_cptr base() const
{
return str0_node_ptr_->base();
}
@ -8564,7 +8568,7 @@ namespace exprtk
std::copy(str1_base_ptr_->base() + s1_r0,
str1_base_ptr_->base() + s1_r0 + size,
const_cast<char_t*>(base() + s0_r0));
const_cast<char_ptr>(base() + s0_r0));
}
}
@ -8576,7 +8580,7 @@ namespace exprtk
return str0_node_ptr_->str();
}
const char_t* base() const
char_cptr base() const
{
return str0_node_ptr_->base();
}
@ -8730,7 +8734,7 @@ namespace exprtk
return value_;
}
const char_t* base() const
char_cptr base() const
{
return &value_[0];
}
@ -8850,7 +8854,7 @@ namespace exprtk
return value_;
}
const char_t* base() const
char_cptr base() const
{
return &value_[0];
}
@ -8984,7 +8988,7 @@ namespace exprtk
return str_base_ptr_->str();
}
const char_t* base() const
char_cptr base() const
{
return str_base_ptr_->base();
}
@ -11509,7 +11513,7 @@ namespace exprtk
return false;
ts.size = sbn->size();
ts.data = reinterpret_cast<void*>(const_cast<char_t*>(sbn->base()));
ts.data = reinterpret_cast<void*>(const_cast<char_ptr>(sbn->base()));
ts.type = type_store_t::e_string;
range_list_[i].data = ts.data;
@ -11530,7 +11534,7 @@ namespace exprtk
)
{
ts.size = rp.const_size();
ts.data = static_cast<char_t*>(ts.data) + rp.n0_c.second;
ts.data = static_cast<char_ptr>(ts.data) + rp.n0_c.second;
range_list_[i].range = reinterpret_cast<range_t*>(0);
}
else
@ -11612,10 +11616,10 @@ namespace exprtk
ts.size = rp.cache_size();
#ifndef exprtk_disable_string_capabilities
if (ts.type == type_store_t::e_string)
ts.data = const_cast<char_t*>(rdt.str_node->base()) + rp.cache.first;
ts.data = const_cast<char_ptr>(rdt.str_node->base()) + rp.cache.first;
else
#endif
ts.data = static_cast<char_t*>(rdt.data) + (rp.cache.first * rdt.type_size);
ts.data = static_cast<char_ptr>(rdt.data) + (rp.cache.first * rdt.type_size);
}
else
return false;
@ -11695,7 +11699,7 @@ namespace exprtk
return ret_string_;
}
const char_t* base() const
char_cptr base() const
{
return &ret_string_[0];
}
@ -17620,7 +17624,7 @@ namespace exprtk
size(0)
{}
data_pack(void* ptr, data_type dt, std::size_t sz = 0)
data_pack(void* ptr, const data_type dt, const std::size_t sz = 0)
: pointer(ptr),
type(dt),
size(sz)
@ -18023,7 +18027,7 @@ namespace exprtk
std::size_t column_no;
};
inline type make_error(error_mode mode,
inline type make_error(const error_mode mode,
const std::string& diagnostic = "",
const std::string& src_location = "")
{
@ -18036,7 +18040,7 @@ namespace exprtk
return t;
}
inline type make_error(error_mode mode,
inline type make_error(const error_mode mode,
const lexer::token& tk,
const std::string& diagnostic = "",
const std::string& src_location = "")