]> git.ipfire.org Git - thirdparty/glibc.git/blame - math/w_powf_compat.c
x86-64: Add vector log2/log2f implementation to libmvec
[thirdparty/glibc.git] / math / w_powf_compat.c
CommitLineData
2b778ceb 1/* Copyright (C) 2011-2021 Free Software Foundation, Inc.
0ac5ae23 2 This file is part of the GNU C Library.
f7eac6eb 3
0ac5ae23
UD
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
f7eac6eb 8
0ac5ae23
UD
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
f7eac6eb 13
0ac5ae23 14 You should have received a copy of the GNU Lesser General Public
59ba27a6 15 License along with the GNU C Library; if not, see
5a82c748 16 <https://www.gnu.org/licenses/>. */
f7eac6eb 17
9d13fb24 18#include <math.h>
9277c064 19#include <math_private.h>
813378e9 20#include <math-svid-compat.h>
5bcdb315 21#include <libm-alias-float.h>
f7eac6eb
RM
22
23
72d3d281 24#if LIBM_SVID_COMPAT && SHLIB_COMPAT (libm, GLIBC_2_0, GLIBC_2_27)
0ac5ae23
UD
25/* wrapper powf */
26float
72d3d281 27__powf_compat (float x, float y)
f7eac6eb 28{
0ac5ae23 29 float z = __ieee754_powf (x, y);
d81f90cc 30 if (__glibc_unlikely (!isfinite (z)))
0ac5ae23
UD
31 {
32 if (_LIB_VERSION != _IEEE_)
33 {
72d839a4 34 if (isfinite (x) && isfinite (y))
0ac5ae23 35 {
d81f90cc 36 if (isnan (z))
0ac5ae23
UD
37 /* pow neg**non-int */
38 return __kernel_standard_f (x, y, 124);
39 else if (x == 0.0f && y < 0.0f)
40 {
41 if (signbit (x) && signbit (z))
42 /* pow(-0.0,negative) */
43 return __kernel_standard_f (x, y, 123);
44 else
45 /* pow(+0.0,negative) */
46 return __kernel_standard_f (x, y, 143);
47 }
0d8733c4 48 else
0ac5ae23
UD
49 /* pow overflow */
50 return __kernel_standard_f (x, y, 121);
7ef90c15 51 }
f7eac6eb 52 }
0ac5ae23 53 }
72d839a4
JM
54 else if (__builtin_expect (z == 0.0f, 0)
55 && isfinite (x) && x != 0 && isfinite (y)
0ac5ae23 56 && _LIB_VERSION != _IEEE_)
72d839a4
JM
57 /* pow underflow */
58 return __kernel_standard_f (x, y, 122);
0ac5ae23
UD
59
60 return z;
f7eac6eb 61}
72d3d281 62compat_symbol (libm, __powf_compat, powf, GLIBC_2_0);
4f3647e4 63#endif