Apply patches for issues #7429, #7891 and #7907.

Refs #7907.
Fixes #7429.
Fixes #7891.

[SVN r82579]

include/boost/math/constants/constants.hpp

@@ -183,7 +183,7 @@ namespace boost{ namespace math
    { return x; }\
    static inline BOOST_CONSTEXPR T get(const mpl::int_<construct_from_long_double>&)\
    { return BOOST_JOIN(x, L); }\
-   template <int N> static inline T get(const mpl::int_<N>& n)\
+   template <int N> static inline T get(const mpl::int_<N>&)\
    {\
       constant_initializer2<T, N, & BOOST_JOIN(constant_, name)<T>::template compute<N> >::force_instantiate();\
       return compute<N>(); \

include/boost/math/distributions/detail/hypergeometric_pdf.hpp

@@ -392,7 +392,7 @@ template <class T, class Policy>
 T hypergeometric_pdf_factorial_imp(unsigned x, unsigned r, unsigned n, unsigned N, const Policy&)
 {
    BOOST_MATH_STD_USING
-   BOOST_ASSERT(N < boost::math::max_factorial<T>::value);
+   BOOST_ASSERT(N <= boost::math::max_factorial<T>::value);
    T result = boost::math::unchecked_factorial<T>(n);
    T num[3] = {
       boost::math::unchecked_factorial<T>(r),

include/boost/math/policies/error_handling.hpp

@@ -12,7 +12,7 @@
 #include <iomanip>
 #include <string>
 #include <cerrno>
-#include <complex>
+#include <boost/config/no_tr1/complex.hpp>
 #include <boost/config/no_tr1/cmath.hpp>
 #include <stdexcept>
 #include <boost/math/tools/config.hpp>

include/boost/math/tools/detail/polynomial_horner1_10.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_11.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_12.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_13.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_14.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_15.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_16.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_17.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_18.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_19.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_2.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_20.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_3.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_4.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_5.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_6.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_7.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_8.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner1_9.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_10.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_11.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_12.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_13.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_14.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_15.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_16.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_17.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_18.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_19.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_2.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_20.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_3.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_4.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_5.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_6.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_7.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_8.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner2_9.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_10.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_11.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_12.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_13.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_14.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_15.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_16.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_17.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_18.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_19.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_2.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_20.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_3.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_4.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_5.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_6.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_7.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_8.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/polynomial_horner3_9.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class V>
-inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)
+inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_10.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_11.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_12.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_13.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_14.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_15.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_16.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_17.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_18.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_19.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_2.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_20.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_3.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_4.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_5.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_6.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_7.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_8.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner2_9.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_10.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_11.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_12.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_13.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_14.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_15.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_16.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_17.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_18.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_19.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_2.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_20.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_3.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_4.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_5.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_6.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_7.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_8.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

include/boost/math/tools/detail/rational_horner3_9.hpp

@@ -12,7 +12,7 @@
 namespace boost{ namespace math{ namespace tools{ namespace detail{
 
 template <class T, class U, class V>
-inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)
+inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)
 {
    return static_cast<V>(0);
 }

test/test_hypergeometric_dist.cpp

@@ -460,6 +460,7 @@ void test_spots(RealType /*T*/, const char* type_name)
    test_spot(1, 13, 4, 26, static_cast<T>(0.248695652173913), static_cast<T>(0.296521739130435), static_cast<T>(1 - 0.296521739130435), tolerance);
    test_spot(2, 13, 4, 26, static_cast<T>(0.40695652173913), static_cast<T>(0.703478260869565), static_cast<T>(1 - 0.703478260869565), tolerance);
    test_spot(3, 13, 4, 26, static_cast<T>(0.248695652173913), static_cast<T>(0.952173913043478), static_cast<T>(1 - 0.952173913043478), tolerance);
+   test_spot(40, 70, 89, 170, static_cast<T>(0.0721901023798991), static_cast<T>(0.885447799131944), static_cast<T>(1 - 0.885447799131944), tolerance);
 
    boost::math::hypergeometric_distribution<RealType> d(50, 200, 500);
    BOOST_CHECK_EQUAL(range(d).first, 0u);

tools/generate_rational_code.cpp

@@ -40,7 +40,7 @@ void print_polynomials(int max_order)
          "#define BOOST_MATH_TOOLS_POLY_EVAL_" << i << "_HPP\n\n"
          "namespace boost{ namespace math{ namespace tools{ namespace detail{\n\n"
          "template <class T, class V>\n"
-         "inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)\n"
+         "inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)\n"
          "{\n"
          "   return static_cast<V>(0);\n"
          "}\n"
@@ -90,7 +90,7 @@ void print_polynomials(int max_order)
          "#define BOOST_MATH_TOOLS_POLY_EVAL_" << i << "_HPP\n\n"
          "namespace boost{ namespace math{ namespace tools{ namespace detail{\n\n"
          "template <class T, class V>\n"
-         "inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)\n"
+         "inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)\n"
          "{\n"
          "   return static_cast<V>(0);\n"
          "}\n"
@@ -186,7 +186,7 @@ void print_polynomials(int max_order)
          "#define BOOST_MATH_TOOLS_POLY_EVAL_" << i << "_HPP\n\n"
          "namespace boost{ namespace math{ namespace tools{ namespace detail{\n\n"
          "template <class T, class V>\n"
-         "inline V evaluate_polynomial_c_imp(const T* a, const V&, const mpl::int_<0>*)\n"
+         "inline V evaluate_polynomial_c_imp(const T*, const V&, const mpl::int_<0>*)\n"
          "{\n"
          "   return static_cast<V>(0);\n"
          "}\n"
@@ -361,7 +361,7 @@ void print_rationals(int max_order)
          "#define BOOST_MATH_TOOLS_RAT_EVAL_" << i << "_HPP\n\n"
          "namespace boost{ namespace math{ namespace tools{ namespace detail{\n\n"
          "template <class T, class U, class V>\n"
-         "inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)\n"
+         "inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)\n"
          "{\n"
          "   return static_cast<V>(0);\n"
          "}\n"
@@ -577,7 +577,7 @@ void print_rationals(int max_order)
          "#define BOOST_MATH_TOOLS_RAT_EVAL_" << i << "_HPP\n\n"
          "namespace boost{ namespace math{ namespace tools{ namespace detail{\n\n"
          "template <class T, class U, class V>\n"
-         "inline V evaluate_rational_c_imp(const T* a, const U* b, const V&, const mpl::int_<0>*)\n"
+         "inline V evaluate_rational_c_imp(const T*, const U*, const V&, const mpl::int_<0>*)\n"
          "{\n"
          "   return static_cast<V>(0);\n"
          "}\n"