reactos/sdk/include/c++/stlport/stl/_cmath.h

   1 /*
   2  * Copyright (c) 1999
   3  * Boris Fomitchev
   4  *
   5  * This material is provided "as is", with absolutely no warranty expressed
   6  * or implied. Any use is at your own risk.
   7  *
   8  * Permission to use or copy this software for any purpose is hereby granted
   9  * without fee, provided the above notices are retained on all copies.
  10  * Permission to modify the code and to distribute modified code is granted,
  11  * provided the above notices are retained, and a notice that the code was
  12  * modified is included with the above copyright notice.
  13  *
  14  */
  15
  16 #ifndef _STLP_INTERNAL_CMATH
  17 #define _STLP_INTERNAL_CMATH
  18
  19 /* gcc do not like when a using directive appear after a function
  20  * declaration. cmath have abs overloads and cstdlib a using directive
  21  * so cstdlib has to be included first.
  22  */
  23 #if defined (__GNUC__) && defined (_STLP_USE_NEW_C_HEADERS)
  24 #  if defined (_STLP_HAS_INCLUDE_NEXT)
  25 #    include_next <cstdlib>
  26 #  else
  27 #    include _STLP_NATIVE_CPP_C_HEADER(cstdlib)
  28 #  endif
  29 #endif
  30
  31 #if defined (_STLP_USE_NEW_C_HEADERS)
  32 #  if defined (_STLP_HAS_NO_NAMESPACES) && !defined (exception)
  33 #    define exception __math_exception
  34 #  endif
  35 #  if defined (_STLP_HAS_INCLUDE_NEXT)
  36 #    include_next <cmath>
  37 #  else
  38 #    include _STLP_NATIVE_CPP_C_HEADER(cmath)
  39 #  endif
  40 #  if defined (_STLP_HAS_NO_NAMESPACES)
  41 #    undef exception
  42 #  endif
  43 #else
  44 #  include <math.h>
  45 #endif
  46
  47 #if (defined (__SUNPRO_CC) && (__SUNPRO_CC > 0x500)) || \
  48      !(defined (__IBMCPP__) && (__IBMCPP__ >= 500) || !(defined(__HP_aCC) && (__HP_aCC >= 30000) ))
  49 #  if !defined(_STLP_HAS_NO_NAMESPACES) && !defined(__SUNPRO_CC)
  50 // All the other hypot stuff is going to be at file scope, so follow along here.
  51 namespace std {
  52 #  endif
  53 extern "C" double hypot(double x, double y);
  54 #  if !defined(_STLP_HAS_NO_NAMESPACES) && !defined(__SUNPRO_CC)
  55 }
  56 #  endif
  57
  58 #endif
  59
  60 #if defined (__sun) && defined (__GNUC__)
  61 extern "C" {
  62   float __cosf(float v);
  63   float __sinf(float v);
  64   float __atan2f(float, float);
  65   float __coshf(float v);
  66   float __sinhf(float v);
  67   float __sqrtf(float v);
  68   float __expf(float v);
  69   float __logf(float v);
  70   float __log10f(float v);
  71
  72   long double __cosl(long double v);
  73   long double __sinl(long double v);
  74   long double __atan2l(long double, long double);
  75   long double __coshl(long double v);
  76   long double __sinhl(long double v);
  77   long double __sqrtl(long double v);
  78   long double __expl(long double v);
  79   long double __logl(long double v);
  80   long double __log10l(long double v);
  81 }
  82
  83 extern "C" {
  84   inline float cosf(float v) { return __cosf(v); }
  85   inline float sinf(float v) { return __sinf(v); }
  86   inline float atan2f(float v1, float v2) { return __atan2f(v1,v2); }
  87   inline float coshf(float v) { return __coshf(v); }
  88   inline float sinhf(float v) { return __sinhf(v); }
  89   inline float sqrtf(float v) { return __sqrtf(v); }
  90   inline float expf(float v) { return __expf(v); }
  91   inline float logf(float v) { return __logf(v); }
  92   inline float log10f(float v) { return __log10f(v); }
  93
  94   inline long double cosl(long double v) { return __cosl(v); }
  95   inline long double sinl(long double v) { return __sinl(v); }
  96   inline long double atan2l(long double v1, long double v2) { return __atan2l(v1,v2); }
  97   inline long double coshl(long double v) { return __coshl(v); }
  98   inline long double sinhl(long double v) { return __sinhl(v); }
  99   inline long double sqrtl(long double v) { return __sqrtl(v); }
 100   inline long double expl(long double v) { return __expl(v); }
 101   inline long double logl(long double v) { return __logl(v); }
 102   inline long double log10l(long double v) { return __log10l(v); }
 103 }
 104 #endif // __sun && __GNUC__
 105
 106 #if defined (__sun)
 107 extern "C" {
 108 extern float __acosf(float);
 109 extern float __asinf(float);
 110 extern float __atanf(float);
 111 extern float __atan2f(float, float);
 112 extern float __ceilf(float);
 113 extern float __cosf(float);
 114 extern float __coshf(float);
 115 extern float __expf(float);
 116 extern float __fabsf(float);
 117 extern float __floorf(float);
 118 extern float __fmodf(float, float);
 119 extern float __frexpf(float, int *);
 120 extern float __ldexpf(float, int);
 121 extern float __logf(float);
 122 extern float __log10f(float);
 123 extern float __modff(float, float *);
 124 extern float __powf(float, float);
 125 extern float __sinf(float);
 126 extern float __sinhf(float);
 127 extern float __sqrtf(float);
 128 extern float __tanf(float);
 129 extern float __tanhf(float);
 130
 131 extern long double __acosl(long double);
 132 extern long double __asinl(long double);
 133 extern long double __atanl(long double);
 134 extern long double __atan2l(long double, long double);
 135 extern long double __ceill(long double);
 136 extern long double __cosl(long double);
 137 extern long double __coshl(long double);
 138 extern long double __expl(long double);
 139 extern long double __fabsl(long double);
 140 extern long double __floorl(long double);
 141 extern long double __fmodl(long double, long double);
 142 extern long double __frexpl(long double, int *);
 143 extern long double __ldexpl(long double, int);
 144 extern long double __logl(long double);
 145 extern long double __log10l(long double);
 146 extern long double __modfl(long double, long double *);
 147 extern long double __powl(long double, long double);
 148 extern long double __sinl(long double);
 149 extern long double __sinhl(long double);
 150 extern long double __sqrtl(long double);
 151 extern long double __tanl(long double);
 152 extern long double __tanhl(long double);
 153 }
 154 #endif
 155
 156 #if defined (__BORLANDC__)
 157 #  define _STLP_CMATH_FUNC_NAMESPACE _STLP_VENDOR_CSTD
 158 #else
 159 #  define _STLP_CMATH_FUNC_NAMESPACE
 160 #endif
 161
 162 #if !defined (__sun) || defined (__GNUC__)
 163 #  define _STLP_MATH_INLINE(float_type, func, cfunc) \
 164      inline float_type func (float_type x) { return _STLP_CMATH_FUNC_NAMESPACE::cfunc(x); }
 165 #  define _STLP_MATH_INLINE2(float_type, type, func, cfunc) \
 166      inline float_type func (float_type x, type y) { return _STLP_CMATH_FUNC_NAMESPACE::cfunc(x, y); }
 167 #  define _STLP_MATH_INLINE_D(float_type, func, cfunc)
 168 #  define _STLP_MATH_INLINE2_D(float_type, type, func, cfunc)
 169 #else
 170 #  ifdef __SUNPRO_CC
 171 #    define _STLP_MATH_INLINE(float_type, func, cfunc) \
 172        inline float_type func (float_type x) { return _STLP_VENDOR_CSTD::__##cfunc(x); }
 173 #    define _STLP_MATH_INLINE_D(float_type, func, cfunc) \
 174        inline float_type func (float_type x) { return _STLP_VENDOR_CSTD::cfunc(x); }
 175 #    define _STLP_MATH_INLINE2(float_type, type, func, cfunc) \
 176        inline float_type func (float_type x, type y) { return _STLP_VENDOR_CSTD::__##cfunc(x,y); }
 177 #    define _STLP_MATH_INLINE2_D(float_type, type, func, cfunc) \
 178        inline float_type func (float_type x, type y) { return _STLP_VENDOR_CSTD::cfunc(x,y); }
 179 #  else
 180 #    error Unknown compiler for the Sun platform
 181 #  endif
 182 #endif
 183
 184 /** macros to define math functions
 185 These macros (having an X somewhere in the name) forward to the C library's
 186 double functions but cast the arguments and return values to the given type. */
 187
 188 #define _STLP_MATH_INLINEX(__type,func,cfunc) \
 189   inline __type func (__type x) \
 190   { return __STATIC_CAST(__type, _STLP_CMATH_FUNC_NAMESPACE::cfunc((double)x)); }
 191 #define _STLP_MATH_INLINE2X(__type1,__type2,func,cfunc) \
 192   inline __type1 func (__type1 x, __type2 y) \
 193   { return __STATIC_CAST(__type1, _STLP_CMATH_FUNC_NAMESPACE::cfunc((double)x, y)); }
 194 #define _STLP_MATH_INLINE2PX(__type,func,cfunc) \
 195   inline __type func (__type x, __type *y) { \
 196     double tmp1, tmp2; \
 197     tmp1 = _STLP_CMATH_FUNC_NAMESPACE::cfunc(__STATIC_CAST(double, x), &tmp2); \
 198     *y = __STATIC_CAST(__type, tmp2); \
 199     return __STATIC_CAST(__type, tmp1); \
 200   }
 201 #define _STLP_MATH_INLINE2XX(__type,func,cfunc) \
 202   inline __type func (__type x, __type y) \
 203   { return __STATIC_CAST(__type, _STLP_CMATH_FUNC_NAMESPACE::cfunc((double)x, (double)y)); }
 204
 205
 206 /** rough characterization of compiler and native C library
 207 For the compiler, it can either support long double or not. If it doesn't, the
 208 macro _STLP_NO_LONG_DOUBLE is not defined and we don't define any long double
 209 overloads.
 210 For the native C library the question is whether it has variants with an 'f'
 211 suffix (for float as opposed to double) or an 'l' suffix (for long double). If
 212 the float variants are missing, _STLP_NO_VENDOR_MATH_F is defined, when the
 213 long double variants are missing, _STLP_NO_VENDOR_MATH_L is defined. Of course
 214 the latter doesn't make sense anyway when the compiler already has no long
 215 double support.
 216
 217 Those two traits determine a) which overloads get defined and b) how they are
 218 defined.
 219
 220 Meaning of suffixes:
 221 ""   : function returning and taking a float_type
 222 "2"  : function returning a float_type and taking to float_types
 223 "2P" : function returning a float_type and taking a float_type and a float_type*
 224 "2PI": function returning a float_type and taking a float_type and an int*
 225 "2I" : function returning a float_type and taking a float_Type and an int
 226 */
 227
 228 #if !defined (_STLP_NO_LONG_DOUBLE) && !defined (_STLP_NO_VENDOR_MATH_L) && !defined (_STLP_NO_VENDOR_MATH_F)
 229    // long double support and both e.g. sinl(long double) and sinf(float)
 230    // This is the default for a correct and complete native library.
 231 #  define _STLP_DEF_MATH_INLINE(func,cf) \
 232   _STLP_MATH_INLINE(float,func,cf##f) \
 233   _STLP_MATH_INLINE_D(double,func,cf) \
 234   _STLP_MATH_INLINE(long double,func,cf##l)
 235 #  define _STLP_DEF_MATH_INLINE2(func,cf) \
 236   _STLP_MATH_INLINE2(float,float,func,cf##f) \
 237   _STLP_MATH_INLINE2_D(double,double,func,cf) \
 238   _STLP_MATH_INLINE2(long double,long double,func,cf##l)
 239 #  define _STLP_DEF_MATH_INLINE2P(func,cf) \
 240   _STLP_MATH_INLINE2(float,float *,func,cf##f) \
 241   _STLP_MATH_INLINE2_D(double,double *,func,cf) \
 242   _STLP_MATH_INLINE2(long double,long double *,func,cf##l)
 243 #  define _STLP_DEF_MATH_INLINE2PI(func,cf) \
 244   _STLP_MATH_INLINE2(float,int *,func,cf##f) \
 245   _STLP_MATH_INLINE2_D(double,int *,func,cf) \
 246   _STLP_MATH_INLINE2(long double,int *,func,cf##l)
 247 #  define _STLP_DEF_MATH_INLINE2I(func,cf) \
 248   _STLP_MATH_INLINE2(float,int,func,cf##f) \
 249   _STLP_MATH_INLINE2_D(double,int,func,cf) \
 250   _STLP_MATH_INLINE2(long double,int,func,cf##l)
 251 #else
 252 #  if !defined (_STLP_NO_LONG_DOUBLE)
 253 #    if !defined (_STLP_NO_VENDOR_MATH_F)
 254        // long double support and e.g. sinf(float) but not e.g. sinl(long double)
 255 #      define _STLP_DEF_MATH_INLINE(func,cf) \
 256       _STLP_MATH_INLINE(float,func,cf##f) \
 257       _STLP_MATH_INLINEX(long double,func,cf)
 258 #      define _STLP_DEF_MATH_INLINE2(func,cf) \
 259       _STLP_MATH_INLINE2(float,float,func,cf##f) \
 260       _STLP_MATH_INLINE2XX(long double,func,cf)
 261 #      define _STLP_DEF_MATH_INLINE2P(func,cf) \
 262       _STLP_MATH_INLINE2(float,float *,func,cf##f) \
 263       _STLP_MATH_INLINE2PX(long double,func,cf)
 264 #      define _STLP_DEF_MATH_INLINE2PI(func,cf) \
 265       _STLP_MATH_INLINE2(float,int *,func,cf##f) \
 266       _STLP_MATH_INLINE2X(long double,int *,func,cf)
 267 #      define _STLP_DEF_MATH_INLINE2I(func,cf) \
 268       _STLP_MATH_INLINE2(float,int,func,cf##f) \
 269       _STLP_MATH_INLINE2X(long double,int,func,cf)
 270 #    elif !defined (_STLP_NO_VENDOR_MATH_L)
 271        // long double support and e.g. sinl(long double) but not e.g. sinf(float)
 272 #      define _STLP_DEF_MATH_INLINE(func,cf) \
 273       _STLP_MATH_INLINEX(float,func,cf) \
 274       _STLP_MATH_INLINE(long double,func,cf##l)
 275 #      define _STLP_DEF_MATH_INLINE2(func,cf) \
 276       _STLP_MATH_INLINE2XX(float,func,cf) \
 277       _STLP_MATH_INLINE2(long double,long double,func,cf##l)
 278 #      define _STLP_DEF_MATH_INLINE2P(func,cf) \
 279       _STLP_MATH_INLINE2PX(float,func,cf) \
 280       _STLP_MATH_INLINE2(long double,long double *,func,cf##l)
 281 #      define _STLP_DEF_MATH_INLINE2PI(func,cf) \
 282       _STLP_MATH_INLINE2X(float,int *,func,cf) \
 283       _STLP_MATH_INLINE2(long double,int *,func,cf##l)
 284 #      define _STLP_DEF_MATH_INLINE2I(func,cf) \
 285       _STLP_MATH_INLINE2X(float,int,func,cf) \
 286       _STLP_MATH_INLINE2(long double,int,func,cf##l)
 287 #    else
 288 #      define _STLP_DEF_MATH_INLINE(func,cf) \
 289       _STLP_MATH_INLINEX(float,func,cf) \
 290       _STLP_MATH_INLINEX(long double,func,cf)
 291 #      define _STLP_DEF_MATH_INLINE2(func,cf) \
 292       _STLP_MATH_INLINE2XX(float,func,cf) \
 293       _STLP_MATH_INLINE2XX(long double,func,cf)
 294 #      define _STLP_DEF_MATH_INLINE2P(func,cf) \
 295       _STLP_MATH_INLINE2PX(float,func,cf) \
 296       _STLP_MATH_INLINE2PX(long double,func,cf)
 297 #      define _STLP_DEF_MATH_INLINE2PI(func,cf) \
 298       _STLP_MATH_INLINE2X(float,int *,func,cf) \
 299       _STLP_MATH_INLINE2X(long double,int *,func,cf)
 300 #      define _STLP_DEF_MATH_INLINE2I(func,cf) \
 301       _STLP_MATH_INLINE2X(float,int,func,cf) \
 302       _STLP_MATH_INLINE2X(long double,int,func,cf)
 303 #    endif
 304 #  else
 305 #    if !defined (_STLP_NO_VENDOR_MATH_F)
 306 #      define _STLP_DEF_MATH_INLINE(func,cf) \
 307       _STLP_MATH_INLINE(float,func,cf##f)
 308 #      define _STLP_DEF_MATH_INLINE2(func,cf) \
 309       _STLP_MATH_INLINE2(float,float,func,cf##f)
 310 #      define _STLP_DEF_MATH_INLINE2P(func,cf) \
 311       _STLP_MATH_INLINE2(float,float *,func,cf##f)
 312 #      define _STLP_DEF_MATH_INLINE2PI(func,cf) \
 313       _STLP_MATH_INLINE2(float,int *,func,cf##f)
 314 #      define _STLP_DEF_MATH_INLINE2I(func,cf) \
 315       _STLP_MATH_INLINE2(float,int,func,cf##f)
 316 #    else // _STLP_NO_VENDOR_MATH_F
 317        // neither long double support nor e.g. sinf(float) functions
 318 #      define _STLP_DEF_MATH_INLINE(func,cf) \
 319       _STLP_MATH_INLINEX(float,func,cf)
 320 #      define _STLP_DEF_MATH_INLINE2(func,cf) \
 321       _STLP_MATH_INLINE2XX(float,func,cf)
 322 #      define _STLP_DEF_MATH_INLINE2P(func,cf) \
 323       _STLP_MATH_INLINE2PX(float,func,cf)
 324 #      define _STLP_DEF_MATH_INLINE2PI(func,cf) \
 325       _STLP_MATH_INLINE2X(float,int *,func,cf)
 326 #      define _STLP_DEF_MATH_INLINE2I(func,cf) \
 327       _STLP_MATH_INLINE2X(float,int,func,cf)
 328 #    endif // _STLP_NO_VENDOR_MATH_F
 329 #  endif
 330 #endif
 331
 332 #if defined (_STLP_WCE) || \
 333    (defined(_STLP_MSVC) && (_STLP_MSVC <= 1300) && defined (_MSC_EXTENSIONS) /* && !defined(_STLP_WCE_NET) */)
 334 /*
 335  * dums: VC6 has all the required C++ functions but only define them if
 336  * _MSC_EXTENSIONS is not defined (a bug?). STLport just do the same
 337  * thing also when _MSC_EXTENSIONS is defined.
 338  * TODO: above check (_STLP_MSVC <= 1300) also catches VC7.0, is that intended?
 339  */
 340 //We have to tell the compilers that abs, acos ... math functions are not intrinsic
 341 //otherwise we have Internal Compiler Error in release mode...
 342 #  pragma warning(push)
 343 #  pragma warning(disable: 4162) // no function with C linkage found
 344 #  pragma warning(disable: 4163) // not available as an intrinsic function
 345 #  pragma function (abs, acos, asin, atan, atan2, cos, cosh, exp, fabs, fmod, log, log10, sin, sinh, sqrt, tan, tanh)
 346 #  if defined (_STLP_WCE)
 347 #    pragma function (ceil, floor)
 348 #  endif
 349 #  define _STLP_RESTORE_FUNCTION_INTRINSIC
 350 #endif // _STLP_MSVC && _STLP_MSVC <= 1300 && !_STLP_WCE && _MSC_EXTENSIONS
 351
 352 #if (defined (__BORLANDC__) || defined (__WATCOMC__)) && defined (_STLP_USE_NEW_C_HEADERS)
 353 /* In this config Borland native lib only define functions in std namespace.
 354  * In order to have all overloads in STLport namespace we need to add the
 355  * double overload in global namespace. We do not use a using statement to avoid
 356  * import of invalid overload.
 357  */
 358 #  define _STLP_DMATH_INLINE(func) _STLP_MATH_INLINE(double, func, func)
 359 #  define _STLP_DMATH_INLINE2(func) _STLP_MATH_INLINE2(double, double, func, func)
 360
 361 _STLP_DMATH_INLINE(acos)
 362 _STLP_DMATH_INLINE(asin)
 363 _STLP_DMATH_INLINE(atan)
 364 _STLP_DMATH_INLINE2(atan2)
 365 _STLP_DMATH_INLINE(ceil)
 366 _STLP_DMATH_INLINE(cos)
 367 _STLP_DMATH_INLINE(cosh)
 368 _STLP_DMATH_INLINE(exp)
 369 _STLP_DMATH_INLINE(fabs)
 370 _STLP_DMATH_INLINE(floor)
 371 _STLP_DMATH_INLINE2(fmod)
 372 _STLP_MATH_INLINE2X(double, int*, frexp, frexp)
 373 _STLP_MATH_INLINE2X(double, int, ldexp, ldexp)
 374 _STLP_DMATH_INLINE(log)
 375 _STLP_DMATH_INLINE(log10)
 376 _STLP_MATH_INLINE2PX(double, modf, modf)
 377 _STLP_DMATH_INLINE(sin)
 378 _STLP_DMATH_INLINE(sinh)
 379 _STLP_DMATH_INLINE(sqrt)
 380 _STLP_DMATH_INLINE(tan)
 381 _STLP_DMATH_INLINE(tanh)
 382 _STLP_DMATH_INLINE2(pow)
 383 _STLP_DMATH_INLINE2(hypot)
 384
 385 #  undef _STLP_DMATH_INLINE
 386 #  undef _STLP_DMATH_INLINE2
 387 #endif
 388
 389 #if defined (__DMC__)
 390 #  if defined (fabs)
 391 inline double __stlp_fabs(double __x) { return fabs(__x); }
 392 #    undef fabs
 393 inline double fabs(double __x) { return __stlp_fabs(__x); }
 394 #  endif
 395 #  if defined (cos)
 396 inline double __stlp_cos(double __x) { return cos(__x); }
 397 #    undef cos
 398 inline double cos(double __x) { return __stlp_cos(__x); }
 399 #  endif
 400 #  if defined (sin)
 401 inline double __stlp_sin(double __x) { return sin(__x); }
 402 #    undef sin
 403 inline double sin(double __x) { return __stlp_sin(__x); }
 404 #  endif
 405 #  if defined (sqrt)
 406 inline double __stlp_sqrt(double __x) { return sqrt(__x); }
 407 #    undef sqrt
 408 inline double sqrt(double __x) { return __stlp_sqrt(__x); }
 409 #  endif
 410 #  if defined (ldexp)
 411 inline double __stlp_ldexp(double __x, int __y) { return ldexp(__x, __y); }
 412 #    undef ldexp
 413 inline double ldexp(double __x, int __y) { return __stlp_ldexp(__x, __y); }
 414 #  endif
 415 #endif
 416
 417 /* MSVC native lib starting with .Net 2003 has already all math functions
 418  * in global namespace.
 419  * HP-UX native lib has math functions in the global namespace.
 420  */
 421 #if (!defined (_STLP_MSVC_LIB) || (_STLP_MSVC_LIB < 1310) || defined(UNDER_CE)) && \
 422     (!defined (__HP_aCC) || (__HP_aCC < 30000)) && \
 423     !defined (__WATCOMC__)
 424 inline double abs(double __x)
 425 { return ::fabs(__x); }
 426 #  if !defined (__MVS__)
 427 _STLP_DEF_MATH_INLINE(abs, fabs)
 428 #  else // __MVS__ has native long double abs?
 429 inline float abs(float __x) { return ::fabsf(__x); }
 430 #  endif
 431
 432 _STLP_DEF_MATH_INLINE(acos, acos)
 433 _STLP_DEF_MATH_INLINE(asin, asin)
 434 _STLP_DEF_MATH_INLINE(atan, atan)
 435 _STLP_DEF_MATH_INLINE2(atan2, atan2)
 436 _STLP_DEF_MATH_INLINE(ceil, ceil)
 437 _STLP_DEF_MATH_INLINE(cos, cos)
 438 _STLP_DEF_MATH_INLINE(cosh, cosh)
 439 _STLP_DEF_MATH_INLINE(exp, exp)
 440 _STLP_DEF_MATH_INLINE(fabs, fabs)
 441 _STLP_DEF_MATH_INLINE(floor, floor)
 442 _STLP_DEF_MATH_INLINE2(fmod, fmod)
 443 _STLP_DEF_MATH_INLINE2PI(frexp, frexp)
 444 _STLP_DEF_MATH_INLINE2I(ldexp, ldexp)
 445 _STLP_DEF_MATH_INLINE(log, log)
 446 _STLP_DEF_MATH_INLINE(log10, log10)
 447 _STLP_DEF_MATH_INLINE2P(modf, modf)
 448 _STLP_DEF_MATH_INLINE(sin, sin)
 449 _STLP_DEF_MATH_INLINE(sinh, sinh)
 450 _STLP_DEF_MATH_INLINE(sqrt, sqrt)
 451 _STLP_DEF_MATH_INLINE(tan, tan)
 452 _STLP_DEF_MATH_INLINE(tanh, tanh)
 453 _STLP_DEF_MATH_INLINE2(pow, pow)
 454
 455 #  if !defined(_STLP_MSVC) /* || (_STLP_MSVC > 1300) */ || defined(_STLP_WCE) || !defined (_MSC_EXTENSIONS) /* && !defined(_STLP_WCE_NET) */
 456 #    ifndef _STLP_NO_VENDOR_MATH_F
 457 #      ifndef __sun
 458 inline float pow(float __x, int __y) { return _STLP_CMATH_FUNC_NAMESPACE::powf(__x, __STATIC_CAST(float,__y)); }
 459 #      else
 460 inline float pow(float __x, int __y) { return ::__powf(__x, __STATIC_CAST(float,__y)); }
 461 #      endif
 462 #    else
 463 inline float pow(float __x, int __y) { return __STATIC_CAST(float, _STLP_CMATH_FUNC_NAMESPACE::pow(__x, __STATIC_CAST(float,__y))); }
 464 #    endif
 465 inline double pow(double __x, int __y) { return _STLP_CMATH_FUNC_NAMESPACE::pow(__x, __STATIC_CAST(double,__y)); }
 466 #    if !defined (_STLP_NO_LONG_DOUBLE)
 467 #      if !defined(_STLP_NO_VENDOR_MATH_L)
 468 #        ifndef __sun
 469 inline long double pow(long double __x, int __y) { return _STLP_CMATH_FUNC_NAMESPACE::powl(__x, __STATIC_CAST(long double,__y)); }
 470 #        else
 471 #          ifndef __SUNPRO_CC
 472 inline long double pow(long double __x, int __y) { return ::__powl(__x, __STATIC_CAST(long double,__y)); }
 473 #          else
 474 inline long double pow(long double __x, int __y) { return _STLP_VENDOR_CSTD::__powl(__x, __STATIC_CAST(long double,__y)); }
 475 #          endif
 476 #        endif
 477 #      else
 478 inline long double pow(long double __x, int __y) { return __STATIC_CAST(long double, _STLP_CMATH_FUNC_NAMESPACE::pow(__x, __STATIC_CAST(long double,__y))); }
 479 #      endif
 480 #    endif
 481 #  else
 482 //The MS native pow version has a bugged overload so it is not imported
 483 //in the STLport namespace.
 484 //Here is the bugged version:
 485 //inline double pow(int __x, int __y)            { return (_Pow_int(__x, __y)); }
 486 inline double      pow(double __x, int __y)      { return (_Pow_int(__x, __y)); }
 487 inline float       pow(float __x, int __y)       { return (_Pow_int(__x, __y)); }
 488 inline long double pow(long double __x, int __y) { return (_Pow_int(__x, __y)); }
 489 #  endif
 490 #endif
 491
 492 #if (defined (_STLP_MSVC) && !defined (_STLP_WCE)) || defined (__ICL) || defined (__sun)
 493 #  if defined (_STLP_MSVC) && (_STLP_MSVC >= 1400)
 494 #    pragma warning (push)
 495 #    pragma warning (disable : 4996) // hypot is deprecated.
 496 #  endif
 497 _STLP_MATH_INLINE2XX(float, hypot, hypot)
 498 inline long double hypot(long double x, long double y) { return sqrt(x * x + y * y); }
 499 #  if defined (_STLP_MSVC) && (_STLP_MSVC >= 1400)
 500 #    pragma warning (pop)
 501 #  endif
 502 #else
 503 #  if defined (_STLP_USE_UCLIBC)
 504 inline double hypot(double x, double y) { return sqrt(x * x + y * y); }
 505 _STLP_DEF_MATH_INLINE2(hypot, hypot)
 506 #  elif defined (_STLP_WCE)
 507    /* CE has a double _hypot(double,double) which we use */
 508 inline double hypot(double __x, double __y) { return _hypot(__x,__y); }
 509 _STLP_DEF_MATH_INLINE2(hypot, _hypot)
 510 #  endif
 511 #endif
 512
 513 #if defined (_STLP_RESTORE_FUNCTION_INTRINSIC)
 514 //restoration of the default intrinsic status of those functions:
 515 #  pragma intrinsic (abs, acos, asin, atan, atan2, cos, cosh, exp, fabs, fmod, log, log10, sin, sinh, sqrt, tan, tanh)
 516 #  if defined (_STLP_WCE)
 517 #    pragma intrinsic (ceil, floor)
 518 #  endif
 519 #  pragma warning(pop)
 520 #  undef _STLP_RESTORE_FUNCTION_INTRINSIC
 521 #endif // _STLP_MSVC && _STLP_MSVC <= 1300 && !_STLP_WCE && _MSC_EXTENSIONS
 522
 523 /* C++ Standard is unclear about several call to 'using ::func' if new overloads
 524  * of ::func appears between 2 successive 'using' calls. To avoid this potential
 525  * problem we provide all abs overload before the 'using' call.
 526  * Beware: This header inclusion has to be after all abs overload of this file.
 527  *         The first 'using ::abs' call is going to be in the other header.
 528  */
 529 #ifndef _STLP_INTERNAL_CSTDLIB
 530 #  include <stl/_cstdlib.h>
 531 #endif
 532
 533 #if defined (_STLP_IMPORT_VENDOR_CSTD) && !defined (_STLP_NO_CSTD_FUNCTION_IMPORTS)
 534 _STLP_BEGIN_NAMESPACE
 535 using ::abs;
 536 using ::acos;
 537 using ::asin;
 538 using ::atan;
 539 using ::atan2;
 540 using ::ceil;
 541 using ::cos;
 542 using ::cosh;
 543 using ::exp;
 544 using ::fabs;
 545 using ::floor;
 546 using ::fmod;
 547 using ::frexp;
 548 /*
 549    Because of some weird interaction between STLport headers
 550    and native HP-UX headers, when compiled with _STLP_DEBUG
 551    macro defined with aC++, hypot() is not declared.
 552    At some point we'll need to get to the bottom line of
 553    this problem.
 554 */
 555 #if !(defined(__HP_aCC) && defined(_STLP_DEBUG))
 556 using ::hypot;
 557 #endif
 558 using ::ldexp;
 559 using ::log;
 560 using ::log10;
 561 using ::modf;
 562 using ::pow;
 563 using ::sin;
 564 using ::sinh;
 565 using ::sqrt;
 566 using ::tan;
 567 using ::tanh;
 568 _STLP_END_NAMESPACE
 569 #  if defined (__BORLANDC__) && (__BORLANDC__ >= 0x560) && !defined (__linux__)
 570 using _STLP_VENDOR_CSTD::_ecvt;
 571 using _STLP_VENDOR_CSTD::_fcvt;
 572 #  endif
 573 #endif
 574
 575 #endif /* _STLP_INTERNAL_CMATH */
 576
 577 // Local Variables:
 578 // mode:C++
 579 // End: