Adapt testcase to better catch the current message and expected follow-up messages + use the proper dg-*. — Result: XFAIL changed to PASS.
Committed as r12-4185. Probably some other testcases could be checked as well. Maybe we also find some real & unfixed bugs that way. Tobias ----------------- Siemens Electronic Design Automation GmbH; Anschrift: Arnulfstraße 201, 80634 München; Gesellschaft mit beschränkter Haftung; Geschäftsführer: Thomas Heurung, Frank Thürauf; Sitz der Gesellschaft: München; Registergericht München, HRB 106955
commit 7f4192dd3d84cb3f6584ae847eae18519d1eb76d Author: Tobias Burnus <tob...@codesourcery.com> Date: Tue Oct 5 14:28:10 2021 +0200 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. diff --git a/gcc/testsuite/gfortran.dg/gomp/pr43711.f90 b/gcc/testsuite/gfortran.dg/gomp/pr43711.f90 index e47e586ea65..d790e3e6d86 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" }