+// MS compatible compilers support #pragma once

+

+#if defined(_MSC_VER) && (_MSC_VER >= 1020)

+# pragma once

+#endif

+

+// Alexander Nasonov, Antony Polukhin, Justin Viiret, Michael Hofmann,

+// Cheng Yang, Matthew Bradbury, David W. Birdsall, Pavel Korzh and other Boosters

+// when: November 2000, March 2003, June 2005, June 2006, March 2011 - 2012

+

+#include <boost/config.hpp>

+#if defined(BOOST_NO_STRINGSTREAM) || defined(BOOST_NO_STD_WSTRING)

+#define BOOST_LCAST_NO_WCHAR_T

+#endif

+#include <cstring>

+#include <cstdio>

+#include <boost/type_traits/ice.hpp>

+

+# include <locale>

+#else

+# ifndef BOOST_LEXICAL_CAST_ASSUME_C_LOCALE

+ // Getting error at this point means, that your STL library is old/lame/misconfigured.

+ // If nothing can be done with STL library, define BOOST_LEXICAL_CAST_ASSUME_C_LOCALE,

+ // but beware: lexical_cast will understand only 'C' locale delimeters and thousands

+ // separators.

+# error "Unable to use <locale> header. Define BOOST_LEXICAL_CAST_ASSUME_C_LOCALE to force "

+# error "boost::lexical_cast to use only 'C' locale during conversions."

+# endif

+ class BOOST_SYMBOL_VISIBLE bad_lexical_cast :

+ // workaround MSVC bug with std::bad_cast when _HAS_EXCEPTIONS == 0

+#if defined(BOOST_MSVC) && defined(_HAS_EXCEPTIONS) && !_HAS_EXCEPTIONS

+ public std::exception

+#else

+ public std::bad_cast

+#endif

+ bad_lexical_cast() BOOST_NOEXCEPT :

+ const std::type_info &target_type_arg) BOOST_NOEXCEPT :

+#ifndef BOOST_NO_NOEXCEPT

+ virtual const char *what() const noexcept

+#else

+#endif

+

+#ifndef BOOST_NO_NOEXCEPT

+ virtual ~bad_lexical_cast() BOOST_NOEXCEPT

+#else

+#endif

+ {}

+ namespace detail // widest_char

+ template <typename TargetChar, typename SourceChar>

+ struct widest_char

+ {

+ typedef BOOST_DEDUCED_TYPENAME boost::mpl::if_c<

+ (sizeof(TargetChar) > sizeof(SourceChar))

+ , TargetChar

+ , SourceChar >::type type;

+ };

+ }

+} // namespace boost

+

+#if !defined(BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION) && !defined(__SUNPRO_CC) && !defined(__PGIC__)

+

+#include <cmath>

+#include <istream>

+

+#if !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+#include <array>

+#endif

+

+#include <boost/array.hpp>

+#include <boost/numeric/conversion/cast.hpp>

+#include <boost/type_traits/make_unsigned.hpp>

+#include <boost/type_traits/is_signed.hpp>

+#include <boost/type_traits/is_integral.hpp>

+#include <boost/type_traits/is_arithmetic.hpp>

+#include <boost/type_traits/remove_pointer.hpp>

+#include <boost/math/special_functions/sign.hpp>

+#include <boost/math/special_functions/fpclassify.hpp>

+#include <boost/range/iterator_range_core.hpp>

+#include <boost/container/container_fwd.hpp>

+#ifndef BOOST_NO_CWCHAR

+# include <cwchar>

+#endif

+

