diff options
author | Samuel Thibault <samuel.thibault@ens-lyon.org> | 2018-12-27 16:39:27 +0000 |
---|---|---|
committer | Samuel Thibault <samuel.thibault@ens-lyon.org> | 2018-12-27 16:39:27 +0000 |
commit | 52629237a522c7c146d788ddaaf69946fd2729f9 (patch) | |
tree | 552402b085cff37bc251fc0f45ed9255b53cdd57 /math/w_remainder_template.c | |
parent | 3896c5809b49e72fbadc57da2189ff42aa2a5d02 (diff) | |
parent | 064374be911f72dfaec8a75f06da1f9fc1827712 (diff) |
Merge commit 'refs/top-bases/t/hurdsig-boot-fix' into t/hurdsig-boot-fix
Diffstat (limited to 'math/w_remainder_template.c')
-rw-r--r-- | math/w_remainder_template.c | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/math/w_remainder_template.c b/math/w_remainder_template.c new file mode 100644 index 0000000000..89a891a445 --- /dev/null +++ b/math/w_remainder_template.c @@ -0,0 +1,40 @@ +/* Wrapper to set errno for remainder. + 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 (__remainder) (FLOAT x, FLOAT y) +{ + if (__glibc_unlikely (isinf (x) || y == 0) && !isnan (y) && !isnan (x)) + /* Domain error: remainder(+-Inf,y) or remainder(x,0). + If x or y are nan, these conditions should not be considered. */ + __set_errno (EDOM); + return M_SUF (__ieee754_remainder) (x, y); +} +declare_mgen_alias (__remainder, remainder) + +#endif /* __USE_WRAPPER_TEMPLATE. */ |