From 7f4192dd3d84cb3f6584ae847eae18519d1eb76d Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Tue, 5 Oct 2021 14:28:10 +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. --- gcc/testsuite/gfortran.dg/gomp/pr43711.f90 | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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