PR 78534, 83704 Handle large formatted I/O
[gcc.git] / libgfortran / config / fpu-aix.h
index aec7756fda506a411dc4bf6ecf11c6b4871c5c9f..88fdf1940fd1617e9a2297ea2960595e5f3a3338 100644 (file)
@@ -1,5 +1,5 @@
 /* AIX FPU-related code.
-   Copyright (C) 2005-2014 Free Software Foundation, Inc.
+   Copyright (C) 2005-2018 Free Software Foundation, Inc.
    Contributed by Francois-Xavier Coudert <coudert@clipper.ens.fr>
 
 This file is part of the GNU Fortran runtime library (libgfortran).
@@ -291,8 +291,6 @@ support_fpu_flag (int flag)
 }
 
 
-
-
 int
 get_fpu_rounding_mode (void)
 {
@@ -321,8 +319,9 @@ get_fpu_rounding_mode (void)
       case FE_TOWARDZERO:
        return GFC_FPE_TOWARDZERO;
 #endif
+
       default:
-       return GFC_FPE_INVALID;
+       return 0; /* Should be unreachable.  */
     }
 }
 
@@ -357,8 +356,9 @@ set_fpu_rounding_mode (int mode)
        rnd_mode = FE_TOWARDZERO;
        break;
 #endif
+
       default:
-       return;
+       return; /* Should be unreachable.  */
     }
 
   fesetround (rnd_mode);
@@ -399,7 +399,7 @@ support_fpu_rounding_mode (int mode)
 #endif
 
       default:
-       return 0;
+       return 0; /* Should be unreachable.  */
     }
 }