https://gcc.gnu.org/g:333ea5a2a54a82caa555b99366e6692d6af8ecce

commit 333ea5a2a54a82caa555b99366e6692d6af8ecce
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Mon Jun 30 12:25:48 2025 +0200

    Correction format dump bind_c_array_params_2

Diff:
---
 gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90 | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

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 aa6a37b48504..c47d9f0bd1f2 100644
--- a/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
+++ b/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
@@ -30,12 +30,12 @@ end
 ! { dg-final { scan-tree-dump "parm...dtype = {.elem_len=4, .version=0, 
.rank=2, .type=1};" "original" } }
 ! { dg-final { scan-tree-dump "parm...dim\\\[0\\\].lbound = 1;" "original" } }
 ! { dg-final { scan-tree-dump "parm...dim\\\[0\\\].ubound = 4;" "original" } }
-! { dg-final { scan-tree-dump "parm...dim\\\[0\\\].stride = 1;" "original" } }
+! { dg-final { scan-tree-dump {parm..\.dim\[0\].stride = 1;} "original" } }
 ! { dg-final { scan-tree-dump "parm...dim\\\[1\\\].lbound = 1;" "original" } }
 ! { dg-final { scan-tree-dump "parm...dim\\\[1\\\].ubound = 4;" "original" } }
-! { dg-final { scan-tree-dump "parm...dim\\\[1\\\].stride = 4;" "original" } }
-! { dg-final { scan-tree-dump "parm...data = \\(void \\*\\) &aa\\\[0\\\];" 
"original" } }
-! { dg-final { scan-tree-dump "parm...offset = -5;" "original" } }
+! { dg-final { scan-tree-dump {parm..\.dim\[1\].stride = 4;} "original" } }
+! { dg-final { scan-tree-dump {parm...data = \(void \*\) &aa\[0\];} "original" 
} }
+! { dg-final { scan-tree-dump {parm..\.offset = -5;} "original" } }
 ! { dg-final { scan-tree-dump "cfi...version = 1;" "original" } }
 ! { dg-final { scan-tree-dump "cfi...rank = 2;" "original" } }
 ! { dg-final { scan-tree-dump "cfi...type = 1025;" "original" } }
@@ -46,8 +46,8 @@ 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..\\\].sm = 
parm...dim\\\[idx..\\\].stride \\* parm...span;" "original" } }
+! { dg-final { scan-tree-dump {cfi..\.dim\[idx..\].extent = 
\((?:NON_LVALUE_EXPR <)?parm..\.dim\[idx..\]\.ubound>? - (?:NON_LVALUE_EXPR 
<)?parm..\.dim\[idx..\]\.lbound>?\) \+ 1;} "original" } }
+! { dg-final { scan-tree-dump {cfi..\.dim\[idx..\].sm = (?:NON_LVALUE_EXPR 
<)?parm...dim\[idx..\].stride>? \* (?:NON_LVALUE_EXPR <)?parm..\.span>?;} 
"original" } }
 ! { dg-final { scan-tree-dump "idx.. = idx.. \\+ 1;" "original" } }
 
 ! { dg-final { scan-tree-dump "test \\(&cfi..\\);" "original" } }

Reply via email to