[gcc(refs/users/mikael/heads/refactor_descriptor_v291.01)] Correction motif dum bind_c_array_params_2.f90

Mikael Morin via Gcc-cvs <[email protected]>
Newsgroups gmane.comp.gcc.cvs
Message-ID <[email protected]>
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" } }
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.