[committed] gomp/dyn_groupprivate-1.f90: Fix scan-tree-dump-times regex (was: [r16-5899 Regression] FAIL: gfortran.dg/gomp/dyn_groupprivate-1.f90 -O scan-tree-dump-times original "#pragma omp target dyn_groupprivate\\(D.4680\\)" 1 on Linux/x86_64)

Tobias Burnus <[email protected]>
Newsgroups gmane.comp.gcc.patches,gmane.comp.gcc.regression
Message-ID <[email protected]>
Haochen Jiang wrote:
> caused
>
> FAIL: gfortran.dg/gomp/dyn_groupprivate-1.f90   -O   scan-tree-dump-times original "#pragma omp target dyn_groupprivate\\(D.4680\\)" 1

When updating for other things, the 'D.[0-9]+' was replaced by D.4680, 
which is prone to fail.

Fixed in r16-5913-g1c78abfd19fe5d.

Thanks for setting up the regression checker!

Tobias
committed.diff (text/x-patch, 1.4 KB)
commit 1c78abfd19fe5de4ea68653e047029e1ea54c8aa
Author: Tobias Burnus <[email protected]>
Date:   Fri Dec 5 14:55:27 2025 +0100

    gomp/dyn_groupprivate-1.f90: Fix scan-tree-dump-times regex
    
    gcc/testsuite/ChangeLog:
    
            * gfortran.dg/gomp/dyn_groupprivate-1.f90: Fix
            scan-tree-dump-times regexp to avoid hard-coded 'D.4680'.
---
 gcc/testsuite/gfortran.dg/gomp/dyn_groupprivate-1.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/testsuite/gfortran.dg/gomp/dyn_groupprivate-1.f90 b/gcc/testsuite/gfortran.dg/gomp/dyn_groupprivate-1.f90
index 3661f142ca5..a3f86150d5e 100644
--- a/gcc/testsuite/gfortran.dg/gomp/dyn_groupprivate-1.f90
+++ b/gcc/testsuite/gfortran.dg/gomp/dyn_groupprivate-1.f90
@@ -23,7 +23,7 @@ N = 1024
 end
 
 ! { dg-final { scan-tree-dump-times "#pragma omp target dyn_groupprivate\\(1024\\)" 1 "original" } }
-! { dg-final { scan-tree-dump-times "#pragma omp target dyn_groupprivate\\(D.4680\\)" 1 "original" } }
+! { dg-final { scan-tree-dump-times "#pragma omp target dyn_groupprivate\\(D\\.\[0-9\]+\\)" 1 "original" } }
 ! { dg-final { scan-tree-dump-times "#pragma omp target dyn_groupprivate\\(fallback\\(abort\\):n\\)" 1 "original" } }
 ! { dg-final { scan-tree-dump-times "#pragma omp target dyn_groupprivate\\(fallback\\(null\\):n\\)" 1 "original" } }
 ! { dg-final { scan-tree-dump-times "#pragma omp target dyn_groupprivate\\(fallback\\(default_mem\\):n\\)" 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.