39 lines
1.7 KiB
C
39 lines
1.7 KiB
C
|
/* Fix for missing "invalid" exceptions from floating-point
|
||
|
|
comparisons. s390 version.
|
||
|
|
Copyright (C) 2016-2022 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
|
||
|
|
<https://www.gnu.org/licenses/>. */
|
||
|
|
|
||
|
|
#ifndef FIX_FP_INT_COMPARE_INVALID_H
|
||
|
|
#define FIX_FP_INT_COMPARE_INVALID_H 1
|
||
|
|
|
||
|
|
/* GCC uses unordered comparison instructions like cebr (Short BFP COMPARE)
|
||
|
|
when it should use ordered comparison instructions like kebr
|
||
|
|
(Short BFP COMPARE AND SIGNAL) in order to raise invalid exceptions if
|
||
|
|
any operand is quiet (or signaling) NAN. See gcc bugzilla:
|
||
|
|
<https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77918>.
|
||
|
|
There exists an equivalent gcc bugzilla for Intel:
|
||
|
|
<https://gcc.gnu.org/bugzilla/show_bug.cgi?id=52451>.
|
||
|
|
This s390 gcc bug is fixed with gcc 10, thus we don't need the workaround
|
||
|
|
to call feraiseexcept (FE_INVALID) in math/s_iseqsig_template.c. */
|
||
|
|
#if __GNUC_PREREQ (10, 0)
|
||
|
|
# define FIX_COMPARE_INVALID 0
|
||
|
|
#else
|
||
|
|
# define FIX_COMPARE_INVALID 1
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#endif /* fix-fp-int-compare-invalid.h */
|