https://gcc.gnu.org/g:39833320d43d630eecd0e2fd15014df8869b4cd3

commit 39833320d43d630eecd0e2fd15014df8869b4cd3
Author: Mikael Morin <[email protected]>
Date:   Sat Jul 25 12:15:13 2026 +0200

    Correction motif dum bind_c_array_params_2.f90

Diff:
---
 gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90 
b/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
index 1a7c2d6114f0..f3943570f979 100644
--- a/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
+++ b/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
@@ -46,7 +46,7 @@ end
 
 ! { dg-final { scan-tree-dump "if \\(idx.. <= 1\\) goto L..;" "original" } }
 ! { dg-final { scan-tree-dump "cfi...dim\\\[idx..\\\].lower_bound = 0;" 
"original" } }
-! { dg-final { scan-tree-dump {cfi..\.dim\[idx..\]\.extent = 
parm..\.dim\[idx..\]\.ubound - \(parm..\.dim\[idx..\]\.lbound - 1\);} 
"original" } }
+! { dg-final { scan-tree-dump {cfi..\.dim\[idx..\]\.extent = 
parm..\.dim\[idx..\]\.ubound - \(parm..\.dim\[idx..\]\.lbound \+ -1\);} 
"original" } }
 ! { dg-final { scan-tree-dump {cfi..\.dim\[idx..\]\.sm = 
parm..\.dim\[idx..\]\.stride \* parm..\.span;} "original" } }
 ! { dg-final { scan-tree-dump "idx.. = idx.. \\+ 1;" "original" } }

Reply via email to