+namespace boost {

+ namespace detail // widest_char<...> (continuation)

+ {

+ struct not_a_character_type{};

+

+ template <typename CharT>

+ struct widest_char<not_a_character_type, CharT >

+ {

+ typedef CharT type;

+ };

+

+ template <typename CharT>

+ struct widest_char< CharT, not_a_character_type >

+ {

+ typedef CharT type;

+ };

+

+ template <>

+ struct widest_char< not_a_character_type, not_a_character_type >

+ {

+ typedef char type;

+ };

+ }

+

+ namespace detail // is_char_or_wchar<...> and stream_char<...> templates

+ {

+ // returns true, if T is one of the character types

+ template <typename T>

+ struct is_char_or_wchar

+ {

+ typedef ::boost::type_traits::ice_or<

+ ::boost::is_same< T, char >::value,

+ #ifndef BOOST_LCAST_NO_WCHAR_T

+ ::boost::is_same< T, wchar_t >::value,

+ #endif

+ #ifndef BOOST_NO_CHAR16_T

+ ::boost::is_same< T, char16_t >::value,

+ #endif

+ #ifndef BOOST_NO_CHAR32_T

+ ::boost::is_same< T, char32_t >::value,

+ #endif

+ ::boost::is_same< T, unsigned char >::value,

+ ::boost::is_same< T, signed char >::value

+ > result_type;

+

+ BOOST_STATIC_CONSTANT(bool, value = (result_type::value) );

+ };

+

+ // selectors for choosing stream character type

+ // returns one of char, wchar_t, char16_t, char32_t or not_a_character_type types

+ template <typename Type>

+ typedef BOOST_DEDUCED_TYPENAME boost::mpl::if_c<

+ is_char_or_wchar<Type >::value,

+ Type,

+ boost::detail::not_a_character_type

+ >::type type;

+ };

+

+ template <>

+ struct stream_char<unsigned char>

+ {

+ template <>

+ struct stream_char<signed char>

+ {

+ typedef char type;

+ };

+

+ template <typename CharT>

+ struct stream_char<CharT*>

+ {

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT>::type type;

+ };

+

+ template <typename CharT>

+ struct stream_char<const CharT*>

+ {

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT>::type type;

+ };

+

+ template <typename CharT>

+ struct stream_char<iterator_range<CharT*> >

+ {

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT*>::type type;

+ };

+

+ template <typename CharT>

+ struct stream_char<iterator_range<const CharT*> >

+ {

+ typedef BOOST_DEDUCED_TYPENAME stream_char<const CharT*>::type type;

+ };

+

+ template <class CharT, class Traits, class Alloc>

+ struct stream_char< std::basic_string<CharT, Traits, Alloc> >

+ template <class CharT, class Traits, class Alloc>

+ struct stream_char< ::boost::container::basic_string<CharT, Traits, Alloc> >

+ typedef CharT type;

+ template<typename CharT, std::size_t N>

+ struct stream_char<boost::array<CharT, N> >

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT>::type type;

+ template<typename CharT, std::size_t N>

+ struct stream_char<boost::array<const CharT, N> >

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT>::type type;

+#if !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+ template <typename CharT, std::size_t N>

+ struct stream_char<std::array<CharT, N> >

+ {

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT>::type type;

+ };

+

+ template <typename CharT, std::size_t N>

+ struct stream_char<std::array<const CharT, N> >

+ {

+ typedef BOOST_DEDUCED_TYPENAME stream_char<CharT>::type type;

+ };

+#endif // !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+

+#if !defined(BOOST_LCAST_NO_WCHAR_T) && defined(BOOST_NO_INTRINSIC_WCHAR_T)

+ struct stream_char<wchar_t>

+ typedef boost::detail::not_a_character_type type;

+ template<>

+ struct stream_char<wchar_t*>

+ typedef wchar_t type;

+ struct stream_char<const wchar_t*>

+#endif

+

+ template<class CharT, class Traits, class Alloc, class Source>

+ , ::boost::container::basic_string<CharT,Traits,Alloc>

+ , Source

+ template<class CharT, class Target, class Traits, class Alloc>

+ struct deduce_char_traits< CharT

+ , Target

+ , ::boost::container::basic_string<CharT,Traits,Alloc>

+ >

+ typedef Traits type;

+ template<class CharT, class Traits, class Alloc1, class Alloc2>

+ struct deduce_char_traits< CharT

+ , std::basic_string<CharT,Traits,Alloc1>

+ , std::basic_string<CharT,Traits,Alloc2>

+ >

+ typedef Traits type;

+ template<class CharT, class Traits, class Alloc1, class Alloc2>

+ struct deduce_char_traits< CharT

+ , ::boost::container::basic_string<CharT,Traits,Alloc1>

+ , ::boost::container::basic_string<CharT,Traits,Alloc2>

+ >

+ typedef Traits type;

+ template<class CharT, class Traits, class Alloc1, class Alloc2>

+ struct deduce_char_traits< CharT

+ , ::boost::container::basic_string<CharT,Traits,Alloc1>

+ , ::std::basic_string<CharT,Traits,Alloc2>

+ >

+ typedef Traits type;

+ template<class CharT, class Traits, class Alloc1, class Alloc2>

+ struct deduce_char_traits< CharT

+ , ::std::basic_string<CharT,Traits,Alloc1>

+ , ::boost::container::basic_string<CharT,Traits,Alloc2>

+ >

+ typedef Traits type;

+ }

+ namespace detail // lcast_src_length

+ {

+ // Return max. length of string representation of Source;

+ template< class Source // Source type of lexical_cast.

+ >

+ struct lcast_src_length

+ // To check coverage, build the test with

+ // bjam --v2 profile optimization=off

+ std::numeric_limits<Source>::is_specialized + /* == 1 */

+#define BOOST_LCAST_DEF(T) \

+ template<> struct lcast_src_length<T> \

+ struct lcast_src_length<float>

+ struct lcast_src_length<double>

+ struct lcast_src_length<long double>

+ namespace detail // '0', '+' and '-' constants

+ BOOST_STATIC_CONSTANT(char, plus = '+');

+ BOOST_STATIC_CONSTANT(char, lowercase_e = 'e');

+ BOOST_STATIC_CONSTANT(char, capital_e = 'E');

+ BOOST_STATIC_CONSTANT(char, c_decimal_separator = '.');

+ BOOST_STATIC_CONSTANT(wchar_t, plus = L'+');

+ BOOST_STATIC_CONSTANT(wchar_t, lowercase_e = L'e');

+ BOOST_STATIC_CONSTANT(wchar_t, capital_e = L'E');

+ BOOST_STATIC_CONSTANT(wchar_t, c_decimal_separator = L'.');

+#if !defined(BOOST_NO_CHAR16_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ template<>

+ struct lcast_char_constants<char16_t>

+ {

+ BOOST_STATIC_CONSTANT(char16_t, zero = u'0');

+ BOOST_STATIC_CONSTANT(char16_t, minus = u'-');

+ BOOST_STATIC_CONSTANT(char16_t, plus = u'+');

+ BOOST_STATIC_CONSTANT(char16_t, lowercase_e = u'e');

+ BOOST_STATIC_CONSTANT(char16_t, capital_e = u'E');

+ BOOST_STATIC_CONSTANT(char16_t, c_decimal_separator = u'.');

+#endif

+

+#if !defined(BOOST_NO_CHAR32_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ template<>

+ struct lcast_char_constants<char32_t>

+ {

+ BOOST_STATIC_CONSTANT(char32_t, zero = U'0');

+ BOOST_STATIC_CONSTANT(char32_t, minus = U'-');

+ BOOST_STATIC_CONSTANT(char32_t, plus = U'+');

+ BOOST_STATIC_CONSTANT(char32_t, lowercase_e = U'e');

+ BOOST_STATIC_CONSTANT(char32_t, capital_e = U'E');

+ BOOST_STATIC_CONSTANT(char32_t, c_decimal_separator = U'.');

+ };

+#endif

+ BOOST_DEDUCED_TYPENAME make_unsigned<T>::type lcast_to_unsigned(T value) BOOST_NOEXCEPT

+ const result_type uvalue = static_cast<result_type>(value);

+ CharT* lcast_put_unsigned(const T n_param, CharT* finish)

+ typedef typename Traits::int_type int_type;

+ CharT const czero = lcast_char_constants<CharT>::zero;

+ int_type const zero = Traits::to_int_type(czero);

+ BOOST_DEDUCED_TYPENAME boost::mpl::if_c<

+ (sizeof(int_type) > sizeof(T))

+ , int_type

+ , T

+ >::type n = n_param;

+

+ if (loc != std::locale::classic()) {

+ typedef std::numpunct<CharT> numpunct;

+ numpunct const& np = BOOST_USE_FACET(numpunct, loc);

+ std::string const grouping = np.grouping();

+ std::string::size_type const grouping_size = grouping.size();

+

+ if ( grouping_size && grouping[0] > 0 )

+ {

+

+ // Check that ulimited group is unreachable:

+ BOOST_STATIC_ASSERT(std::numeric_limits<T>::digits10 < CHAR_MAX);

+ CharT thousands_sep = np.thousands_sep();

+ std::string::size_type group = 0; // current group number

+ char last_grp_size = grouping[0];

+ char left = last_grp_size;

+ do

+ {

+ if(left == 0)

+ {

+ ++group;

+ if(group < grouping_size)

+ {

+ char const grp_size = grouping[group];

+ last_grp_size = grp_size <= 0 ? CHAR_MAX : grp_size;

+ }

+

+ left = last_grp_size;

+ --finish;

+ Traits::assign(*finish, thousands_sep);

+ }

+

+ --left;

+

+ --finish;

+ int_type const digit = static_cast<int_type>(n % 10U);

+ Traits::assign(*finish, Traits::to_char_type(zero + digit));

+ n /= 10;

+ } while(n);

+ return finish;

+ }

+ }

+ {

+ do

+ {

+ --finish;

+ int_type const digit = static_cast<int_type>(n % 10U);

+ Traits::assign(*finish, Traits::to_char_type(zero + digit));

+ n /= 10;

+ } while(n);

+ }

+ return finish;

+ }

+ }

+

+ namespace detail // lcast_ret_unsigned

+ {

+ template<class Traits, class T, class CharT>

+ inline bool lcast_ret_unsigned(T& value, const CharT* const begin, const CharT* end)

+ {

+#ifndef BOOST_NO_LIMITS_COMPILE_TIME_CONSTANTS

+ BOOST_STATIC_ASSERT(!std::numeric_limits<T>::is_signed);

+#endif

+ --end;

+ value = 0;

+

+ if (begin > end || *end < czero || *end >= czero + 10)

+ return false;

+ value = *end - czero;

+ --end;

+ T multiplier = 1;

+ bool multiplier_overflowed = false;

+ std::locale loc;

+ if (loc != std::locale::classic()) {

+ typedef std::numpunct<CharT> numpunct;

+ numpunct const& np = BOOST_USE_FACET(numpunct, loc);

+ std::string const& grouping = np.grouping();

+ std::string::size_type const grouping_size = grouping.size();

+

+ /* According to Programming languages - C++

+ * we MUST check for correct grouping

+ */

+ if (grouping_size && grouping[0] > 0)

+ unsigned char current_grouping = 0;

+ CharT const thousands_sep = np.thousands_sep();

+ char remained = grouping[current_grouping] - 1;

+ bool shall_we_return = true;

+

+ for(;end>=begin; --end)

+ if (remained) {

+ T const multiplier_10 = multiplier * 10;

+ if (multiplier_10 / 10 != multiplier) multiplier_overflowed = true;

+

+ T const dig_value = *end - czero;

+ T const new_sub_value = multiplier_10 * dig_value;

+

+ if (*end < czero || *end >= czero + 10

+ /* detecting overflow */

+ || (dig_value && new_sub_value / dig_value != multiplier_10)

+ || static_cast<T>((std::numeric_limits<T>::max)()-new_sub_value) < value

+ || (multiplier_overflowed && dig_value)

+ )

+ return false;

+

+ value += new_sub_value;

+ multiplier *= 10;

+ --remained;

+ } else {

+ if ( !Traits::eq(*end, thousands_sep) ) //|| begin == end ) return false;

+ {

+ /*

+ * According to Programming languages - C++

+ * Digit grouping is checked. That is, the positions of discarded

+ * separators is examined for consistency with

+ * use_facet<numpunct<charT> >(loc ).grouping()

+ *

+ * BUT what if there is no separators at all and grouping()

+ * is not empty? Well, we have no extraced separators, so we

+ * won`t check them for consistency. This will allow us to

+ * work with "C" locale from other locales

+ */

+ shall_we_return = false;

+ break;

+ } else {

+ if ( begin == end ) return false;

+ if (current_grouping < grouping_size-1 ) ++current_grouping;

+ remained = grouping[current_grouping];

+ }

+ }

+ if (shall_we_return) return true;

+ }

+ {

+ while ( begin <= end )

+ {

+ T const multiplier_10 = multiplier * 10;

+ if (multiplier_10 / 10 != multiplier) multiplier_overflowed = true;

+

+ T const dig_value = *end - czero;

+ T const new_sub_value = multiplier_10 * dig_value;

+

+ if (*end < czero || *end >= czero + 10

+ /* detecting overflow */

+ || (dig_value && new_sub_value / dig_value != multiplier_10)

+ || static_cast<T>((std::numeric_limits<T>::max)()-new_sub_value) < value

+ || (multiplier_overflowed && dig_value)

+ )

+ return false;

+

+ value += new_sub_value;

+ multiplier *= 10;

+ --end;

+ }

+ }

+ return true;

+ namespace detail

+ template <class CharT>

+ bool lc_iequal(const CharT* val, const CharT* lcase, const CharT* ucase, unsigned int len) BOOST_NOEXCEPT {

+ for( unsigned int i=0; i < len; ++i ) {

+ if ( val[i] != lcase[i] && val[i] != ucase[i] ) return false;

+ }

+ return true;

+ }

+ /* Returns true and sets the correct value if found NaN or Inf. */

+ template <class CharT, class T>

+ inline bool parse_inf_nan_impl(const CharT* begin, const CharT* end, T& value

+ , const CharT* lc_NAN, const CharT* lc_nan

+ , const CharT* lc_INFINITY, const CharT* lc_infinity

+ , const CharT opening_brace, const CharT closing_brace) BOOST_NOEXCEPT

+ {

+ using namespace std;

+ if (begin == end) return false;

+ const CharT minus = lcast_char_constants<CharT>::minus;

+ const CharT plus = lcast_char_constants<CharT>::plus;

+ const int inifinity_size = 8;

+

+ bool has_minus = false;

+ /* Parsing +/- */

+ if( *begin == minus)

+ ++ begin;

+ has_minus = true;

+ else if( *begin == plus ) ++begin;

+

+ if( end-begin < 3 ) return false;

+ if( lc_iequal(begin, lc_nan, lc_NAN, 3) )

+ begin += 3;

+ if (end != begin) /* It is 'nan(...)' or some bad input*/

+ {

+ if(end-begin<2) return false; // bad input

+ -- end;

+ if( *begin != opening_brace || *end != closing_brace) return false; // bad input

+ }

+

+ if( !has_minus ) value = std::numeric_limits<T>::quiet_NaN();

+ else value = (boost::math::changesign) (std::numeric_limits<T>::quiet_NaN());

+ return true;

+ } else

+ if (( /* 'INF' or 'inf' */

+ end-begin==3

+ &&

+ lc_iequal(begin, lc_infinity, lc_INFINITY, 3)

+ )

+ ||

+ ( /* 'INFINITY' or 'infinity' */

+ end-begin==inifinity_size

+ &&

+ lc_iequal(begin, lc_infinity, lc_INFINITY, inifinity_size)

+ )

+ )

+ if( !has_minus ) value = std::numeric_limits<T>::infinity();

+ else value = (boost::math::changesign) (std::numeric_limits<T>::infinity());

+ return true;

+ return false;

+ }

+ template <class CharT, class T>

+ bool put_inf_nan_impl(CharT* begin, CharT*& end, const T& value

+ , const CharT* lc_nan

+ , const CharT* lc_infinity) BOOST_NOEXCEPT

+ {

+ using namespace std;

+ const CharT minus = lcast_char_constants<CharT>::minus;

+ if ( (boost::math::isnan)(value) )

+ if ( (boost::math::signbit)(value) )

+ {

+ *begin = minus;

+ ++ begin;

+ }

+

+ memcpy(begin, lc_nan, 3 * sizeof(CharT));

+ end = begin + 3;

+ } else if ( (boost::math::isinf)(value) )

+ if ( (boost::math::signbit)(value) )

+ {

+ *begin = minus;

+ ++ begin;

+ }

+

+ memcpy(begin, lc_infinity, 3 * sizeof(CharT));

+ end = begin + 3;

+ return false;

+ }

+

+

+#ifndef BOOST_LCAST_NO_WCHAR_T

+ template <class T>

+ bool parse_inf_nan(const wchar_t* begin, const wchar_t* end, T& value) BOOST_NOEXCEPT

+ {

+ return parse_inf_nan_impl(begin, end, value

+ , L"NAN", L"nan"

+ , L"INFINITY", L"infinity"

+ , L'(', L')');

+ }

+

+ template <class T>

+ bool put_inf_nan(wchar_t* begin, wchar_t*& end, const T& value) BOOST_NOEXCEPT

+ {

+ return put_inf_nan_impl(begin, end, value, L"nan", L"infinity");

+ }

+

+#endif

+#if !defined(BOOST_NO_CHAR16_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ template <class T>

+ bool parse_inf_nan(const char16_t* begin, const char16_t* end, T& value) BOOST_NOEXCEPT

+ {

+ return parse_inf_nan_impl(begin, end, value

+ , u"NAN", u"nan"

+ , u"INFINITY", u"infinity"

+ , u'(', u')');

+ }

+

+ template <class T>

+ bool put_inf_nan(char16_t* begin, char16_t*& end, const T& value) BOOST_NOEXCEPT

+ {

+ return put_inf_nan_impl(begin, end, value, u"nan", u"infinity");

+ }

+#endif

+#if !defined(BOOST_NO_CHAR32_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ template <class T>

+ bool parse_inf_nan(const char32_t* begin, const char32_t* end, T& value) BOOST_NOEXCEPT

+ {

+ return parse_inf_nan_impl(begin, end, value

+ , U"NAN", U"nan"

+ , U"INFINITY", U"infinity"

+ , U'(', U')');

+ }

+

+ template <class T>

+ bool put_inf_nan(char32_t* begin, char32_t*& end, const T& value) BOOST_NOEXCEPT

+ {

+ return put_inf_nan_impl(begin, end, value, U"nan", U"infinity");

+ }

+#endif

+

+ template <class CharT, class T>

+ bool parse_inf_nan(const CharT* begin, const CharT* end, T& value) BOOST_NOEXCEPT

+ {

+ return parse_inf_nan_impl(begin, end, value

+ , "NAN", "nan"

+ , "INFINITY", "infinity"

+ , '(', ')');

+ }

+

+ template <class CharT, class T>

+ bool put_inf_nan(CharT* begin, CharT*& end, const T& value) BOOST_NOEXCEPT

+ {

+ return put_inf_nan_impl(begin, end, value, "nan", "infinity");

+ }

+ }

