summaryrefslogtreecommitdiff
path: root/libgfortran/config/fpu-glibc.h
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/config/fpu-glibc.h')
-rw-r--r--libgfortran/config/fpu-glibc.h3
1 files changed, 2 insertions, 1 deletions
diff --git a/libgfortran/config/fpu-glibc.h b/libgfortran/config/fpu-glibc.h
index 389f9054a56..8b0801a96b6 100644
--- a/libgfortran/config/fpu-glibc.h
+++ b/libgfortran/config/fpu-glibc.h
@@ -39,7 +39,8 @@ Boston, MA 02110-1301, USA. */
void set_fpu (void)
{
- fedisableexcept (FE_ALL_EXCEPT);
+ if (FE_ALL_EXCEPT != 0)
+ fedisableexcept (FE_ALL_EXCEPT);
if (options.fpe & GFC_FPE_INVALID)
#ifdef FE_INVALID