https://gcc.gnu.org/g:50e2c80545c26f750f9e0d97e1bc3fbbeb2c671d

commit r16-6324-g50e2c80545c26f750f9e0d97e1bc3fbbeb2c671d
Author: Tobias Burnus <[email protected]>
Date:   Mon Dec 22 10:57:11 2025 +0100

    libgomp.fortran/uses_allocators_1.f90: Fix dg-error for r16-6273
    
    Missed to commit dg-error changes for the new diagnostic due to commit
    r16-6273-g7044071f07d763   OpenMP: uses_allocators with ';'-separated list
    
    libgomp/ChangeLog:
    
            * testsuite/libgomp.fortran/uses_allocators_1.f90: Update dg-error.

Diff:
---
 libgomp/testsuite/libgomp.fortran/uses_allocators_1.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/libgomp/testsuite/libgomp.fortran/uses_allocators_1.f90 
b/libgomp/testsuite/libgomp.fortran/uses_allocators_1.f90
index 4c3b136d516f..dcfdabe4fc53 100644
--- a/libgomp/testsuite/libgomp.fortran/uses_allocators_1.f90
+++ b/libgomp/testsuite/libgomp.fortran/uses_allocators_1.f90
@@ -147,9 +147,9 @@ subroutine traits_checks
   integer(kind=omp_allocator_handle_kind) :: a1
 
   ! Sensible - but not (yet?) valid - an array constructor:
-  !$omp target uses_allocators(traits ([omp_alloctrait :: ]) : a1 )  ! { 
dg-error "Invalid character in name" }
+  !$omp target uses_allocators(traits ([omp_alloctrait :: ]) : a1 )  ! { 
dg-error "39: Expected ',', '\\)' or ';' at .1." }
   block; end block
-  !$omp target uses_allocators(a1 ([omp_alloctrait :: ]))  ! { dg-error 
"Invalid character in name" }
+  !$omp target uses_allocators(a1 ([omp_alloctrait :: ]))  ! { dg-error "35: 
Expected ',', '\\)' or ';' at .1." }
   block; end block
 
   !$omp target uses_allocators(traits (trait1) : a1 )  ! { dg-error "Traits 
array 'trait1' in USES_ALLOCATORS .1. must be a one-dimensional named constant 
array of type 'omp_alloctrait'" }

Reply via email to