[committed] gfortran.dg/gomp/pr43711.f90: Change dg-* for XFAIL->PASS

[committed] gfortran.dg/gomp/pr43711.f90: Change dg-* for XFAIL->PASS

[Tobias Burnus]

[-- Attachment #1: Type: text/plain, Size: 566 bytes --]

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

[-- Attachment #2: committed.diff --]
[-- Type: text/x-patch, Size: 1171 bytes --]

commit 7f4192dd3d84cb3f6584ae847eae18519d1eb76d
Author: Tobias Burnus <tobias@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" }