summaryrefslogtreecommitdiffstats
path: root/src/boost/libs/math/test/test_zeta_hooks.hpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/boost/libs/math/test/test_zeta_hooks.hpp')
-rw-r--r--src/boost/libs/math/test/test_zeta_hooks.hpp56
1 files changed, 56 insertions, 0 deletions
diff --git a/src/boost/libs/math/test/test_zeta_hooks.hpp b/src/boost/libs/math/test/test_zeta_hooks.hpp
new file mode 100644
index 00000000..087d87d3
--- /dev/null
+++ b/src/boost/libs/math/test/test_zeta_hooks.hpp
@@ -0,0 +1,56 @@
+// (C) Copyright John Maddock 2006.
+// Use, modification and distribution are subject to 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_MATH_TEST_ZETA_OTHER_HOOKS_HPP
+#define BOOST_MATH_TEST_ZETA_OTHER_HOOKS_HPP
+
+
+#ifdef TEST_CEPHES
+namespace other{
+extern "C" {
+ double zetac(double);
+ float zetacf(float);
+ long double zetacl(long double);
+}
+inline float zeta(float a)
+{ return 1 + zetac(a); }
+inline double zeta(double a)
+{ return 1 + zetac(a); }
+inline long double zeta(long double a)
+{
+#ifdef BOOST_MSVC
+ return 1 + zetac((double)a);
+#else
+ return zetacl(a);
+#endif
+}
+}
+#define TEST_OTHER
+#endif
+
+#ifdef TEST_GSL
+#include <gsl/gsl_sf_zeta.h>
+
+namespace other{
+inline float zeta(float a)
+{ return (float)gsl_sf_zeta(a); }
+inline double zeta(double a)
+{ return gsl_sf_zeta(a); }
+inline long double zeta(long double a)
+{ return gsl_sf_zeta(a); }
+}
+#define TEST_OTHER
+#endif
+
+#ifdef TEST_OTHER
+namespace other{
+ boost::math::concepts::real_concept zeta(boost::math::concepts::real_concept){ return 0; }
+}
+#endif
+
+
+#endif
+
+