]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/maxloc0_4_i16.c
re PR libfortran/79956 (many new -Wmaybe-uninitialized warnings with bootstrap-O3)
[thirdparty/gcc.git] / libgfortran / generated / maxloc0_4_i16.c
index 9951ebd294ac0b1ae86eeeea8ff913e37b1b816c..fb05f9c0b5467057c8c436fd4358258974f36fb4 100644 (file)
@@ -148,7 +148,7 @@ maxloc0_4_i16 (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_i16 (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;