[committed] libgomp.fortran/uses_allocators_1.f90: Fix dg-error for r16-6273 (was: OpenMP: uses_allocators with ';'-separated list)

[Tobias Burnus]

Tobias Burnus wrote:
Trivial patch to permit:
  uses_allocators( traits(t1): alloc1 ; traits(t2): alloc2 )
using ';' to split the items. (With commas, the modifier applies
to all list items; with semicolons, new modifiers can be specified.)

Seemingly not that trivial as I missed to include the attached dg-error 
update in the commit …

Fixed/updated two uses_allocators_1.f90 dg-error pattern in commit 
r16-6324-g50e2c80545c26f

This syntax saves typing of multiple (here: one) ') uses_allocators('
in addition.

Committed as Rev. r16-6273-g7044071f07d763.

Cherrs,

Tobias
commit 50e2c80545c26f750f9e0d97e1bc3fbbeb2c671d
Author: Tobias Burnus <tbur...@baylibre.com>
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.
---
 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 4c3b136d516..dcfdabe4fc5 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'" }