+

+

+ namespace detail // lcast_ret_float

+ {

+ template <class T>

+ struct mantissa_holder_type

+ {

+ /* Can not be used with this type */

+ };

+

+ template <>

+ struct mantissa_holder_type<float>

+ {

+ typedef unsigned int type;

+ };

+

+ template <>

+ struct mantissa_holder_type<double>

+ {

+#if defined(BOOST_HAS_LONG_LONG)

+ typedef boost::ulong_long_type type;

+#elif defined(BOOST_HAS_MS_INT64)

+ typedef unsigned __int64 type;

+#endif

+ };

+

+ template<class Traits, class T, class CharT>

+ inline bool lcast_ret_float(T& value, const CharT* begin, const CharT* end)

+ {

+

+#ifndef BOOST_LEXICAL_CAST_ASSUME_C_LOCALE

+ std::locale loc;

+ typedef std::numpunct<CharT> numpunct;

+ numpunct const& np = BOOST_USE_FACET(numpunct, loc);

+ std::string const grouping(

+ (loc == std::locale::classic())

+ ? std::string()

+ : np.grouping()

+ );

+ std::string::size_type const grouping_size = grouping.size();

+ CharT const thousands_sep = grouping_size ? np.thousands_sep() : 0;

+ CharT const decimal_point = np.decimal_point();

+ bool found_grouping = false;

+ std::string::size_type last_grouping_pos = grouping_size - 1;

+ CharT const decimal_point = lcast_char_constants<CharT>::c_decimal_separator;

+#endif

+

+ CharT const czero = lcast_char_constants<CharT>::zero;

+ CharT const minus = lcast_char_constants<CharT>::minus;

+ CharT const plus = lcast_char_constants<CharT>::plus;

+ CharT const capital_e = lcast_char_constants<CharT>::capital_e;

+ CharT const lowercase_e = lcast_char_constants<CharT>::lowercase_e;

+

+ value = static_cast<T>(0);

+

+ if (parse_inf_nan(begin, end, value)) return true;

+

+ typedef typename Traits::int_type int_type;

+ typedef BOOST_DEDUCED_TYPENAME mantissa_holder_type<T>::type mantissa_type;

+ int_type const zero = Traits::to_int_type(czero);

+ if (begin == end) return false;

+

+ /* Getting the plus/minus sign */

+ bool has_minus = false;

+ if (Traits::eq(*begin, minus) ) {

+ ++ begin;

+ has_minus = true;

+ if (begin == end) return false;

+ } else if (Traits::eq(*begin, plus) ) {

+ ++begin;

+ if (begin == end) return false;

+ bool found_decimal = false;

+ bool found_number_before_exp = false;

+ int pow_of_10 = 0;

+ mantissa_type mantissa=0;

+ bool is_mantissa_full = false;

+

+ char length_since_last_delim = 0;

+

+ while ( begin != end )

+ if (found_decimal) {

+ /* We allow no thousand_separators after decimal point */

+

+ mantissa_type tmp_mantissa = mantissa * 10u;

+ if (Traits::eq(*begin, lowercase_e) || Traits::eq(*begin, capital_e)) break;

+ if ( *begin < czero || *begin >= czero + 10 ) return false;

+ if ( is_mantissa_full

+ || tmp_mantissa / 10u != mantissa

+ || (std::numeric_limits<mantissa_type>::max)()-(*begin - zero) < tmp_mantissa

+ ) {

+ is_mantissa_full = true;

+ ++ begin;

+ continue;

+ }

+

+ -- pow_of_10;

+ mantissa = tmp_mantissa;

+ mantissa += *begin - zero;

+

+ found_number_before_exp = true;

+ } else {

+

+ if (*begin >= czero && *begin < czero + 10) {

+

+ /* Checking for mantissa overflow. If overflow will

+ * occur, them we only increase multiplyer

+ */

+ mantissa_type tmp_mantissa = mantissa * 10u;

+ if( !is_mantissa_full

+ && tmp_mantissa / 10u == mantissa

+ && (std::numeric_limits<mantissa_type>::max)()-(*begin - zero) >= tmp_mantissa

+ )

+ {

+ mantissa = tmp_mantissa;

+ mantissa += *begin - zero;

+ } else

+ {

+ is_mantissa_full = true;

+ ++ pow_of_10;

+ }

+

+ found_number_before_exp = true;

+ ++ length_since_last_delim;

+ } else if (Traits::eq(*begin, decimal_point) || Traits::eq(*begin, lowercase_e) || Traits::eq(*begin, capital_e)) {

+#ifndef BOOST_LEXICAL_CAST_ASSUME_C_LOCALE

+ /* If ( we need to check grouping

+ * and ( grouping missmatches

+ * or grouping position is incorrect

+ * or we are using the grouping position 0 twice

+ * )

+ * ) then return error

+ */

+ if( grouping_size && found_grouping

+ && (

+ length_since_last_delim != grouping[0]

+ || last_grouping_pos>1

+ || (last_grouping_pos==0 && grouping_size>1)

+ )

+ ) return false;

+#endif

+

+ if(Traits::eq(*begin, decimal_point)) {

+ ++ begin;

+ found_decimal = true;

+ if (!found_number_before_exp && begin==end) return false;

+ continue;

+ }else {

+ if (!found_number_before_exp) return false;

+ break;

+ }

+ }

+#ifndef BOOST_LEXICAL_CAST_ASSUME_C_LOCALE

+ else if (grouping_size && Traits::eq(*begin, thousands_sep)){

+ if(found_grouping)

+ {

+ /* It is not he first time, when we find thousands separator,

+ * so we need to chek, is the distance between two groupings

+ * equal to grouping[last_grouping_pos] */

+

+ if (length_since_last_delim != grouping[last_grouping_pos] )

+ {

+ if (!last_grouping_pos) return false;

+ else

+ {

+ -- last_grouping_pos;

+ if (length_since_last_delim != grouping[last_grouping_pos]) return false;

+ }

+ } else

+ /* We are calling the grouping[0] twice, when grouping size is more than 1 */

+ if (grouping_size>1u && last_grouping_pos+1<grouping_size) return false;

+

+ } else {

+ /* Delimiter at the begining ',000' */

+ if (!length_since_last_delim) return false;

+

+ found_grouping = true;

+ if (length_since_last_delim > grouping[last_grouping_pos] ) return false;

+ }

+

+ length_since_last_delim = 0;

+ ++ begin;

+

+ /* Delimiter at the end '100,' */

+ if (begin == end) return false;

+ continue;

+ }

+#endif

+ else return false;

+ }

+

+ ++begin;

+

+ // Exponent found

+ if ( begin != end && (Traits::eq(*begin, lowercase_e) || Traits::eq(*begin, capital_e)) ) {

+ ++ begin;

+ if ( begin == end ) return false;

+

+ bool exp_has_minus = false;

+ if(Traits::eq(*begin, minus)) {

+ exp_has_minus = true;

+ ++ begin;

+ if ( begin == end ) return false;

+ } else if (Traits::eq(*begin, plus)) {

+ ++ begin;

+ if ( begin == end ) return false;

+ }

+

+ int exp_pow_of_10 = 0;

+ while ( begin != end )

+ {

+ if ( *begin < czero

+ || *begin >= czero + 10

+ || exp_pow_of_10 * 10 < exp_pow_of_10) /* Overflows are checked lower more precisely*/

+ return false;

+

+ exp_pow_of_10 *= 10;

+ exp_pow_of_10 += *begin - zero;

+ ++ begin;

+ };

+

+ if ( exp_pow_of_10 ) {

+ /* Overflows are checked lower */

+ if ( exp_has_minus ) {

+ pow_of_10 -= exp_pow_of_10;

+ } else {

+ pow_of_10 += exp_pow_of_10;

+ }

+ }

+ }

+

+ /* We need a more accurate algorithm... We can not use current algorithm

+ * with long doubles (and with doubles if sizeof(double)==sizeof(long double)).

+ */

+ long double result = std::pow(10.0L, pow_of_10) * mantissa;

+ value = static_cast<T>( has_minus ? (boost::math::changesign)(result) : result);

+

+ if ( (boost::math::isinf)(value) || (boost::math::isnan)(value) ) return false;

+

+ return true;

+ }

+ }

+

+ namespace detail // stl_buf_unlocker

+ {

+ template< class BufferType, class CharT >

+ class stl_buf_unlocker: public BufferType{

+ public:

+ typedef BufferType base_class;

+#ifndef BOOST_NO_USING_TEMPLATE

+ using base_class::pptr;

+ using base_class::pbase;

+ using base_class::setg;

+ using base_class::setp;

+#else

+ CharT* pptr() const { return base_class::pptr(); }

+ CharT* pbase() const { return base_class::pbase(); }

+ void setg(CharT* gbeg, CharT* gnext, CharT* gend){ return base_class::setg(gbeg, gnext, gend); }

+ void setp(CharT* pbeg, CharT* pend) { return setp(pbeg, pend); }

+ namespace detail

+ {

+ struct do_not_construct_out_stream_t{};

+ }

+

+ , bool RequiresStringbuffer

+ class lexical_stream_limited_src

+

+#if defined(BOOST_NO_STRINGSTREAM)

+ typedef std::ostrstream out_stream_t;

+ typedef stl_buf_unlocker<std::strstreambuf, char> unlocked_but_t;

+#elif defined(BOOST_NO_STD_LOCALE)

+ typedef std::ostringstream out_stream_t;

+ typedef stl_buf_unlocker<std::stringbuf, char> unlocked_but_t;

+#else

+ typedef std::basic_ostringstream<CharT, Traits> out_stream_t;

+ typedef stl_buf_unlocker<std::basic_stringbuf<CharT, Traits>, CharT> unlocked_but_t;

+#endif

+ typedef BOOST_DEDUCED_TYPENAME ::boost::mpl::if_c<

+ RequiresStringbuffer,

+ out_stream_t,

+ do_not_construct_out_stream_t

+ >::type deduced_out_stream_t;

+

+ deduced_out_stream_t out_stream;

+

+ public:

+ lexical_stream_limited_src(CharT* sta, CharT* fin)

+ : start(sta)

+ , finish(fin)

+ {}

+ // Undefined:

+ lexical_stream_limited_src(lexical_stream_limited_src const&);

+ void operator=(lexical_stream_limited_src const&);

+/************************************ HELPER FUNCTIONS FOR OPERATORS << ( ... ) ********************************/

+ bool shl_char(CharT ch) BOOST_NOEXCEPT

+ Traits::assign(*start, ch);

+ finish = start + 1;

+ return true;

+ template <class T>

+ bool shl_char(T ch)

+ BOOST_STATIC_ASSERT_MSG(( sizeof(T) <= sizeof(CharT)) ,

+ "boost::lexical_cast does not support narrowing of char types."

+ "Use boost::locale instead" );

+#ifndef BOOST_LEXICAL_CAST_ASSUME_C_LOCALE

+ CharT const w = BOOST_USE_FACET(std::ctype<CharT>, loc).widen(ch);

+#else

+ CharT const w = ch;

+#endif

+ Traits::assign(*start, w);

+ finish = start + 1;

+ return true;

+ }

+#endif

+

+ bool shl_char_array(CharT const* str) BOOST_NOEXCEPT

+ {

+ start = const_cast<CharT*>(str);

+ finish = start + Traits::length(str);

+ return true;

+ template <class T>

+ bool shl_char_array(T const* str)

+ BOOST_STATIC_ASSERT_MSG(( sizeof(T) <= sizeof(CharT)),

+ "boost::lexical_cast does not support narrowing of char types."

+ "Use boost::locale instead" );

+ return shl_input_streamable(str);

+ }

+

+ bool shl_char_array_limited(CharT const* str, std::size_t max_size) BOOST_NOEXCEPT

+ {

+ start = const_cast<CharT*>(str);

+ finish = std::find(start, start + max_size, Traits::to_char_type(0));

+ return true;

+ template<typename InputStreamable>

+ bool shl_input_streamable(InputStreamable& input)

+ {

+#if defined(BOOST_NO_STRINGSTREAM) || defined(BOOST_NO_STD_LOCALE)

+ // If you have compilation error at this point, than your STL library

+ // does not support such conversions. Try updating it.

+ BOOST_STATIC_ASSERT((boost::is_same<char, CharT>::value));

+ bool const result = !(out_stream << input).fail();

+ const unlocked_but_t* const p

+ = static_cast<unlocked_but_t*>(out_stream.rdbuf()) ;

+ start = p->pbase();

+ finish = p->pptr();

+ return result;

+ }

+ template <class T>

+ inline bool shl_signed(T n)

+ start = lcast_put_unsigned<Traits>(lcast_to_unsigned(n), finish);

+ if(n < 0)

+ {

+ --start;

+ CharT const minus = lcast_char_constants<CharT>::minus;

+ Traits::assign(*start, minus);

+ }

+ return true;

+ template <class T, class SomeCharT>

+ bool shl_real_type(const T& val, SomeCharT* begin, SomeCharT*& end)

+ {

+ if (put_inf_nan(begin, end, val)) return true;

+ lcast_set_precision(out_stream, &val);

+ return shl_input_streamable(val);

+ }

+ static bool shl_real_type(float val, char* begin, char*& end)

+ { using namespace std;

+ if (put_inf_nan(begin, end, val)) return true;

+ const double val_as_double = val;

+ end = begin +

+#if defined(_MSC_VER) && (_MSC_VER >= 1400) && !defined(__SGI_STL_PORT) && !defined(_STLPORT_VERSION)

+ sprintf_s(begin, end-begin,

+#else

+ sprintf(begin,

+#endif

+ "%.*g", static_cast<int>(boost::detail::lcast_get_precision<float>()), val_as_double);

+ return end > begin;

+ }

+ static bool shl_real_type(double val, char* begin, char*& end)

+ { using namespace std;

+ if (put_inf_nan(begin, end, val)) return true;

+ end = begin +

+#if defined(_MSC_VER) && (_MSC_VER >= 1400) && !defined(__SGI_STL_PORT) && !defined(_STLPORT_VERSION)

+ sprintf_s(begin, end-begin,

+#else

+ sprintf(begin,

+#endif

+ "%.*g", static_cast<int>(boost::detail::lcast_get_precision<double>()), val);

+ return end > begin;

+ }

+

+#ifndef __MINGW32__

+ static bool shl_real_type(long double val, char* begin, char*& end)

+ { using namespace std;

+ if (put_inf_nan(begin, end, val)) return true;

+ end = begin +

+#if defined(_MSC_VER) && (_MSC_VER >= 1400) && !defined(__SGI_STL_PORT) && !defined(_STLPORT_VERSION)

+ sprintf_s(begin, end-begin,

+#else

+ sprintf(begin,

+#endif

+ "%.*Lg", static_cast<int>(boost::detail::lcast_get_precision<long double>()), val );

+ return end > begin;

+ }

+#endif

+#if !defined(BOOST_LCAST_NO_WCHAR_T) && !defined(BOOST_NO_SWPRINTF) && !defined(__MINGW32__)

+ static bool shl_real_type(float val, wchar_t* begin, wchar_t*& end)

+ { using namespace std;

+ if (put_inf_nan(begin, end, val)) return true;

+ const double val_as_double = val;

+ end = begin + swprintf(begin, end-begin,

+ L"%.*g",

+ static_cast<int>(boost::detail::lcast_get_precision<float >()),

+ val_as_double );

+ return end > begin;

+ }

+

+ static bool shl_real_type(double val, wchar_t* begin, wchar_t*& end)

+ { using namespace std;

+ if (put_inf_nan(begin, end, val)) return true;

+ end = begin + swprintf(begin, end-begin,

+ L"%.*g", static_cast<int>(boost::detail::lcast_get_precision<double >()), val );

+ return end > begin;

+ }

+

+ static bool shl_real_type(long double val, wchar_t* begin, wchar_t*& end)

+ { using namespace std;

+ if (put_inf_nan(begin, end, val)) return true;

+ end = begin + swprintf(begin, end-begin,

+ L"%.*Lg", static_cast<int>(boost::detail::lcast_get_precision<long double >()), val );

+ return end > begin;

+ }

+#endif

+

+/************************************ OPERATORS << ( ... ) ********************************/

+ public:

+ bool operator<<(std::basic_string<CharT,Traits,Alloc> const& str) BOOST_NOEXCEPT

+ template<class Alloc>

+ bool operator<<(::boost::container::basic_string<CharT,Traits,Alloc> const& str) BOOST_NOEXCEPT

+ {

+ start = const_cast<CharT*>(str.data());

+ finish = start + str.length();

+ return true;

+ }

+

+ bool operator<<(bool value) BOOST_NOEXCEPT

+ {

+ CharT const czero = lcast_char_constants<CharT>::zero;

+ Traits::assign(*start, Traits::to_char_type(czero + value));

+ finish = start + 1;

+ return true;

+ }

+

+ bool operator<<(const iterator_range<CharT*>& rng) BOOST_NOEXCEPT

+ {

+ start = rng.begin();

+ finish = rng.end();

+ return true;

+ }

+

+ bool operator<<(const iterator_range<const CharT*>& rng) BOOST_NOEXCEPT

+ {

+ start = const_cast<CharT*>(rng.begin());

+ finish = const_cast<CharT*>(rng.end());

+ return true;

+ }

+

+ bool operator<<(const iterator_range<const signed char*>& rng) BOOST_NOEXCEPT

+ {

+ return (*this) << iterator_range<char*>(

+ const_cast<char*>(reinterpret_cast<const char*>(rng.begin())),

+ const_cast<char*>(reinterpret_cast<const char*>(rng.end()))

+ );

+ }

+

+ bool operator<<(const iterator_range<const unsigned char*>& rng) BOOST_NOEXCEPT

+ {

+ return (*this) << iterator_range<char*>(

+ const_cast<char*>(reinterpret_cast<const char*>(rng.begin())),

+ const_cast<char*>(reinterpret_cast<const char*>(rng.end()))

+ );

+ }

+

+ bool operator<<(const iterator_range<signed char*>& rng) BOOST_NOEXCEPT

+ {

+ return (*this) << iterator_range<char*>(

+ reinterpret_cast<char*>(rng.begin()),

+ reinterpret_cast<char*>(rng.end())

+ );

+ }

+

+ bool operator<<(const iterator_range<unsigned char*>& rng) BOOST_NOEXCEPT

+ {

+ return (*this) << iterator_range<char*>(

+ reinterpret_cast<char*>(rng.begin()),

+ reinterpret_cast<char*>(rng.end())

+ );

+ }

+

+ bool operator<<(char ch) { return shl_char(ch); }

+ bool operator<<(unsigned char ch) { return ((*this) << static_cast<char>(ch)); }

+ bool operator<<(signed char ch) { return ((*this) << static_cast<char>(ch)); }

+#if !defined(BOOST_LCAST_NO_WCHAR_T)

+ bool operator<<(wchar_t const* str) { return shl_char_array(str); }

+ bool operator<<(wchar_t * str) { return shl_char_array(str); }

+#ifndef BOOST_NO_INTRINSIC_WCHAR_T

+ bool operator<<(wchar_t ch) { return shl_char(ch); }

+#endif

+#endif

+#if !defined(BOOST_NO_CHAR16_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ bool operator<<(char16_t ch) { return shl_char(ch); }

+ bool operator<<(char16_t * str) { return shl_char_array(str); }

+ bool operator<<(char16_t const * str) { return shl_char_array(str); }

+#endif

+#if !defined(BOOST_NO_CHAR32_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ bool operator<<(char32_t ch) { return shl_char(ch); }

+ bool operator<<(char32_t * str) { return shl_char_array(str); }

+ bool operator<<(char32_t const * str) { return shl_char_array(str); }

+#endif

+ bool operator<<(unsigned char const* ch) { return ((*this) << reinterpret_cast<char const*>(ch)); }

+ bool operator<<(unsigned char * ch) { return ((*this) << reinterpret_cast<char *>(ch)); }

+ bool operator<<(signed char const* ch) { return ((*this) << reinterpret_cast<char const*>(ch)); }

+ bool operator<<(signed char * ch) { return ((*this) << reinterpret_cast<char *>(ch)); }

+ bool operator<<(char const* str) { return shl_char_array(str); }

+ bool operator<<(char* str) { return shl_char_array(str); }

+ bool operator<<(short n) { return shl_signed(n); }

+ bool operator<<(int n) { return shl_signed(n); }

+ bool operator<<(long n) { return shl_signed(n); }

+ bool operator<<(unsigned short n) { start = lcast_put_unsigned<Traits>(n, finish); return true; }

+ bool operator<<(unsigned int n) { start = lcast_put_unsigned<Traits>(n, finish); return true; }

+ bool operator<<(unsigned long n) { start = lcast_put_unsigned<Traits>(n, finish); return true; }

+

+ bool operator<<(boost::ulong_long_type n) { start = lcast_put_unsigned<Traits>(n, finish); return true; }

+ bool operator<<(boost::long_long_type n) { return shl_signed(n); }

+ bool operator<<(unsigned __int64 n) { start = lcast_put_unsigned<Traits>(n, finish); return true; }

+ bool operator<<( __int64 n) { return shl_signed(n); }

+#endif

+ bool operator<<(float val) { return shl_real_type(val, start, finish); }

+ bool operator<<(double val) { return shl_real_type(val, start, finish); }

+ bool operator<<(long double val) {

+#ifndef __MINGW32__

+ return shl_real_type(val, start, finish);

+#else

+ return shl_real_type(static_cast<double>(val), start, finish);

+ }

+

+ template <std::size_t N>

+ bool operator<<(boost::array<CharT, N> const& input) BOOST_NOEXCEPT

+ { return shl_char_array_limited(input.begin(), N); }

+

+ template <std::size_t N>

+ bool operator<<(boost::array<unsigned char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<char, N> const& >(input)); }

+

+ template <std::size_t N>

+ bool operator<<(boost::array<signed char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<char, N> const& >(input)); }

+

+ template <std::size_t N>

+ bool operator<<(boost::array<const CharT, N> const& input) BOOST_NOEXCEPT

+ { return shl_char_array_limited(input.begin(), N); }

+

+ template <std::size_t N>

+ bool operator<<(boost::array<const unsigned char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<const char, N> const& >(input)); }

+

+ template <std::size_t N>

+ bool operator<<(boost::array<const signed char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<const char, N> const& >(input)); }

+

+#if !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+ template <std::size_t N>

+ bool operator<<(std::array<CharT, N> const& input) BOOST_NOEXCEPT

+ { return shl_char_array_limited(input.begin(), N); }

+

+ template <std::size_t N>

+ bool operator<<(std::array<unsigned char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<char, N> const& >(input)); }

+

+ template <std::size_t N>

+ bool operator<<(std::array<signed char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<char, N> const& >(input)); }

