diff options
Diffstat (limited to 'src/boost/libs/qvm/test/test_qvm.hpp')
| -rw-r--r-- | src/boost/libs/qvm/test/test_qvm.hpp | 257 |
1 files changed, 257 insertions, 0 deletions
diff --git a/src/boost/libs/qvm/test/test_qvm.hpp b/src/boost/libs/qvm/test/test_qvm.hpp new file mode 100644 index 000000000..f9c000c0c --- /dev/null +++ b/src/boost/libs/qvm/test/test_qvm.hpp @@ -0,0 +1,257 @@ +//Copyright (c) 2008-2016 Emil Dotchevski and Reverge Studios, Inc. + +//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) + +#ifndef BOOST_QVM_06E5D36EB6C211DEA317E19C55D89593 +#define BOOST_QVM_06E5D36EB6C211DEA317E19C55D89593 + +#include <boost/test/tools/floating_point_comparison.hpp> +#include <boost/detail/lightweight_test.hpp> +#include <iostream> + +#define BOOST_QVM_TEST_EQ(expra,exprb) ( ::test_qvm::detail::test_eq_impl(#expra, #exprb, __FILE__, __LINE__, BOOST_CURRENT_FUNCTION, expra, exprb) ) +#define BOOST_QVM_TEST_NEQ(expra,exprb) ( ::test_qvm::detail::test_neq_impl(#expra, #exprb, __FILE__, __LINE__, BOOST_CURRENT_FUNCTION, expra, exprb) ) +#define BOOST_QVM_TEST_CLOSE(expra,exprb,exprt) ( ::test_qvm::detail::test_close_impl(#expra, #exprb, #exprt, __FILE__, __LINE__, BOOST_CURRENT_FUNCTION, expra, exprb, exprt) ) + +#define BOOST_QVM_TEST_EQ_QUAT(expra,exprb) ( ::test_qvm::detail::test_eq_q_impl(#expra, #exprb, __FILE__, __LINE__, BOOST_CURRENT_FUNCTION, expra, exprb) ) +#define BOOST_QVM_TEST_NEQ_QUAT(expra,exprb) ( ::test_qvm::detail::test_neq_q_impl(#expra, #exprb, __FILE__, __LINE__, BOOST_CURRENT_FUNCTION, expra, exprb) ) +#define BOOST_QVM_TEST_CLOSE_QUAT(expra,exprb,exprt) ( ::test_qvm::detail::test_close_q_impl(#expra, #exprb, #exprt, __FILE__, __LINE__, BOOST_CURRENT_FUNCTION, expra, exprb, exprt) ) + +namespace +test_qvm + { + namespace + detail + { + inline + bool + close_at_tolerance( float a, float b, float tolerance ) + { + return boost::math::fpc::close_at_tolerance<float>(tolerance,boost::math::fpc::FPC_STRONG)(a,b); + } + + inline + bool + close_at_tolerance( double a, double b, double tolerance ) + { + return boost::math::fpc::close_at_tolerance<double>(tolerance,boost::math::fpc::FPC_STRONG)(a,b); + } + + template <class A,class B> + void + dump_ab( A a, B b ) + { + std::cerr << a << '\t' << b << std::endl; + } + + template <class A,class B,int D> + void + dump_ab( A (&a)[D], B (&b)[D] ) + { + for( int i=0; i!=D; ++i ) + dump_ab(a[i],b[i]); + } + + template <class A,class B> + void + test_eq_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A a, B b ) + { + using namespace ::boost::qvm; + if( !(a==b) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_EQ(" << expra << ',' << exprb + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + } + } + + template <class A,class B,int M,int N> + void + test_eq_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A (&a)[M][N], B (&b)[M][N] ) + { + using namespace ::boost::qvm; + for( int i=0; i<M; ++i ) + for( int j=0; j<N; ++j ) + if( !(a[i][j]==b[i][j]) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_EQ(" << expra << ',' << exprb + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B,int D> + void + test_eq_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A (&a)[D], B (&b)[D] ) + { + using namespace ::boost::qvm; + for( int i=0; i<D; ++i ) + if( !(a[i]==b[i]) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_EQ" << expra << ',' << exprb + << ") failed in function " << function <<'\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B> + void + test_eq_q_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A (&a)[4], B (&b)[4] ) + { + using namespace ::boost::qvm; + int i; + for( i=0; i<4; ++i ) + if( !(a[i]==b[i]) ) + break; + if( i==4 ) + return; + for( i=0; i<4; ++i ) + if( !(a[i]==-b[i]) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_EQ" << expra << ',' << exprb + << ") failed in function " << function <<'\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B> + void + test_neq_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A a, B b ) + { + using namespace ::boost::qvm; + if( !(a!=b) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_NEQ(" << expra << ',' << exprb + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + } + } + + template <class A,class B,int M,int N> + void + test_neq_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A (&a)[M][N], B (&b)[M][N] ) + { + using namespace ::boost::qvm; + for( int i=0; i<M; ++i ) + for( int j=0; j<N; ++j ) + if( a[i][j]!=b[i][j] ) + return; + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_NEQ(" << expra << ',' << exprb + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + } + + template <class A,class B,int D> + void + test_neq_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A (&a)[D], B (&b)[D] ) + { + using namespace ::boost::qvm; + for( int i=0; i<D; ++i ) + if( a[i]!=b[i] ) + return; + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_NEQ(" << expra << ',' << exprb + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + } + + template <class A,class B> + void + test_neq_q_impl( char const * expra, char const * exprb, char const * file, int line, char const * function, A (&a)[4], B (&b)[4] ) + { + using namespace ::boost::qvm; + int i; + for( i=0; i<4; ++i ) + if( !(a[i]!=b[i]) ) + break; + if( i==4 ) + return; + for( i=0; i<4; ++i ) + if( !(a[i]!=-b[i]) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_EQ" << expra << ',' << exprb + << ") failed in function " << function <<'\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B,class T> + void + test_close_impl( char const * expra, char const * /*exprb*/, char const * /*exprt*/, char const * file, int line, char const * function, A a, B b, T t ) + { + if( !close_at_tolerance(a,b,t) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_CLOSE(" << expra << ',' << b << ',' << t + << ") failed in function " << function << '\n'; + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B,class T,int M,int N> + void + test_close_impl( char const * expra, char const * exprb, char const * exprt, char const * file, int line, char const * function, A (&a)[M][N], B (&b)[M][N], T t ) + { + for( int i=0; i<M; ++i ) + for( int j=0; j<N; ++j ) + if( !close_at_tolerance(a[i][j],b[i][j],t) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_CLOSE(" << expra << ',' << exprb << ',' << exprt + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B,class T,int D> + void + test_close_impl( char const * expra, char const * exprb, char const * exprt, char const * file, int line, char const * function, A (&a)[D], B (&b)[D], T t ) + { + for( int i=0; i<D; ++i ) + if( !close_at_tolerance(a[i],b[i],t) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_CLOSE(" << expra << ',' << exprb << ',' << exprt + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + + template <class A,class B,class T> + void + test_close_q_impl( char const * expra, char const * exprb, char const * exprt, char const * file, int line, char const * function, A (&a)[4], B (&b)[4], T t ) + { + int i; + for( i=0; i<4; ++i ) + if( !close_at_tolerance(a[i],b[i],t) ) + break; + if( i==4 ) + return; + for( i=0; i<4; ++i ) + if( !close_at_tolerance(a[i],-b[i],t) ) + { + std::cerr << file << "(" << line << "): BOOST_QVM_TEST_CLOSE_QUAT(" << expra << ',' << exprb << ',' << exprt + << ") failed in function " << function << '\n'; + dump_ab(a,b); + ++::boost::detail::test_errors(); + return; + } + } + } + } + +#endif |