From eb9c91e22df30d85aa83ad38aba2fbb09757ef7a Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Wed, 6 Oct 2021 12:06:42 +0200 Subject: [PATCH] gfortran.dg/gomp/pr43711.f90: Change dg-* for XFAIL->PASS gcc/testsuite/ * gfortran.dg/gomp/pr43711.f90: Add dg-error + dg-prune-output, remove dg-excess-errors to change XFAIL to PASS. (cherry picked from commit 7f4192dd3d84cb3f6584ae847eae18519d1eb76d) --- gcc/testsuite/ChangeLog.omp | 8 ++++++++ gcc/testsuite/gfortran.dg/gomp/pr43711.f90 | 8 ++++---- 2 files changed, 12 insertions(+), 4 deletions(-) diff --git a/gcc/testsuite/ChangeLog.omp b/gcc/testsuite/ChangeLog.omp index ecf2ed8adfdb..1027065ddf75 100644 --- a/gcc/testsuite/ChangeLog.omp +++ b/gcc/testsuite/ChangeLog.omp @@ -1,3 +1,11 @@ +2021-10-06 Tobias Burnus + + Backported from master: + 2021-10-05 Tobias Burnus + + * gfortran.dg/gomp/pr43711.f90: Add dg-error + dg-prune-output, + remove dg-excess-errors to change XFAIL to PASS. + 2021-10-01 Tobias Burnus Backported from master: diff --git a/gcc/testsuite/gfortran.dg/gomp/pr43711.f90 b/gcc/testsuite/gfortran.dg/gomp/pr43711.f90 index e47e586ea65e..d790e3e6d869 100644 --- a/gcc/testsuite/gfortran.dg/gomp/pr43711.f90 +++ b/gcc/testsuite/gfortran.dg/gomp/pr43711.f90 @@ -11,8 +11,8 @@ program NF03_2_5_2_1a print *, 'FAIL' !$omp section print *, 'FAIL' - !$omp end sections nowait nowait ! { dg-error "Unexpected junk" } - !$omp end parallel -end program NF03_2_5_2_1a + !$omp end sections nowait nowait ! { dg-error "Unexpected junk after NOWAIT clause" } + !$omp end parallel ! { dg-error "Unexpected !.OMP END PARALLEL statement" } +end program NF03_2_5_2_1a ! { dg-error "Unexpected END statement" } -! { dg-excess-errors "Unexpected" } +! { dg-prune-output "Unexpected end of file" } -- 2.47.2