+

+ template <std::size_t N>

+ bool operator<<(std::array<const CharT, N> const& input) BOOST_NOEXCEPT

+ { return shl_char_array_limited(input.begin(), N); }

+

+ template <std::size_t N>

+ bool operator<<(std::array<const unsigned char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<const char, N> const& >(input)); }

+

+ template <std::size_t N>

+ bool operator<<(std::array<const signed char, N> const& input) BOOST_NOEXCEPT

+ { return ((*this) << reinterpret_cast<boost::array<const char, N> const& >(input)); }

+#endif // !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+

+ template <class InStreamable>

+ bool operator<<(const InStreamable& input) { return shl_input_streamable(input); }

+

+/************************************ HELPER FUNCTIONS FOR OPERATORS >> ( ... ) ********************************/

+ private:

+ template <typename Type>

+ bool shr_unsigned(Type& output)

+ {

+ if (start == finish) return false;

+ CharT const minus = lcast_char_constants<CharT>::minus;

+ CharT const plus = lcast_char_constants<CharT>::plus;

+ bool has_minus = false;

+

+ /* We won`t use `start' any more, so no need in decrementing it after */

+ if ( Traits::eq(minus,*start) )

+ {

+ ++start;

+ has_minus = true;

+ } else if ( Traits::eq( plus, *start ) )

+ {

+ ++start;

+ }

+

+ bool const succeed = lcast_ret_unsigned<Traits>(output, start, finish);

+#if (defined _MSC_VER)

+# pragma warning( push )

+// C4146: unary minus operator applied to unsigned type, result still unsigned

+# pragma warning( disable : 4146 )

+#elif defined( __BORLANDC__ )

+# pragma option push -w-8041

+#endif

+ if (has_minus) output = static_cast<Type>(-output);

+#if (defined _MSC_VER)

+# pragma warning( pop )

+#elif defined( __BORLANDC__ )

+# pragma option pop

+#endif

+ return succeed;

+ }

