diff options
Diffstat (limited to 'math')
-rw-r--r-- | math/Makefile | 6 | ||||
-rwxr-xr-x | math/gen-tgmath-tests.py | 2 | ||||
-rw-r--r-- | math/test-tgmath.c | 12 | ||||
-rw-r--r-- | math/tgmath.h | 5 |
4 files changed, 21 insertions, 4 deletions
diff --git a/math/Makefile b/math/Makefile index af734d4..e19f4ec 100644 --- a/math/Makefile +++ b/math/Makefile @@ -374,9 +374,9 @@ $(foreach t,$(libm-tests-base),\ tgmath3-narrow-types = f d f16 f32 f64 f128 f32x f64x tgmath3-narrow-macros = $(foreach t,$(tgmath3-narrow-types), \ $(foreach f,$(libm-narrow-fns),$(t)$(f))) -tgmath3-macros = atan2 cbrt ceil copysign erf erfc exp2 expm1 fdim floor \ - fma fmax fmin fmod frexp hypot ilogb ldexp lgamma llrint \ - llround log10 log1p log2 logb lrint lround nearbyint \ +tgmath3-macros = atan2 cbrt ceil copysign erf erfc exp10 exp2 expm1 fdim \ + floor fma fmax fmin fmod frexp hypot ilogb ldexp lgamma \ + llrint llround log10 log1p log2 logb lrint lround nearbyint \ nextafter nexttoward remainder remquo rint round scalbn \ scalbln tgamma trunc acos asin atan acosh asinh atanh cos \ sin tan cosh sinh tanh exp log pow sqrt fabs carg cimag conj \ diff --git a/math/gen-tgmath-tests.py b/math/gen-tgmath-tests.py index d433b48..53d5a54 100755 --- a/math/gen-tgmath-tests.py +++ b/math/gen-tgmath-tests.py @@ -707,6 +707,8 @@ class Tests(object): ('_Float32x', 'f32x'), ('_Float64x', 'f64x')): self.add_tests(prefix + fn, ret, ['r'] * args) + # TS 18661-4 functions. + self.add_tests('exp10', 'r', ['r']) # C2X functions. self.add_tests('fmaximum', 'r', ['r', 'r']) self.add_tests('fmaximum_mag', 'r', ['r', 'r']) diff --git a/math/test-tgmath.c b/math/test-tgmath.c index f9b5fc6..678a174 100644 --- a/math/test-tgmath.c +++ b/math/test-tgmath.c @@ -48,7 +48,7 @@ volatile int count_cdouble; volatile int count_cfloat; volatile int count_cldouble; -#define NCALLS 156 +#define NCALLS 158 #define NCALLS_INT 4 #define NCCALLS 47 @@ -253,6 +253,7 @@ F(compile_test) (void) a = log1p (log1p (x)); b = logb (logb (a)); a = exp2 (exp2 (x)); + a = exp10 (exp10 (x)); b = log2 (log2 (a)); a = pow (pow (x, a), pow (c, b)); b = sqrt (sqrt (a)); @@ -365,6 +366,7 @@ F(compile_test) (void) a = log1p (y); a = logb (y); a = exp2 (y); + a = exp10 (y); a = log2 (y); a = pow (y, y); a = sqrt (y); @@ -616,6 +618,14 @@ TYPE } TYPE +(F(exp10)) (TYPE x) +{ + ++count; + P (); + return x; +} + +TYPE (F(exp2)) (TYPE x) { ++count; diff --git a/math/tgmath.h b/math/tgmath.h index e804283..13c7022 100644 --- a/math/tgmath.h +++ b/math/tgmath.h @@ -785,6 +785,11 @@ /* Compute base-2 logarithm of X. */ #define log2(Val) __TGMATH_UNARY_REAL_ONLY (Val, log2) +#if __GLIBC_USE (IEC_60559_FUNCS_EXT_C2X) +/* Compute exponent to base ten. */ +#define exp10(Val) __TGMATH_UNARY_REAL_ONLY (Val, exp10) +#endif + /* Power functions. */ |