aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/generated/maxloc1_16_m4.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/maxloc1_16_m4.c')
-rw-r--r--libgfortran/generated/maxloc1_16_m4.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/generated/maxloc1_16_m4.c b/libgfortran/generated/maxloc1_16_m4.c
index 480a524..659d6cf 100644
--- a/libgfortran/generated/maxloc1_16_m4.c
+++ b/libgfortran/generated/maxloc1_16_m4.c
@@ -147,7 +147,7 @@ maxloc1_16_m4 (gfc_array_i16 * const restrict retarray,
#if defined (GFC_UINTEGER_4_INFINITY)
maxval = -GFC_UINTEGER_4_INFINITY;
#else
- maxval = -GFC_UINTEGER_4_HUGE;
+ maxval = 0;
#endif
result = 1;
if (len <= 0)
@@ -366,7 +366,7 @@ mmaxloc1_16_m4 (gfc_array_i16 * const restrict retarray,
#if defined (GFC_UINTEGER_4_INFINITY)
maxval = -GFC_UINTEGER_4_INFINITY;
#else
- maxval = -GFC_UINTEGER_4_HUGE;
+ maxval = 0;
#endif
#if defined (GFC_UINTEGER_4_QUIET_NAN)
GFC_INTEGER_16 result2 = 0;