+

+ template <typename Type>

+ bool shr_signed(Type& output)

+ {

+ if (start == finish) return false;

+ CharT const minus = lcast_char_constants<CharT>::minus;

+ CharT const plus = lcast_char_constants<CharT>::plus;

+ typedef BOOST_DEDUCED_TYPENAME make_unsigned<Type>::type utype;

+ utype out_tmp =0;

+ bool has_minus = false;

+

+ /* We won`t use `start' any more, so no need in decrementing it after */

+ if ( Traits::eq(minus,*start) )

+ {

+ ++start;

+ has_minus = true;

+ } else if ( Traits::eq(plus, *start) )

+ {

+ ++start;

+ }

+

+ bool succeed = lcast_ret_unsigned<Traits>(out_tmp, start, finish);

+ if (has_minus) {

+#if (defined _MSC_VER)

+# pragma warning( push )

+// C4146: unary minus operator applied to unsigned type, result still unsigned

+# pragma warning( disable : 4146 )

+#elif defined( __BORLANDC__ )

+# pragma option push -w-8041

+#endif

+ utype const comp_val = static_cast<utype>(-(std::numeric_limits<Type>::min)());

+ succeed = succeed && out_tmp<=comp_val;

+ output = -out_tmp;

+#if (defined _MSC_VER)

+# pragma warning( pop )

+#elif defined( __BORLANDC__ )

+# pragma option pop

+#endif

+ } else {

+ utype const comp_val = static_cast<utype>((std::numeric_limits<Type>::max)());

+ succeed = succeed && out_tmp<=comp_val;

+ output = out_tmp;

+ }

+ return succeed;

+ }

