aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/generated/maxloc1_4_m8.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/maxloc1_4_m8.c')
-rw-r--r--libgfortran/generated/maxloc1_4_m8.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/generated/maxloc1_4_m8.c b/libgfortran/generated/maxloc1_4_m8.c
index 1f39517..e2f92a9 100644
--- a/libgfortran/generated/maxloc1_4_m8.c
+++ b/libgfortran/generated/maxloc1_4_m8.c
@@ -147,7 +147,7 @@ maxloc1_4_m8 (gfc_array_i4 * const restrict retarray,
#if defined (GFC_UINTEGER_8_INFINITY)
maxval = -GFC_UINTEGER_8_INFINITY;
#else
- maxval = -GFC_UINTEGER_8_HUGE;
+ maxval = 0;
#endif
result = 1;
if (len <= 0)
@@ -366,7 +366,7 @@ mmaxloc1_4_m8 (gfc_array_i4 * const restrict retarray,
#if defined (GFC_UINTEGER_8_INFINITY)
maxval = -GFC_UINTEGER_8_INFINITY;
#else
- maxval = -GFC_UINTEGER_8_HUGE;
+ maxval = 0;
#endif
#if defined (GFC_UINTEGER_8_QUIET_NAN)
GFC_INTEGER_4 result2 = 0;