1 //  Copyright (c) 2006-7 John Maddock
2 //  Use, modification and distribution are subject to the
3 //  Boost Software License, Version 1.0. (See accompanying file
4 //  LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
5 
6 #ifndef BOOST_MATH_TOOLS_CONFIG_HPP
7 #define BOOST_MATH_TOOLS_CONFIG_HPP
8 
9 #ifdef _MSC_VER
10 #pragma once
11 #endif
12 
13 #include <boost/config.hpp>
14 #include <boost/predef.h>
15 #include <boost/cstdint.hpp> // for boost::uintmax_t
16 #include <boost/detail/workaround.hpp>
17 #include <boost/type_traits/is_integral.hpp>
18 #include <algorithm>  // for min and max
19 #include <boost/config/no_tr1/cmath.hpp>
20 #include <climits>
21 #include <cfloat>
22 #if (defined(macintosh) || defined(__APPLE__) || defined(__APPLE_CC__))
23 #  include <math.h>
24 #endif
25 #ifndef BOOST_NO_LIMITS_COMPILE_TIME_CONSTANTS
26 #  include <limits>
27 #endif
28 
29 #include <boost/math/tools/user.hpp>
30 
31 #if (defined(__CYGWIN__) || defined(__FreeBSD__) || defined(__NetBSD__) \
32    || (defined(__hppa) && !defined(__OpenBSD__)) || (defined(__NO_LONG_DOUBLE_MATH) && (DBL_MANT_DIG != LDBL_MANT_DIG))) \
33    && !defined(BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS)
34 #  define BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS
35 #endif
36 #if BOOST_WORKAROUND(__BORLANDC__, BOOST_TESTED_AT(0x582))
37 //
38 // Borland post 5.8.2 uses Dinkumware's std C lib which
39 // doesn't have true long double precision.  Earlier
40 // versions are problematic too:
41 //
42 #  define BOOST_MATH_NO_REAL_CONCEPT_TESTS
43 #  define BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS
44 #  define BOOST_MATH_CONTROL_FP _control87(MCW_EM,MCW_EM)
45 #  include <float.h>
46 #endif
47 #ifdef __IBMCPP__
48 //
49 // For reasons I don't unserstand, the tests with IMB's compiler all
50 // pass at long double precision, but fail with real_concept, those tests
51 // are disabled for now.  (JM 2012).
52 #  define BOOST_MATH_NO_REAL_CONCEPT_TESTS
53 #endif
54 #ifdef sun
55 // Any use of __float128 in program startup code causes a segfault  (tested JM 2015, Solaris 11).
56 #  define BOOST_MATH_DISABLE_FLOAT128
57 #endif
58 #ifdef __HAIKU__
59 //
60 // Not sure what's up with the math detection on Haiku, but linking fails with
61 // float128 code enabled, and we don't have an implementation of __expl, so
62 // disabling long double functions for now as well.
63 #  define BOOST_MATH_DISABLE_FLOAT128
64 #  define BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS
65 #endif
66 #if (defined(macintosh) || defined(__APPLE__) || defined(__APPLE_CC__)) && ((LDBL_MANT_DIG == 106) || (__LDBL_MANT_DIG__ == 106)) && !defined(BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS)
67 //
68 // Darwin's rather strange "double double" is rather hard to
69 // support, it should be possible given enough effort though...
70 //
71 #  define BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS
72 #endif
73 #if defined(unix) && defined(__INTEL_COMPILER) && (__INTEL_COMPILER <= 1000) && !defined(BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS)
74 //
75 // Intel compiler prior to version 10 has sporadic problems
76 // calling the long double overloads of the std lib math functions:
77 // calling ::powl is OK, but std::pow(long double, long double)
78 // may segfault depending upon the value of the arguments passed
79 // and the specific Linux distribution.
80 //
81 // We'll be conservative and disable long double support for this compiler.
82 //
83 // Comment out this #define and try building the tests to determine whether
84 // your Intel compiler version has this issue or not.
85 //
86 #  define BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS
87 #endif
88 #if defined(unix) && defined(__INTEL_COMPILER)
89 //
90 // Intel compiler has sporadic issues compiling std::fpclassify depending on
91 // the exact OS version used.  Use our own code for this as we know it works
92 // well on Intel processors:
93 //
94 #define BOOST_MATH_DISABLE_STD_FPCLASSIFY
95 #endif
96 
97 #if defined(BOOST_MSVC) && !defined(_WIN32_WCE)
98    // Better safe than sorry, our tests don't support hardware exceptions:
99 #  define BOOST_MATH_CONTROL_FP _control87(MCW_EM,MCW_EM)
100 #endif
101 
102 #ifdef __IBMCPP__
103 #  define BOOST_MATH_NO_DEDUCED_FUNCTION_POINTERS
104 #endif
105 
106 #if (defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901))
107 #  define BOOST_MATH_USE_C99
108 #endif
109 
110 #if (defined(__hpux) && !defined(__hppa))
111 #  define BOOST_MATH_USE_C99
112 #endif
113 
114 #if defined(__GNUC__) && defined(_GLIBCXX_USE_C99)
115 #  define BOOST_MATH_USE_C99
116 #endif
117 
118 #if defined(_LIBCPP_VERSION) && !defined(_MSC_VER)
119 #  define BOOST_MATH_USE_C99
120 #endif
121 
122 #if defined(__CYGWIN__) || defined(__HP_aCC) || defined(BOOST_INTEL) \
123   || defined(BOOST_NO_NATIVE_LONG_DOUBLE_FP_CLASSIFY) \
124   || (defined(__GNUC__) && !defined(BOOST_MATH_USE_C99))\
125   || defined(BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS)
126 #  define BOOST_MATH_NO_NATIVE_LONG_DOUBLE_FP_CLASSIFY
127 #endif
128 
129 #if BOOST_WORKAROUND(__SUNPRO_CC, <= 0x590)
130 
131 #  include "boost/type.hpp"
132 #  include "boost/non_type.hpp"
133 
134 #  define BOOST_MATH_EXPLICIT_TEMPLATE_TYPE(t)         boost::type<t>* = 0
135 #  define BOOST_MATH_EXPLICIT_TEMPLATE_TYPE_SPEC(t)    boost::type<t>*
136 #  define BOOST_MATH_EXPLICIT_TEMPLATE_NON_TYPE(t, v)  boost::non_type<t, v>* = 0
137 #  define BOOST_MATH_EXPLICIT_TEMPLATE_NON_TYPE_SPEC(t, v)  boost::non_type<t, v>*
138 
139 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_TYPE(t)         \
140              , BOOST_MATH_EXPLICIT_TEMPLATE_TYPE(t)
141 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_TYPE_SPEC(t)    \
142              , BOOST_MATH_EXPLICIT_TEMPLATE_TYPE_SPEC(t)
143 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_NON_TYPE(t, v)  \
144              , BOOST_MATH_EXPLICIT_TEMPLATE_NON_TYPE(t, v)
145 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_NON_TYPE_SPEC(t, v)  \
146              , BOOST_MATH_EXPLICIT_TEMPLATE_NON_TYPE_SPEC(t, v)
147 
148 #else
149 
150 // no workaround needed: expand to nothing
151 
152 #  define BOOST_MATH_EXPLICIT_TEMPLATE_TYPE(t)
153 #  define BOOST_MATH_EXPLICIT_TEMPLATE_TYPE_SPEC(t)
154 #  define BOOST_MATH_EXPLICIT_TEMPLATE_NON_TYPE(t, v)
155 #  define BOOST_MATH_EXPLICIT_TEMPLATE_NON_TYPE_SPEC(t, v)
156 
157 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_TYPE(t)
158 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_TYPE_SPEC(t)
159 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_NON_TYPE(t, v)
160 #  define BOOST_MATH_APPEND_EXPLICIT_TEMPLATE_NON_TYPE_SPEC(t, v)
161 
162 
163 #endif // __SUNPRO_CC
164 
165 #if (defined(__SUNPRO_CC) || defined(__hppa) || defined(__GNUC__)) && !defined(BOOST_MATH_SMALL_CONSTANT)
166 // Sun's compiler emits a hard error if a constant underflows,
167 // as does aCC on PA-RISC, while gcc issues a large number of warnings:
168 #  define BOOST_MATH_SMALL_CONSTANT(x) 0.0
169 #else
170 #  define BOOST_MATH_SMALL_CONSTANT(x) x
171 #endif
172 
173 
174 #if BOOST_WORKAROUND(BOOST_MSVC, < 1400)
175 //
176 // Define if constants too large for a float cause "bad"
177 // values to be stored in the data, rather than infinity
178 // or a suitably large value.
179 //
180 #  define BOOST_MATH_BUGGY_LARGE_FLOAT_CONSTANTS
181 #endif
182 //
183 // Tune performance options for specific compilers:
184 //
185 #ifdef BOOST_MSVC
186 #  define BOOST_MATH_POLY_METHOD 2
187 #  define BOOST_MATH_RATIONAL_METHOD 1
188 #elif defined(BOOST_INTEL)
189 #  define BOOST_MATH_POLY_METHOD 2
190 #  define BOOST_MATH_RATIONAL_METHOD 1
191 #elif defined(__GNUC__)
192 #if __GNUC__ < 4
193 #  define BOOST_MATH_POLY_METHOD 3
194 #  define BOOST_MATH_RATIONAL_METHOD 3
195 #  define BOOST_MATH_INT_TABLE_TYPE(RT, IT) RT
196 #  define BOOST_MATH_INT_VALUE_SUFFIX(RV, SUF) RV##.0L
197 #else
198 #  define BOOST_MATH_POLY_METHOD 3
199 #  define BOOST_MATH_RATIONAL_METHOD 1
200 #endif
201 #endif
202 
203 #if defined(BOOST_NO_LONG_LONG) && !defined(BOOST_MATH_INT_TABLE_TYPE)
204 #  define BOOST_MATH_INT_TABLE_TYPE(RT, IT) RT
205 #  define BOOST_MATH_INT_VALUE_SUFFIX(RV, SUF) RV##.0L
206 #endif
207 
208 //
209 // constexpr support, early GCC implementations can't cope so disable
210 // constexpr for them:
211 //
212 #if !defined(__clang) && defined(__GNUC__)
213 #if (__GNUC__ * 100 + __GNUC_MINOR__) < 490
214 #  define BOOST_MATH_DISABLE_CONSTEXPR
215 #endif
216 #endif
217 
218 #ifdef BOOST_MATH_DISABLE_CONSTEXPR
219 #  define BOOST_MATH_CONSTEXPR
220 #else
221 #  define BOOST_MATH_CONSTEXPR BOOST_CONSTEXPR
222 #endif
223 
224 //
225 // noexcept support:
226 //
227 #ifndef BOOST_NO_CXX11_NOEXCEPT
228 #ifndef BOOST_NO_CXX11_HDR_TYPE_TRAITS
229 #include <type_traits>
230 #  define BOOST_MATH_NOEXCEPT(T) noexcept(std::is_floating_point<T>::value)
231 #  define BOOST_MATH_IS_FLOAT(T) (std::is_floating_point<T>::value)
232 #else
233 #include <boost/type_traits/is_floating_point.hpp>
234 #  define BOOST_MATH_NOEXCEPT(T) noexcept(boost::is_floating_point<T>::value)
235 #  define BOOST_MATH_IS_FLOAT(T) (boost::is_floating_point<T>::value)
236 #endif
237 #else
238 #  define BOOST_MATH_NOEXCEPT(T)
239 #  define BOOST_MATH_IS_FLOAT(T) false
240 #endif
241 
242 //
243 // The maximum order of polynomial that will be evaluated
244 // via an unrolled specialisation:
245 //
246 #ifndef BOOST_MATH_MAX_POLY_ORDER
247 #  define BOOST_MATH_MAX_POLY_ORDER 20
248 #endif
249 //
250 // Set the method used to evaluate polynomials and rationals:
251 //
252 #ifndef BOOST_MATH_POLY_METHOD
253 #  define BOOST_MATH_POLY_METHOD 2
254 #endif
255 #ifndef BOOST_MATH_RATIONAL_METHOD
256 #  define BOOST_MATH_RATIONAL_METHOD 1
257 #endif
258 //
259 // decide whether to store constants as integers or reals:
260 //
261 #ifndef BOOST_MATH_INT_TABLE_TYPE
262 #  define BOOST_MATH_INT_TABLE_TYPE(RT, IT) IT
263 #endif
264 #ifndef BOOST_MATH_INT_VALUE_SUFFIX
265 #  define BOOST_MATH_INT_VALUE_SUFFIX(RV, SUF) RV##SUF
266 #endif
267 //
268 // And then the actual configuration:
269 //
270 #if defined(_GLIBCXX_USE_FLOAT128) && defined(BOOST_GCC) && !defined(__STRICT_ANSI__) \
271    && !defined(BOOST_MATH_DISABLE_FLOAT128) || defined(BOOST_MATH_USE_FLOAT128)
272 //
273 // Only enable this when the compiler really is GCC as clang and probably
274 // intel too don't support __float128 yet :-(
275 //
276 #ifndef BOOST_MATH_USE_FLOAT128
277 #  define BOOST_MATH_USE_FLOAT128
278 #endif
279 
280 #  if defined(BOOST_INTEL) && defined(BOOST_INTEL_CXX_VERSION) && (BOOST_INTEL_CXX_VERSION >= 1310) && defined(__GNUC__)
281 #    if (__GNUC__ > 4) || ((__GNUC__ == 4) && (__GNUC_MINOR__ >= 6))
282 #      define BOOST_MATH_FLOAT128_TYPE __float128
283 #    endif
284 #  elif defined(__GNUC__)
285 #      define BOOST_MATH_FLOAT128_TYPE __float128
286 #  endif
287 
288 #  ifndef BOOST_MATH_FLOAT128_TYPE
289 #      define BOOST_MATH_FLOAT128_TYPE _Quad
290 #  endif
291 #endif
292 //
293 // Check for WinCE with no iostream support:
294 //
295 #if defined(_WIN32_WCE) && !defined(__SGI_STL_PORT)
296 #  define BOOST_MATH_NO_LEXICAL_CAST
297 #endif
298 
299 //
300 // Helper macro for controlling the FP behaviour:
301 //
302 #ifndef BOOST_MATH_CONTROL_FP
303 #  define BOOST_MATH_CONTROL_FP
304 #endif
305 //
306 // Helper macro for using statements:
307 //
308 #define BOOST_MATH_STD_USING_CORE \
309    using std::abs;\
310    using std::acos;\
311    using std::cos;\
312    using std::fmod;\
313    using std::modf;\
314    using std::tan;\
315    using std::asin;\
316    using std::cosh;\
317    using std::frexp;\
318    using std::pow;\
319    using std::tanh;\
320    using std::atan;\
321    using std::exp;\
322    using std::ldexp;\
323    using std::sin;\
324    using std::atan2;\
325    using std::fabs;\
326    using std::log;\
327    using std::sinh;\
328    using std::ceil;\
329    using std::floor;\
330    using std::log10;\
331    using std::sqrt;
332 
333 #define BOOST_MATH_STD_USING BOOST_MATH_STD_USING_CORE
334 
335 namespace boost{ namespace math{
336 namespace tools
337 {
338 
339 template <class T>
BOOST_PREVENT_MACRO_SUBSTITUTION(T a,T b,T c)340 inline T max BOOST_PREVENT_MACRO_SUBSTITUTION(T a, T b, T c) BOOST_MATH_NOEXCEPT(T)
341 {
342    return (std::max)((std::max)(a, b), c);
343 }
344 
345 template <class T>
BOOST_PREVENT_MACRO_SUBSTITUTION(T a,T b,T c,T d)346 inline T max BOOST_PREVENT_MACRO_SUBSTITUTION(T a, T b, T c, T d) BOOST_MATH_NOEXCEPT(T)
347 {
348    return (std::max)((std::max)(a, b), (std::max)(c, d));
349 }
350 
351 } // namespace tools
352 
353 template <class T>
suppress_unused_variable_warning(const T &)354 void suppress_unused_variable_warning(const T&) BOOST_MATH_NOEXCEPT(T)
355 {
356 }
357 
358 namespace detail{
359 
360 template <class T>
361 struct is_integer_for_rounding
362 {
363    static const bool value = boost::is_integral<T>::value
364 #ifndef BOOST_NO_LIMITS_COMPILE_TIME_CONSTANTS
365       || (std::numeric_limits<T>::is_specialized && std::numeric_limits<T>::is_integer)
366 #endif
367       ;
368 };
369 
370 }
371 
372 }} // namespace boost namespace math
373 
374 #ifdef __GLIBC_PREREQ
375 #  if __GLIBC_PREREQ(2,14)
376 #     define BOOST_MATH_HAVE_FIXED_GLIBC
377 #  endif
378 #endif
379 
380 #if ((defined(__linux__) && !defined(__UCLIBC__) && !defined(BOOST_MATH_HAVE_FIXED_GLIBC)) || defined(__QNX__) || defined(__IBMCPP__)) && !defined(BOOST_NO_FENV_H)
381 //
382 // This code was introduced in response to this glibc bug: http://sourceware.org/bugzilla/show_bug.cgi?id=2445
383 // Basically powl and expl can return garbage when the result is small and certain exception flags are set
384 // on entrance to these functions.  This appears to have been fixed in Glibc 2.14 (May 2011).
385 // Much more information in this message thread: https://groups.google.com/forum/#!topic/boost-list/ZT99wtIFlb4
386 //
387 
388    #include <boost/detail/fenv.hpp>
389 
390 #  ifdef FE_ALL_EXCEPT
391 
392 namespace boost{ namespace math{
393    namespace detail
394    {
395    struct fpu_guard
396    {
fpu_guardboost::math::detail::fpu_guard397       fpu_guard()
398       {
399          fegetexceptflag(&m_flags, FE_ALL_EXCEPT);
400          feclearexcept(FE_ALL_EXCEPT);
401       }
~fpu_guardboost::math::detail::fpu_guard402       ~fpu_guard()
403       {
404          fesetexceptflag(&m_flags, FE_ALL_EXCEPT);
405       }
406    private:
407       fexcept_t m_flags;
408    };
409 
410    } // namespace detail
411    }} // namespaces
412 
413 #    define BOOST_FPU_EXCEPTION_GUARD boost::math::detail::fpu_guard local_guard_object;
414 #    define BOOST_MATH_INSTRUMENT_FPU do{ fexcept_t cpu_flags; fegetexceptflag(&cpu_flags, FE_ALL_EXCEPT); BOOST_MATH_INSTRUMENT_VARIABLE(cpu_flags); } while(0);
415 
416 #  else
417 
418 #    define BOOST_FPU_EXCEPTION_GUARD
419 #    define BOOST_MATH_INSTRUMENT_FPU
420 
421 #  endif
422 
423 #else // All other platforms.
424 #  define BOOST_FPU_EXCEPTION_GUARD
425 #  define BOOST_MATH_INSTRUMENT_FPU
426 #endif
427 
428 #ifdef BOOST_MATH_INSTRUMENT
429 
430 #  include <iostream>
431 #  include <iomanip>
432 #  include <typeinfo>
433 
434 #  define BOOST_MATH_INSTRUMENT_CODE(x) \
435       std::cout << std::setprecision(35) << __FILE__ << ":" << __LINE__ << " " << x << std::endl;
436 #  define BOOST_MATH_INSTRUMENT_VARIABLE(name) BOOST_MATH_INSTRUMENT_CODE(BOOST_STRINGIZE(name) << " = " << name)
437 
438 #else
439 
440 #  define BOOST_MATH_INSTRUMENT_CODE(x)
441 #  define BOOST_MATH_INSTRUMENT_VARIABLE(name)
442 
443 #endif
444 
445 //
446 // Thread local storage:
447 //
448 #if !defined(BOOST_NO_CXX11_THREAD_LOCAL) && !defined(BOOST_INTEL)
449 #  define BOOST_MATH_THREAD_LOCAL thread_local
450 #else
451 #  define BOOST_MATH_THREAD_LOCAL
452 #endif
453 
454 #endif // BOOST_MATH_TOOLS_CONFIG_HPP
455 
456 
457 
458 
459