re PR libfortran/79956 (many new -Wmaybe-uninitialized warnings with bootstrap-O3)

[thirdparty/gcc.git] / libgfortran / generated / maxloc0_4_i1.c

diff --git a/libgfortran/generated/maxloc0_4_i1.c b/libgfortran/generated/maxloc0_4_i1.c
index 5059f23bd44c0c27b147db956aedbf61d1ef4efd..32caa2d0db7bd3e37cecafa17c486769a5af23ab 100644 (file)
--- a/libgfortran/generated/maxloc0_4_i1.c
+++ b/libgfortran/generated/maxloc0_4_i1.c
@@ -148,7 +148,7 @@ maxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
             frequently used path so probably not worth it.  */
          base -= sstride[n] * extent[n];
          n++;
-         if (n == rank)
+         if (n >= rank)
            {
              /* Break out of the loop.  */
              base = NULL;
@@ -315,7 +315,7 @@ mmaxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
          base -= sstride[n] * extent[n];
          mbase -= mstride[n] * extent[n];
          n++;
-         if (n == rank)
+         if (n >= rank)
            {
              /* Break out of the loop.  */
              base = NULL;