mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 04:50:34 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			123 lines
		
	
	
		
			4.7 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			123 lines
		
	
	
		
			4.7 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
| 
 | |
| // Copyright (c) 2006 Johan Rade
 | |
| 
 | |
| // Copyright (c) 2011 Paul A. Bristow incorporated Boost.Math
 | |
| 
 | |
| // Distributed under the Boost Software License, Version 1.0.
 | |
| // (See accompanying file LICENSE_1_0.txt
 | |
| // or copy at http://www.boost.org/LICENSE_1_0.txt)
 | |
| 
 | |
| //#ifdef _MSC_VER
 | |
| //#   pragma warning(disable : 4127 4511 4512 4701 4702)
 | |
| //#endif
 | |
| 
 | |
| #define BOOST_TEST_MAIN
 | |
| 
 | |
| #include <limits>
 | |
| #include <locale>
 | |
| #include <string>
 | |
| #include <boost/lexical_cast.hpp>
 | |
| #include <boost/test/auto_unit_test.hpp>
 | |
| 
 | |
| #include <boost/math/special_functions/nonfinite_num_facets.hpp>
 | |
| #include <boost/math/special_functions/sign.hpp>
 | |
| #include <boost/math/special_functions/fpclassify.hpp>
 | |
| #include "almost_equal.ipp"
 | |
| #include "s_.ipp"
 | |
| 
 | |
| namespace {
 | |
| 
 | |
| // the anonymous namespace resolves ambiguities on platforms
 | |
| // with fpclassify etc functions at global scope
 | |
| 
 | |
| using boost::lexical_cast;
 | |
| 
 | |
| using namespace boost::math;
 | |
| using boost::math::signbit;
 | |
| using boost::math::changesign;
 | |
| using boost::math::isnan;
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| template<class CharType, class ValType> void lexical_cast_test_impl();
 | |
| 
 | |
| BOOST_AUTO_TEST_CASE(lexical_cast_test)
 | |
| {
 | |
|     lexical_cast_test_impl<char, float>();
 | |
|     lexical_cast_test_impl<char, double>();
 | |
|     lexical_cast_test_impl<char, long double>();
 | |
|     lexical_cast_test_impl<wchar_t, float>();
 | |
|     lexical_cast_test_impl<wchar_t, double>();
 | |
|     lexical_cast_test_impl<wchar_t, long double>();
 | |
| }
 | |
| 
 | |
| template<class CharType, class ValType> void lexical_cast_test_impl()
 | |
| {
 | |
|     if((std::numeric_limits<ValType>::has_infinity == 0) || (std::numeric_limits<ValType>::infinity() == 0))
 | |
|        return;
 | |
|     if((std::numeric_limits<ValType>::has_quiet_NaN == 0) || (std::numeric_limits<ValType>::quiet_NaN() == 0))
 | |
|        return;
 | |
| 
 | |
|     std::locale old_locale;
 | |
|     std::locale tmp_locale(old_locale,
 | |
|         new nonfinite_num_put<CharType>(signed_zero));
 | |
|     std::locale new_locale(tmp_locale, new nonfinite_num_get<CharType>);
 | |
|     std::locale::global(new_locale);
 | |
| 
 | |
|     ValType a1 = static_cast<ValType>(0);
 | |
|     ValType a2 = static_cast<ValType>(13);
 | |
|     ValType a3 = std::numeric_limits<ValType>::infinity();
 | |
|     ValType a4 = std::numeric_limits<ValType>::quiet_NaN();
 | |
|     ValType a5 = std::numeric_limits<ValType>::signaling_NaN();
 | |
|     ValType a6 = (changesign)(static_cast<ValType>(0));
 | |
|     ValType a7 = static_cast<ValType>(-57);
 | |
|     ValType a8 = -std::numeric_limits<ValType>::infinity();
 | |
|     ValType a9 = (changesign)(std::numeric_limits<ValType>::quiet_NaN()); // -NaN
 | |
|     ValType a10 = (changesign)(std::numeric_limits<ValType>::signaling_NaN()); // -NaN
 | |
| 
 | |
|     std::basic_string<CharType> s1 = S_("0");
 | |
|     std::basic_string<CharType> s2 = S_("13");
 | |
|     std::basic_string<CharType> s3 = S_("inf");
 | |
|     std::basic_string<CharType> s4 = S_("nan");
 | |
|     std::basic_string<CharType> s5 = S_("nan");
 | |
|     std::basic_string<CharType> s6 = S_("-0");
 | |
|     std::basic_string<CharType> s7 = S_("-57");
 | |
|     std::basic_string<CharType> s8 = S_("-inf");
 | |
|     std::basic_string<CharType> s9 = S_("-nan");
 | |
|     std::basic_string<CharType> s10 = S_("-nan");
 | |
| 
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a1) == s1);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a2) == s2);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a3) == s3);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a4) == s4);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a5) == s5);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a6) == s6);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a7) == s7);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a8) == s8);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a9) == s9);
 | |
|     BOOST_CHECK(lexical_cast<std::basic_string<CharType> >(a10) == s10);
 | |
| 
 | |
|     BOOST_CHECK(lexical_cast<ValType>(s1) == a1);
 | |
|     BOOST_CHECK(!(signbit)(lexical_cast<ValType>(s1)));
 | |
|     BOOST_CHECK(lexical_cast<ValType>(s2) == a2);
 | |
|     BOOST_CHECK(lexical_cast<ValType>(s3) == a3);
 | |
|     BOOST_CHECK((isnan)(lexical_cast<ValType>(s4)));
 | |
|     BOOST_CHECK(!(signbit)(lexical_cast<ValType>(s4)));
 | |
|     BOOST_CHECK((isnan)(lexical_cast<ValType>(s5)));
 | |
|     BOOST_CHECK(!(signbit)(lexical_cast<ValType>(s5)));
 | |
|     BOOST_CHECK(lexical_cast<ValType>(a6) == a6);
 | |
|     BOOST_CHECK((signbit)(lexical_cast<ValType>(s6)));
 | |
|     BOOST_CHECK(lexical_cast<ValType>(s7) == a7);
 | |
|     BOOST_CHECK(lexical_cast<ValType>(s8) == a8);
 | |
|     BOOST_CHECK((isnan)(lexical_cast<ValType>(s9)));
 | |
|     BOOST_CHECK((signbit)(lexical_cast<ValType>(s9)));
 | |
|     BOOST_CHECK((isnan)(lexical_cast<ValType>(s10)));
 | |
|     BOOST_CHECK((signbit)(lexical_cast<ValType>(s10)));
 | |
| 
 | |
|     std::locale::global(old_locale);
 | |
| }
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| }   // anonymous namespace
 |