]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/iany_i8.c
re PR libfortran/79956 (many new -Wmaybe-uninitialized warnings with bootstrap-O3)
[thirdparty/gcc.git] / libgfortran / generated / iany_i8.c
index a6b1c02515126cf84950fc3d6df7dfb5b7563a2d..c963165cf184ff09eaf2003a7d3ddc0a16a0cabb 100644 (file)
@@ -167,9 +167,9 @@ iany_i8 (gfc_array_i8 * 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;
            }
@@ -344,9 +344,9 @@ miany_i8 (gfc_array_i8 * 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;
            }
@@ -484,7 +484,7 @@ siany_i8 (gfc_array_i8 * 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
            {