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

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

diff --git a/libgfortran/generated/maxval_i2.c b/libgfortran/generated/maxval_i2.c
index ed90dad9fa06dbb7eb99d447b23034da1b9b4f9f..3cdb5b9d3eded15291312d4d36d003a0d86badf3 100644 (file)
--- a/libgfortran/generated/maxval_i2.c
+++ b/libgfortran/generated/maxval_i2.c
@@ -181,9 +181,9 @@ maxval_i2 (gfc_array_i2 * const restrict retarray,
          base -= sstride[n] * extent[n];
          dest -= dstride[n] * extent[n];
          n++;
-         if (n == rank)
+         if (n >= rank)
            {
-             /* Break out of the look.  */
+             /* Break out of the loop.  */
              continue_loop = 0;
              break;
            }
@@ -386,9 +386,9 @@ mmaxval_i2 (gfc_array_i2 * const restrict retarray,
          mbase -= mstride[n] * extent[n];
          dest -= dstride[n] * extent[n];
          n++;
-         if (n == rank)
+         if (n >= rank)
            {
-             /* Break out of the look.  */
+             /* Break out of the loop.  */
              base = NULL;
              break;
            }
@@ -526,7 +526,7 @@ smaxval_i2 (gfc_array_i2 * const restrict retarray,
             frequently used path so probably not worth it.  */
          dest -= dstride[n] * extent[n];
          n++;
-         if (n == rank)
+         if (n >= rank)
            return;
          else
            {