mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 04:50:34 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			240 lines
		
	
	
		
			7.5 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			240 lines
		
	
	
		
			7.5 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
| // Copyright (c) 2006 Johan Rade
 | |
| // Copyright (c) 2011 Paul A. Bristow - filename changes for boost-trunk.
 | |
| 
 | |
| // 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 : 4511 4512 4702)
 | |
| //#endif
 | |
| 
 | |
| #define BOOST_TEST_MAIN
 | |
| 
 | |
| #include <limits>
 | |
| #include <locale>
 | |
| #include <sstream>
 | |
| 
 | |
| #include <boost/archive/text_iarchive.hpp>
 | |
| #include <boost/archive/text_oarchive.hpp>
 | |
| #include <boost/archive/text_wiarchive.hpp>
 | |
| #include <boost/archive/text_woarchive.hpp>
 | |
| #include <boost/archive/codecvt_null.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"
 | |
| 
 | |
| namespace {
 | |
| 
 | |
| // The anonymous namespace resolves ambiguities on platforms
 | |
| // with fpclassify etc functions at global scope.
 | |
| 
 | |
| using namespace boost::archive;
 | |
| 
 | |
| using namespace boost::math;
 | |
| using boost::math::signbit;
 | |
| using boost::math::changesign;
 | |
| using (boost::math::isnan)(;
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| void archive_basic_test();
 | |
| void archive_put_trap_test();
 | |
| void archive_get_trap_test();
 | |
| 
 | |
| BOOST_AUTO_TEST_CASE(archive_test)
 | |
| {
 | |
|     archive_basic_test();
 | |
|     archive_put_trap_test();
 | |
|     archive_get_trap_test();
 | |
| }
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| template<class CharType, class OArchiveType, class IArchiveType, class ValType>
 | |
| void archive_basic_test_impl();
 | |
| 
 | |
| void archive_basic_test()
 | |
| {
 | |
|     archive_basic_test_impl<char, text_oarchive, text_iarchive, float>();
 | |
|     archive_basic_test_impl<char, text_oarchive, text_iarchive, double>();
 | |
|     archive_basic_test_impl<
 | |
|         char, text_oarchive, text_iarchive, long double>();
 | |
|     archive_basic_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, float>();
 | |
|     archive_basic_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, double>();
 | |
|     archive_basic_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, long double>();
 | |
| }
 | |
| 
 | |
| template<class CharType, class OArchiveType, class IArchiveType, class ValType>
 | |
| void archive_basic_test_impl()
 | |
| {
 | |
|     if((std::numeric_limits<ValType>::has_infinity == 0) || (std::numeric_limits<ValType>::infinity() == 0))
 | |
|       return;
 | |
|     std::locale default_locale(std::locale::classic(),
 | |
|         new boost::archive::codecvt_null<CharType>);
 | |
|     std::locale tmp_locale(default_locale, new nonfinite_num_put<CharType>);
 | |
|     std::locale my_locale(tmp_locale, new nonfinite_num_get<CharType>);
 | |
| 
 | |
|     std::basic_stringstream<CharType> ss;
 | |
|     ss.imbue(my_locale);
 | |
| 
 | |
|     ValType a1 = static_cast<ValType>(0);
 | |
|     ValType a2 = static_cast<ValType>(2307.35);
 | |
|     ValType a3 = std::numeric_limits<ValType>::infinity();
 | |
|     BOOST_CHECK((boost::math::isinf)(a3));
 | |
|     ValType a4 = std::numeric_limits<ValType>::quiet_NaN();
 | |
|     BOOST_CHECK(((boost::math::isnan)()(a4));
 | |
|     ValType a5 = std::numeric_limits<ValType>::signaling_NaN();
 | |
|     BOOST_CHECK(((boost::math::isnan)()(a5));
 | |
|     ValType a6 = (changesign)(static_cast<ValType>(0));
 | |
|     ValType a7 = static_cast<ValType>(-57.13);
 | |
|     ValType a8 = -std::numeric_limits<ValType>::infinity();
 | |
|     BOOST_CHECK((boost::math::isinf)(a8));
 | |
|     ValType a9 = -std::numeric_limits<ValType>::quiet_NaN();
 | |
|     BOOST_CHECK(((boost::math::isnan)()(a9));
 | |
|     ValType a10 = -std::numeric_limits<ValType>::signaling_NaN();
 | |
|     BOOST_CHECK(((boost::math::isnan)()(a10));
 | |
| 
 | |
|     {
 | |
|         OArchiveType oa(ss, no_codecvt);
 | |
|         oa & a1 & a2 & a3 & a4 & a5 & a6 & a7 & a8 & a9 & a10;
 | |
|     }
 | |
| 
 | |
|     ValType b1, b2, b3, b4, b5, b6, b7, b8, b9, b10;
 | |
| 
 | |
|     {
 | |
|         IArchiveType ia(ss, no_codecvt);
 | |
|         ia & b1 & b2 & b3 & b4 & b5 & b6 & b7 & b8 & b9 & b10;
 | |
|     }
 | |
| 
 | |
|     BOOST_CHECK(a1 == b1);
 | |
|     BOOST_CHECK(almost_equal(a2, b2));
 | |
|     BOOST_CHECK(a3 == b3);
 | |
|     BOOST_CHECK((isnan)(b4));
 | |
|     BOOST_CHECK(!(signbit)(b4));
 | |
|     BOOST_CHECK((isnan)(b5));
 | |
|     BOOST_CHECK(!(signbit)(b5));
 | |
|     BOOST_CHECK(a6 == b6);
 | |
|     BOOST_CHECK(almost_equal(a7, b7));
 | |
|     BOOST_CHECK(a8 == b8);
 | |
|     BOOST_CHECK((isnan)(b9));
 | |
|     BOOST_CHECK((signbit)(b9));
 | |
|     BOOST_CHECK((isnan)(b10));
 | |
|     BOOST_CHECK((signbit)(b10));
 | |
| }
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| template<class CharType, class OArchiveType, class IArchiveType, class ValType>
 | |
| void archive_put_trap_test_impl();
 | |
| 
 | |
| void archive_put_trap_test()
 | |
| {
 | |
|     archive_put_trap_test_impl<char, text_oarchive, text_iarchive, float>();
 | |
|     archive_put_trap_test_impl<char, text_oarchive, text_iarchive, double>();
 | |
|     archive_put_trap_test_impl<
 | |
|         char, text_oarchive, text_iarchive, long double>();
 | |
|     archive_put_trap_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, float>();
 | |
|     archive_put_trap_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, double>();
 | |
|     archive_put_trap_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, long double>();
 | |
| }
 | |
| 
 | |
| template<class CharType, class OArchiveType, class IArchiveType, class ValType>
 | |
| void archive_put_trap_test_impl()
 | |
| {
 | |
|     if((std::numeric_limits<ValType>::has_infinity == 0) || (std::numeric_limits<ValType>::infinity() == 0))
 | |
|       return;
 | |
| 
 | |
|     std::locale default_locale(std::locale::classic(),
 | |
|         new boost::archive::codecvt_null<CharType>);
 | |
|     std::locale new_locale(default_locale,
 | |
|         new nonfinite_num_put<CharType>(trap_infinity));
 | |
| 
 | |
|     std::basic_stringstream<CharType> ss;
 | |
|     ss.exceptions(std::ios_base::failbit | std::ios_base::badbit);
 | |
|     ss.imbue(new_locale);
 | |
| 
 | |
|     ValType a = std::numeric_limits<ValType>::infinity();
 | |
| 
 | |
|     OArchiveType oa(ss, no_codecvt);
 | |
| 
 | |
|     try {
 | |
|         oa & a;
 | |
|     }
 | |
|     catch(std::exception&) {
 | |
|     ss.clear();
 | |
|         return;
 | |
|     }
 | |
| 
 | |
|     BOOST_CHECK(false);
 | |
| }
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| template<class CharType, class OArchiveType, class IArchiveType, class ValType>
 | |
| void archive_get_trap_test_impl();
 | |
| 
 | |
| void archive_get_trap_test()
 | |
| {
 | |
|     archive_get_trap_test_impl<char, text_oarchive, text_iarchive, float>();
 | |
|     archive_get_trap_test_impl<char, text_oarchive, text_iarchive, double>();
 | |
|     archive_get_trap_test_impl<
 | |
|         char, text_oarchive, text_iarchive, long double>();
 | |
|     archive_get_trap_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, float>();
 | |
|     archive_get_trap_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, double>();
 | |
|     archive_get_trap_test_impl<
 | |
|         wchar_t, text_woarchive, text_wiarchive, long double>();
 | |
| }
 | |
| 
 | |
| template<class CharType, class OArchiveType, class IArchiveType, class ValType>
 | |
| void archive_get_trap_test_impl()
 | |
| {
 | |
|     if((std::numeric_limits<ValType>::has_infinity == 0) || (std::numeric_limits<ValType>::infinity() == 0))
 | |
|      return;
 | |
| 
 | |
|     std::locale default_locale(std::locale::classic(),
 | |
|         new boost::archive::codecvt_null<CharType>);
 | |
|     std::locale tmp_locale(default_locale, new nonfinite_num_put<CharType>);
 | |
|     std::locale my_locale(tmp_locale,
 | |
|         new nonfinite_num_get<CharType>(trap_nan));
 | |
| 
 | |
|     std::basic_stringstream<CharType> ss;
 | |
|     ss.exceptions(std::ios_base::failbit);
 | |
|     ss.imbue(my_locale);
 | |
| 
 | |
|     ValType a = -std::numeric_limits<ValType>::quiet_NaN();
 | |
| 
 | |
|     {
 | |
|         OArchiveType oa(ss, no_codecvt);
 | |
|         oa & a;
 | |
|     }
 | |
| 
 | |
|     ValType b;
 | |
|     {
 | |
|         IArchiveType ia(ss, no_codecvt);
 | |
|         try {
 | |
|             ia & b;
 | |
|         }
 | |
|         catch(std::exception&) {
 | |
|             return;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     BOOST_CHECK(false);
 | |
| }
 | |
| 
 | |
| //------------------------------------------------------------------------------
 | |
| 
 | |
| }   // anonymous namespace
 |