[gcc(refs/users/mikael/heads/refactor_descriptor_v08)] Correction minloc1.m4

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:ce719381966ba3493c46a17c6f96e80bfe110ffd

commit ce719381966ba3493c46a17c6f96e80bfe110ffd
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Tue Sep 9 20:39:20 2025 +0200

    Correction minloc1.m4

Diff:
---
 libgfortran/m4/minloc1.m4 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libgfortran/m4/minloc1.m4 b/libgfortran/m4/minloc1.m4
index 9529868939b9..02dca522dc04 100644
--- a/libgfortran/m4/minloc1.m4
+++ b/libgfortran/m4/minloc1.m4
@@ -64,8 +64,8 @@ ARRAY_FUNCTION(0,
                        minval = *src;
                        result = ('rtype_name`)n + 1;
                      }
+                   PTR_INCREMENT_BYTES (src, delta);
                  }
-               PTR_INCREMENT_BYTES (src, delta);
              }
            else
              for (; n < len; n++)