]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
libgomp.fortran/uses_allocators_1.f90: Fix dg-error for r16-6273
authorTobias Burnus <tburnus@baylibre.com>
Mon, 22 Dec 2025 09:57:11 +0000 (10:57 +0100)
committerTobias Burnus <tburnus@baylibre.com>
Mon, 22 Dec 2025 09:57:11 +0000 (10:57 +0100)
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.

libgomp/testsuite/libgomp.fortran/uses_allocators_1.f90

index 4c3b136d516f73adff2697893ea68b70116b9724..dcfdabe4fc53ee4b59afced952a6559b5a31a9d5 100644 (file)
@@ -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'" }