diff options
| author | Tobias Burnus <tobias@codesourcery.com> | 2023-07-25 09:28:43 +0200 |
|---|---|---|
| committer | Tobias Burnus <tobias@codesourcery.com> | 2023-07-25 09:28:43 +0200 |
| commit | 50656980497d77ac12a5e7179013a6af09ba32f7 (patch) | |
| tree | f342c99a58fd49d741123f1817e0dd8688e5add0 | |
| parent | 54ce3cbd285d453b954c281bb3ad38bee2f65330 (diff) | |
| download | gcc-50656980497d77ac12a5e7179013a6af09ba32f7.zip gcc-50656980497d77ac12a5e7179013a6af09ba32f7.tar.gz gcc-50656980497d77ac12a5e7179013a6af09ba32f7.tar.bz2 | |
gfortran.dg/gomp/pr99226.f90: Add missing dg-error
Follow up to r14-2754-g2e31fe431b08b0302e1fa8a1c18ee51adafd41df
which added a check that a target region with teams does not
have anything anything else strictly nested in the target.
When changing the dg-error for this PR, somehow the addition of a
dg-error in a second line was lost (the message uses (1) and (2) as
location, showing two lines, both need a dg-error with the same message).
gcc/testsuite/ChangeLog:
* gfortran.dg/gomp/pr99226.f90: Update dg-error.
| -rw-r--r-- | gcc/testsuite/gfortran.dg/gomp/pr99226.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/gomp/pr99226.f90 b/gcc/testsuite/gfortran.dg/gomp/pr99226.f90 index 2aea0c1..d1b3507 100644 --- a/gcc/testsuite/gfortran.dg/gomp/pr99226.f90 +++ b/gcc/testsuite/gfortran.dg/gomp/pr99226.f90 @@ -3,7 +3,7 @@ subroutine sub (n) integer :: n, i !$omp target ! { dg-error "OMP TARGET region at .1. with a nested TEAMS at .2. may not contain any other statement, declaration or directive outside of the single TEAMS construct" } - !$omp teams distribute dist_schedule (static,n+4) + !$omp teams distribute dist_schedule (static,n+4) ! { dg-error "OMP TARGET region at .1. with a nested TEAMS at .2. may not contain any other statement, declaration or directive outside of the single TEAMS construct" } do i = 1, 8 end do !$omp teams distribute dist_schedule (static,n+4) |