+ bool shr_using_base_class(InputStreamable& output)

+#if defined(BOOST_NO_STRINGSTREAM) || defined(BOOST_NO_STD_LOCALE)

+ // If you have compilation error at this point, than your STL library

+ // unsupports such conversions. Try updating it.

+ BOOST_STATIC_ASSERT((boost::is_same<char, CharT>::value));

+#endif

+

+#if defined(BOOST_NO_STRINGSTREAM)

+ std::istrstream stream(start, finish - start);

+#elif defined(BOOST_NO_STD_LOCALE)

+ std::istringstream stream;

+#else

+ std::basic_istringstream<CharT, Traits> stream;

+#endif

+ static_cast<unlocked_but_t*>(stream.rdbuf())

+ ->setg(start, start, finish);

+

+ template<class T>

+ inline bool shr_xchar(T& output)

+ {

+ BOOST_STATIC_ASSERT_MSG(( sizeof(CharT) == sizeof(T) ),

+ "boost::lexical_cast does not support narrowing of character types."

+ "Use boost::locale instead" );

+ bool const ok = (finish - start == 1);

+ if (ok) {

+ CharT out;

+ Traits::assign(out, *start);

+ output = static_cast<T>(out);

+ }

+ return ok;

+ }

+/************************************ OPERATORS >> ( ... ) ********************************/

+ public:

+ bool operator>>(unsigned short& output) { return shr_unsigned(output); }

+ bool operator>>(unsigned int& output) { return shr_unsigned(output); }

+ bool operator>>(unsigned long int& output) { return shr_unsigned(output); }

+ bool operator>>(short& output) { return shr_signed(output); }

+ bool operator>>(int& output) { return shr_signed(output); }

+ bool operator>>(long int& output) { return shr_signed(output); }

+#if defined(BOOST_HAS_LONG_LONG)

+ bool operator>>(boost::ulong_long_type& output) { return shr_unsigned(output); }

+ bool operator>>(boost::long_long_type& output) { return shr_signed(output); }

+#elif defined(BOOST_HAS_MS_INT64)

+ bool operator>>(unsigned __int64& output) { return shr_unsigned(output); }

+ bool operator>>(__int64& output) { return shr_signed(output); }

+#endif

+ bool operator>>(char& output) { return shr_xchar(output); }

+ bool operator>>(unsigned char& output) { return shr_xchar(output); }

+ bool operator>>(signed char& output) { return shr_xchar(output); }

+#if !defined(BOOST_LCAST_NO_WCHAR_T) && !defined(BOOST_NO_INTRINSIC_WCHAR_T)

+ bool operator>>(wchar_t& output) { return shr_xchar(output); }

+#endif

+#if !defined(BOOST_NO_CHAR16_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ bool operator>>(char16_t& output) { return shr_xchar(output); }

+#if !defined(BOOST_NO_CHAR32_T) && !defined(BOOST_NO_UNICODE_LITERALS)

+ bool operator>>(char32_t& output) { return shr_xchar(output); }

+#endif

+ template<class Alloc>

+ bool operator>>(std::basic_string<CharT,Traits,Alloc>& str) { str.assign(start, finish); return true; }

+ bool operator>>(::boost::container::basic_string<CharT,Traits,Alloc>& str) { str.assign(start, finish); return true; }

+

+

+ private:

+ template <std::size_t N, class ArrayT>

+ bool shr_std_array(ArrayT& output) BOOST_NOEXCEPT

+ using namespace std;

+ const std::size_t size = finish - start;

+ if (size > N - 1) { // `-1` because we need to store \0 at the end

+ return false;

+ }

+

+ memcpy(output.begin(), start, size * sizeof(CharT));

+ *(output.begin() + size) = Traits::to_char_type(0);

+ public:

+ template <std::size_t N>

+ bool operator>>(boost::array<CharT, N>& output) BOOST_NOEXCEPT

+ {

+ return shr_std_array<N>(output);

+ }

+ template <std::size_t N>

+ bool operator>>(boost::array<unsigned char, N>& output)

+ {

+ return ((*this) >> reinterpret_cast<boost::array<char, N>& >(output));

+ }

+ template <std::size_t N>

+ bool operator>>(boost::array<signed char, N>& output)

+ {

+ return ((*this) >> reinterpret_cast<boost::array<char, N>& >(output));

+ }

+

+#if !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+ template <std::size_t N>

+ bool operator>>(std::array<CharT, N>& output) BOOST_NOEXCEPT

+ {

+ return shr_std_array<N>(output);

+ template <std::size_t N>

+ bool operator>>(std::array<unsigned char, N>& output)

+ {

+ return ((*this) >> reinterpret_cast<std::array<char, N>& >(output));

+ template <std::size_t N>

+ bool operator>>(std::array<signed char, N>& in)

+ {

+ return ((*this) >> reinterpret_cast<std::array<char, N>& >(output));

+#endif // !defined(BOOST_NO_CXX11_HDR_ARRAY) && defined(BOOST_HAS_TR1_ARRAY)

+

+ /*

+ * case "-0" || "0" || "+0" : output = false; return true;

+ * case "1" || "+1": output = true; return true;

+ * default: return false;

+ */

+ bool operator>>(bool& output) BOOST_NOEXCEPT

+ CharT const zero = lcast_char_constants<CharT>::zero;

+ CharT const plus = lcast_char_constants<CharT>::plus;

+

+ switch(finish-start)

+ {

+ case 1:

+ output = Traits::eq(start[0], zero+1);

+ return output || Traits::eq(start[0], zero );

+ case 2:

+ if ( Traits::eq( plus, *start) )

+ {

+ ++start;

+ output = Traits::eq(start[0], zero +1);

+ return output || Traits::eq(start[0], zero );

+ } else

+ {

+ output = false;

+ return Traits::eq( minus, *start)

+ && Traits::eq( zero, start[1]);

+ }

+ default:

+ output = false; // Suppress warning about uninitalized variable

+ return false;

+ }

+

+ bool operator>>(float& output) { return lcast_ret_float<Traits>(output,start,finish); }

+

+ private:

+ // Not optimised converter

+ template <class T>

+ bool float_types_converter_internal(T& output, int /*tag*/) {

+ if (parse_inf_nan(start, finish, output)) return true;

+ bool return_value = shr_using_base_class(output);

+

+ /* Some compilers and libraries successfully

+ * parse 'inf', 'INFINITY', '1.0E', '1.0E-'...

+ * We are trying to provide a unified behaviour,

+ * so we just forbid such conversions (as some

+ * of the most popular compilers/libraries do)

+ * */

+ CharT const plus = lcast_char_constants<CharT>::plus;

+ CharT const capital_e = lcast_char_constants<CharT>::capital_e;

+ CharT const lowercase_e = lcast_char_constants<CharT>::lowercase_e;

+ if ( return_value &&

+ (

+ Traits::eq(*(finish-1), lowercase_e) // 1.0e

+ || Traits::eq(*(finish-1), capital_e) // 1.0E

+ || Traits::eq(*(finish-1), minus) // 1.0e- or 1.0E-

+ || Traits::eq(*(finish-1), plus) // 1.0e+ or 1.0E+

+ )

+ ) return false;

+

+ return return_value;

+

+ // Optimised converter

+ bool float_types_converter_internal(double& output,char /*tag*/) {

+ return lcast_ret_float<Traits>(output,start,finish);

+ }

+ public:

+

+ bool operator>>(double& output)

+ {

+ /*

+ * Some compilers implement long double as double. In that case these types have

+ * same size, same precision, same max and min values... And it means,

+ * that current implementation of lcast_ret_float cannot be used for type

+ * double, because it will give a big precision loss.

+ * */

+ boost::mpl::if_c<

+#if defined(BOOST_HAS_LONG_LONG) || defined(BOOST_HAS_MS_INT64)

+ ::boost::type_traits::ice_eq< sizeof(double), sizeof(long double) >::value,

+#else

+ 0

+ int,

+ char

+ >::type tag = 0;

+ return float_types_converter_internal(output, tag);

+ }

+ bool operator>>(long double& output)

+ {

+ int tag = 0;

+ return float_types_converter_internal(output, tag);

+ }

+ // Generic istream-based algorithm.

+ // lcast_streambuf_for_target<InputStreamable>::value is true.

+ template<typename InputStreamable>

+ bool operator>>(InputStreamable& output) { return shr_using_base_class(output); }

+ };

+ }

+ namespace detail

+ {

+ template<class T>

+ struct array_to_pointer_decay

+ typedef T type;

+ };

+ template<class T, std::size_t N>

+ struct array_to_pointer_decay<T[N]>

+ typedef const T * type;

+ };

+ template<typename T>

+ struct is_stdstring

+ BOOST_STATIC_CONSTANT(bool, value = false );

+ };

