| /* Wrapper to set errno for j0 and y0. |
| Copyright (C) 2017-2018 Free Software Foundation, Inc. |
| This file is part of the GNU C Library. |
| |
| The GNU C Library is free software; you can redistribute it and/or |
| modify it under the terms of the GNU Lesser General Public |
| License as published by the Free Software Foundation; either |
| version 2.1 of the License, or (at your option) any later version. |
| |
| The GNU C Library is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| Lesser General Public License for more details. |
| |
| You should have received a copy of the GNU Lesser General Public |
| License along with the GNU C Library; if not, see |
| <http://www.gnu.org/licenses/>. */ |
| |
| /* Only build wrappers from the templates for the types that define the macro |
| below. This macro is set in math-type-macros-<type>.h in sysdeps/generic |
| for each floating-point type. */ |
| #if __USE_WRAPPER_TEMPLATE |
| |
| # include <errno.h> |
| # include <fenv.h> |
| # include <math.h> |
| # include <math_private.h> |
| |
| FLOAT |
| M_DECL_FUNC (__j0) (FLOAT x) |
| { |
| return M_SUF (__ieee754_j0) (x); |
| } |
| declare_mgen_alias (__j0, j0) |
| |
| FLOAT |
| M_DECL_FUNC (__y0) (FLOAT x) |
| { |
| if (__glibc_unlikely (islessequal (x, M_LIT (0.0)))) |
| { |
| if (x < 0) |
| /* Domain error: y0(x<0). */ |
| __set_errno (EDOM); |
| else if (x == 0) |
| /* Pole error: y0(0). */ |
| __set_errno (ERANGE); |
| } |
| return M_SUF (__ieee754_y0) (x); |
| } |
| declare_mgen_alias (__y0, y0) |
| |
| #endif /* __USE_WRAPPER_TEMPLATE. */ |
