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

commit e5cce15a5eeed3e393b2eda22240dd1f04799a7d
Author: Mikael Morin <[email protected]>
Date:   Tue Sep 9 17:17:38 2025 +0200

    Correction ifindloc1.m4

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

diff --git a/libgfortran/m4/ifindloc1.m4 b/libgfortran/m4/ifindloc1.m4
index 285dfc5adf34..4aac6d6f2bfe 100644
--- a/libgfortran/m4/ifindloc1.m4
+++ b/libgfortran/m4/ifindloc1.m4
@@ -307,7 +307,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively.  
If not, see
       result = 0;
       if (back)
        {
-         src = base + (len - 1) * delta * 'base_mult`;
+         src = (const 'atype_name` * restrict) (((char*)base) + (len - 1) * 
delta * 'base_mult`);
          msrc = mbase + (len - 1) * mdelta; 
          for (n = len; n > 0; n--)
            {

Reply via email to