+ template<typename CharT, typename Traits, typename Alloc>

+ struct is_stdstring< std::basic_string<CharT, Traits, Alloc> >

+ BOOST_STATIC_CONSTANT(bool, value = true );

+ };

+ template<typename CharT, typename Traits, typename Alloc>

+ struct is_stdstring< ::boost::container::basic_string<CharT, Traits, Alloc> >

+ BOOST_STATIC_CONSTANT(bool, value = true );

+ };

+ template<typename Target, typename Source>

+ struct is_arithmetic_and_not_xchars

+ {

+ BOOST_STATIC_CONSTANT(bool, value =

+ (

+ ::boost::type_traits::ice_and<

+ ::boost::is_arithmetic<Source>::value,

+ ::boost::is_arithmetic<Target>::value,

+ ::boost::type_traits::ice_not<

+ detail::is_char_or_wchar<Target>::value

+ >::value,

+ ::boost::type_traits::ice_not<

+ detail::is_char_or_wchar<Source>::value

+ >::value

+ >::value

+ )

+ );

+ };

+ /*

+ * is_xchar_to_xchar<Target, Source>::value is true, when

+ * Target and Souce are the same char types, or when

+ * Target and Souce are char types of the same size.

+ */

+ template<typename Target, typename Source>

+ struct is_xchar_to_xchar

+ {

+ BOOST_STATIC_CONSTANT(bool, value =

+ (

+ ::boost::type_traits::ice_or<

+ ::boost::type_traits::ice_and<

+ is_same<Source,Target>::value,

+ is_char_or_wchar<Target>::value

+ >::value,

+ ::boost::type_traits::ice_and<

+ ::boost::type_traits::ice_eq< sizeof(char),sizeof(Target)>::value,

+ ::boost::type_traits::ice_eq< sizeof(char),sizeof(Source)>::value,

+ is_char_or_wchar<Target>::value,

+ is_char_or_wchar<Source>::value

+ >::value

+ >::value

+ )

+ );

+ };

+

+ // this metafunction evaluates to true, if we have optimized comnversion

+ // from Float type to Char array.

+ // Must be in sync with lexical_stream_limited_src<Char, ...>::shl_real_type(...)

+ template <typename Float, typename Char>

+ struct is_this_float_conversion_optimized

+ typedef ::boost::type_traits::ice_and<

+ ::boost::is_float<Float>::value,

+#if !defined(BOOST_LCAST_NO_WCHAR_T) && !defined(BOOST_NO_SWPRINTF) && !defined(__MINGW32__)

+ ::boost::type_traits::ice_or<

+ ::boost::type_traits::ice_eq<sizeof(Char), sizeof(char) >::value,

+ ::boost::is_same<Char, wchar_t>::value

+ >::value

+#else

+ ::boost::type_traits::ice_eq<sizeof(Char), sizeof(char) >::value

+ > result_type;

+ BOOST_STATIC_CONSTANT(bool, value = (result_type::value) );

+ template<typename Target, typename Source>

+ struct is_char_array_to_stdstring

+ BOOST_STATIC_CONSTANT(bool, value = false );

+

+ template<typename CharT, typename Traits, typename Alloc>

+ struct is_char_array_to_stdstring< std::basic_string<CharT, Traits, Alloc>, CharT* >

+ BOOST_STATIC_CONSTANT(bool, value = true );

+

+ template<typename CharT, typename Traits, typename Alloc>

+ struct is_char_array_to_stdstring< std::basic_string<CharT, Traits, Alloc>, const CharT* >

+ BOOST_STATIC_CONSTANT(bool, value = true );

+ template<typename CharT, typename Traits, typename Alloc>

+ struct is_char_array_to_stdstring< ::boost::container::basic_string<CharT, Traits, Alloc>, CharT* >

+ BOOST_STATIC_CONSTANT(bool, value = true );

+ template<typename CharT, typename Traits, typename Alloc>

+ struct is_char_array_to_stdstring< ::boost::container::basic_string<CharT, Traits, Alloc>, const CharT* >

+ BOOST_STATIC_CONSTANT(bool, value = true );

+#if (defined _MSC_VER)

+# pragma warning( push )

+# pragma warning( disable : 4701 ) // possible use of ... before initialization

+# pragma warning( disable : 4702 ) // unreachable code

+# pragma warning( disable : 4267 ) // conversion from 'size_t' to 'unsigned int'

+#endif

+ template<typename Target, typename Source>

+ struct lexical_cast_do_cast

+ static inline Target lexical_cast_impl(const Source& arg)

+ {

+ typedef BOOST_DEDUCED_TYPENAME detail::array_to_pointer_decay<Source>::type src;

+ typedef BOOST_DEDUCED_TYPENAME ::boost::remove_cv<src>::type no_cv_src;

+ typedef BOOST_DEDUCED_TYPENAME detail::stream_char<Target>::type target_char_t;

+ typedef BOOST_DEDUCED_TYPENAME detail::stream_char<no_cv_src>::type src_char_type;

+ typedef BOOST_DEDUCED_TYPENAME detail::widest_char<

+ target_char_t, src_char_type

+ >::type char_type;

+

+#if !defined(BOOST_NO_CHAR16_T) && defined(BOOST_NO_UNICODE_LITERALS)

+ BOOST_STATIC_ASSERT_MSG(( !::boost::is_same<char16_t, src_char_type>::value

+ && !::boost::is_same<char16_t, target_char_t>::value),

+ "Your compiler does not have full support for char16_t" );

+#endif

+#if !defined(BOOST_NO_CHAR32_T) && defined(BOOST_NO_UNICODE_LITERALS)

+ BOOST_STATIC_ASSERT_MSG(( !::boost::is_same<char32_t, src_char_type>::value

+ && !::boost::is_same<char32_t, target_char_t>::value),

+ "Your compiler does not have full support for char32_t" );

+#endif

+

+ typedef BOOST_DEDUCED_TYPENAME ::boost::detail::deduce_char_traits<

+ char_type, Target, no_cv_src

+ >::type traits;

+

+ typedef ::boost::type_traits::ice_and<

+ ::boost::detail::is_char_or_wchar<src_char_type>::value, // source is lexical type

+ ::boost::detail::is_char_or_wchar<target_char_t>::value, // target is a lexical type

+ ::boost::is_same<char, src_char_type>::value, // source is not a wide character based type

+ ::boost::type_traits::ice_ne<sizeof(char), sizeof(target_char_t) >::value // target type is based on wide character

+ > is_string_widening_required_t;

+

+ typedef ::boost::type_traits::ice_or<

+ ::boost::is_integral<no_cv_src>::value,

+ ::boost::detail::is_this_float_conversion_optimized<no_cv_src, char_type >::value,

+ ::boost::detail::is_char_or_wchar<src_char_type >::value

+ > is_source_input_optimized_t;

+

+ // Target type must be default constructible

+ Target result;

+

+ // If we have an optimized conversion for

+ // Source, we do not need to construct stringbuf.

+ const bool requires_stringbuf = ::boost::type_traits::ice_or<

+ is_string_widening_required_t::value,

+ ::boost::type_traits::ice_not< is_source_input_optimized_t::value >::value

+ >::value;

+

+ typedef detail::lexical_stream_limited_src<char_type, traits, requires_stringbuf > interpreter_type;

+

+ typedef detail::lcast_src_length<no_cv_src> lcast_src_length;

+ std::size_t const src_len = lcast_src_length::value;

+ char_type buf[src_len + 1];

+ lcast_src_length::check_coverage();

+

+ interpreter_type interpreter(buf, buf + src_len);

+

+ // Disabling ADL, by directly specifying operators.

+ if(!(interpreter.operator <<(arg) && interpreter.operator >>(result)))

+ BOOST_LCAST_THROW_BAD_CAST(Source, Target);

+

+ return result;

+ }

+#if (defined _MSC_VER)

+# pragma warning( pop )

+ template <typename Source>

+ struct lexical_cast_copy

+ static inline const Source& lexical_cast_impl(const Source &arg) BOOST_NOEXCEPT

+ {

+ return arg;

+ }

+ template <class Source, class Target >

+ struct detect_precision_loss

+ typedef boost::numeric::Trunc<Source> Rounder;

+ typedef Source source_type ;

+

+ typedef BOOST_DEDUCED_TYPENAME mpl::if_<

+ ::boost::is_arithmetic<Source>, Source, Source const&

+ >::type argument_type ;

+

+ static source_type nearbyint ( argument_type s )

+ {

+ const source_type orig_div_round = s / Rounder::nearbyint(s);

+ const source_type eps = std::numeric_limits<source_type>::epsilon();

+

+ if ((orig_div_round > 1 ? orig_div_round - 1 : 1 - orig_div_round) > eps)

+ BOOST_LCAST_THROW_BAD_CAST(Source, Target);

+

+ return s ;

+ }

+

