aboutsummaryrefslogtreecommitdiff
path: root/math
diff options
context:
space:
mode:
Diffstat (limited to 'math')
-rw-r--r--math/Makefile6
-rwxr-xr-xmath/gen-tgmath-tests.py2
-rw-r--r--math/test-tgmath.c12
-rw-r--r--math/tgmath.h5
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. */