https://gcc.gnu.org/g:0b1117d4c590b0c0e4d93d91fdfa2431c25ec8ff
commit 0b1117d4c590b0c0e4d93d91fdfa2431c25ec8ff
Author: Mikael Morin <mik...@gcc.gnu.org>
Date: Fri Mar 14 18:46:16 2025 +0100
Correction régression coarray_poly_8.f90
Diff:
---
gcc/testsuite/gfortran.dg/coarray_poly_8.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gcc/testsuite/gfortran.dg/coarray_poly_8.f90
b/gcc/testsuite/gfortran.dg/coarray_poly_8.f90
index c91801aaada7..b40cdeb0c24c 100644
--- a/gcc/testsuite/gfortran.dg/coarray_poly_8.f90
+++ b/gcc/testsuite/gfortran.dg/coarray_poly_8.f90
@@ -18,4 +18,4 @@ end
! { dg-final { scan-tree-dump-times "foo \\(struct __class_MAIN___T_1_1t &
restrict x, void \\* restrict caf_token.., integer\\(kind=\[48\]\\)
caf_offset..\\)" 1 "original" } }
! { dg-final { scan-tree-dump-times "bar \\(struct __class_MAIN___T_1_1t \\*
restrict x, void \\* restrict caf_token.., integer\\(kind=\[48\]\\)
caf_offset..\\)" 1 "original" } }
! { dg-final { scan-tree-dump-times "bar \\(0B, 0B, 0\\);" 1 "original" } }
-! { dg-final { scan-tree-dump-times {foo \\(&class.[0-9]+, (?:NON_LVALUE_EXPR
<)y._data.token>?, \(integer\(kind=[48]\)\) class.[0-9]+._data.data -
\(integer\(kind=[48]\)\) y._data.data\);} 1 "original" } }
+! { dg-final { scan-tree-dump-times {foo \(&class.[0-9]+, (?:NON_LVALUE_EXPR
<)y._data.token>?, \(integer\(kind=[48]\)\) class.[0-9]+._data.data -
\(integer\(kind=[48]\)\) y._data.data\);} 1 "original" } }