+ typedef typename Rounder::round_style round_style;

+ } ;

+

+ template <class Source, class Target >

+ struct nothrow_overflow_handler

+ {

+ void operator() ( boost::numeric::range_check_result r )

+ {

+ if (r != boost::numeric::cInRange)

+ BOOST_LCAST_THROW_BAD_CAST(Source, Target);

+ }

+ } ;

+

+ template <typename Target, typename Source>

+ struct lexical_cast_dynamic_num_not_ignoring_minus

+ static inline Target lexical_cast_impl(const Source &arg)

+ {

+ return boost::numeric::converter<

+ Target,

+ Source,

+ boost::numeric::conversion_traits<Target,Source>,

+ nothrow_overflow_handler<Source, Target>,

+ detect_precision_loss<Source, Target>

+ >::convert(arg);

+ }

+ template <typename Target, typename Source>

+ struct lexical_cast_dynamic_num_ignoring_minus

+ static inline Target lexical_cast_impl(const Source &arg)

+ {

+ typedef boost::numeric::converter<

+ Target,

+ Source,

+ boost::numeric::conversion_traits<Target,Source>,

+ nothrow_overflow_handler<Source, Target>,

+ detect_precision_loss<Source, Target>

+ > converter_t;

+

+ return (

+ arg < 0 ? -converter_t::convert(-arg) : converter_t::convert(arg)

+ );

+ }

+

+ /*

+ * lexical_cast_dynamic_num follows the rules:

+ * 1) If Source can be converted to Target without precision loss and

+ * without overflows, then assign Source to Target and return

+ *

+ * 2) If Source is less than 0 and Target is an unsigned integer,

+ * then negate Source, check the requirements of rule 1) and if

+ * successful, assign static_casted Source to Target and return

+ *

+ * 3) Otherwise throw a bad_lexical_cast exception

+ *

+ *

+ * Rule 2) required because boost::lexical_cast has the behavior of

+ * stringstream, which uses the rules of scanf for conversions. And

+ * in the C99 standard for unsigned input value minus sign is

+ * optional, so if a negative number is read, no errors will arise

+ * and the result will be the two's complement.

+ */

+ template <typename Target, typename Source>

+ struct lexical_cast_dynamic_num

+ {

+ static inline Target lexical_cast_impl(const Source &arg)

+ {

+ typedef BOOST_DEDUCED_TYPENAME ::boost::mpl::if_c<

+ ::boost::type_traits::ice_and<

+ ::boost::type_traits::ice_or<

+ ::boost::is_signed<Source>::value,

+ ::boost::is_float<Source>::value

+ >::value,

+ ::boost::type_traits::ice_not<

+ ::boost::is_same<Source, bool>::value

+ >::value,

+ ::boost::type_traits::ice_not<

+ ::boost::is_same<Target, bool>::value

+ >::value,

+ ::boost::is_unsigned<Target>::value

+ >::value,

+ lexical_cast_dynamic_num_ignoring_minus<Target, Source>,

+ lexical_cast_dynamic_num_not_ignoring_minus<Target, Source>

+ >::type caster_type;

+

+ return caster_type::lexical_cast_impl(arg);

+ }

+ };

+ }

+

+ template <typename Target, typename Source>

+ inline Target lexical_cast(const Source &arg)

+ {

+ typedef BOOST_DEDUCED_TYPENAME ::boost::detail::array_to_pointer_decay<Source>::type src;

+

+ typedef BOOST_DEDUCED_TYPENAME ::boost::type_traits::ice_or<

+ ::boost::detail::is_xchar_to_xchar<Target, src >::value,

+ ::boost::detail::is_char_array_to_stdstring<Target, src >::value,

+ ::boost::type_traits::ice_and<

+ ::boost::is_same<Target, src >::value,

+ ::boost::detail::is_stdstring<Target >::value

+ >::value

+ > shall_we_copy_t;

+

+ typedef BOOST_DEDUCED_TYPENAME

+ ::boost::detail::is_arithmetic_and_not_xchars<Target, src > shall_we_copy_with_dynamic_check_t;

+

+ typedef BOOST_DEDUCED_TYPENAME ::boost::mpl::if_c<

+ shall_we_copy_t::value,

+ ::boost::detail::lexical_cast_copy<src >,

+ BOOST_DEDUCED_TYPENAME ::boost::mpl::if_c<

+ shall_we_copy_with_dynamic_check_t::value,

+ ::boost::detail::lexical_cast_dynamic_num<Target, src >,

+ ::boost::detail::lexical_cast_do_cast<Target, src >

+ >::type

+ >::type caster_type;

+

+ return caster_type::lexical_cast_impl(arg);

+ }

+

+ template <typename Target>

+ inline Target lexical_cast(const char* chars, std::size_t count)

+ {

+ return ::boost::lexical_cast<Target>(

+ ::boost::iterator_range<const char*>(chars, chars + count)

+ );

+ }

+

+

+ template <typename Target>

+ inline Target lexical_cast(const unsigned char* chars, std::size_t count)

+ {

+ return ::boost::lexical_cast<Target>(

+ ::boost::iterator_range<const unsigned char*>(chars, chars + count)

+ );

+ }

+

+ template <typename Target>

+ inline Target lexical_cast(const signed char* chars, std::size_t count)

+ {

+ return ::boost::lexical_cast<Target>(

+ ::boost::iterator_range<const signed char*>(chars, chars + count)

+ );

+ }

+

+#ifndef BOOST_LCAST_NO_WCHAR_T

+ template <typename Target>

+ inline Target lexical_cast(const wchar_t* chars, std::size_t count)

+ {

+ return ::boost::lexical_cast<Target>(

+ ::boost::iterator_range<const wchar_t*>(chars, chars + count)

+ );

+ }

+#ifndef BOOST_NO_CHAR16_T

+ template <typename Target>

+ inline Target lexical_cast(const char16_t* chars, std::size_t count)

+ {

+ return ::boost::lexical_cast<Target>(

+ ::boost::iterator_range<const char16_t*>(chars, chars + count)

+ );

+ }

+#ifndef BOOST_NO_CHAR32_T

+ template <typename Target>

+ inline Target lexical_cast(const char32_t* chars, std::size_t count)

+ {

+ return ::boost::lexical_cast<Target>(

+ ::boost::iterator_range<const char32_t*>(chars, chars + count)

+ );

+#endif

+} // namespace boost

+#else // #ifndef BOOST_NO_TEMPLATE_PARTIAL_SPECIALIZATION

+namespace boost {

+

+ // selectors for choosing stream character type

+ template<typename Type>

+ struct stream_char

+ typedef char type;

+#ifndef BOOST_LCAST_NO_WCHAR_T

+#ifndef BOOST_NO_INTRINSIC_WCHAR_T

+ template<>

+ struct stream_char<wchar_t>

+ typedef wchar_t type;

+#endif

+ template<>

+ struct stream_char<wchar_t *>

+ {

+ typedef wchar_t type;

+ };

+

+ template<>

+ struct stream_char<const wchar_t *>

+ {

+ typedef wchar_t type;

+ };

+

+ template<>

+ struct stream_char<std::wstring>

+ {

+ typedef wchar_t type;

+ };

+ // stream wrapper for handling lexical conversions

+ template<typename Target, typename Source, typename Traits>

+ class lexical_stream

+ private:

+ typedef typename widest_char<

+ typename stream_char<Target>::type,

+ typename stream_char<Source>::type>::type char_type;

+ typedef Traits traits_type;

+ public:

+ lexical_stream(char_type* = 0, char_type* = 0)

+ {

+ stream.unsetf(std::ios::skipws);

+ lcast_set_precision(stream, static_cast<Source*>(0), static_cast<Target*>(0) );

+ }

+ ~lexical_stream()

+ {

+ #if defined(BOOST_NO_STRINGSTREAM)

+ stream.freeze(false);

+ #endif

+ }

+ bool operator<<(const Source &input)

+ {

+ return !(stream << input).fail();

+ }

+ template<typename InputStreamable>

+ bool operator>>(InputStreamable &output)

+ {

+ return !is_pointer<InputStreamable>::value &&

+ stream >> output &&

+ stream.get() ==

+#if defined(__GNUC__) && (__GNUC__<3) && defined(BOOST_NO_STD_WSTRING)

+// GCC 2.9x lacks std::char_traits<>::eof().

+// We use BOOST_NO_STD_WSTRING to filter out STLport and libstdc++-v3

+// configurations, which do provide std::char_traits<>::eof().

+ EOF;

+#else

+ traits_type::eof();

+ }

+ bool operator>>(std::string &output)

+ {

+ #if defined(BOOST_NO_STRINGSTREAM)

+ stream << '\0';

+ #endif

+ stream.str().swap(output);

+ return true;

+ }

+ #ifndef BOOST_LCAST_NO_WCHAR_T

+ bool operator>>(std::wstring &output)

+ {

+ stream.str().swap(output);

+ return true;

+ }

+ #endif

+ private:

+ #if defined(BOOST_NO_STRINGSTREAM)

+ std::strstream stream;

+ #elif defined(BOOST_NO_STD_LOCALE)

+ std::stringstream stream;

+ #else

+ std::basic_stringstream<char_type,traits_type> stream;

+ #endif

+ };

+ }

+ BOOST_LCAST_THROW_BAD_CAST(Source, Target);

+} // namespace boost

+

+#endif

+// Copyright Alexander Nasonov, 2006-2010.

+// Copyright Antony Polukhin, 2011-2012.

+#undef BOOST_LCAST_THROW_BAD_CAST

+

+#endif // BOOST_LEXICAL_CAST_INCLUDED

+