]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/all_l4.c
re PR libfortran/79956 (many new -Wmaybe-uninitialized warnings with bootstrap-O3)
[thirdparty/gcc.git] / libgfortran / generated / all_l4.c
index b3edb83b1adbe81973d5038d45e4a3341af7ec47..b57374270b51a17b250363935fc447e5efa183e9 100644 (file)
@@ -199,9 +199,9 @@ all_l4 (gfc_array_l4 * 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;
             }