/* Wrapper to set errno for j0 and y0. Copyright (C) 2017 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. */