[og9] Fix libgomp.oacc-fortran/lib-13.f90 async bug

	libgomp/
	* testsuite/libgomp.oacc-fortran/lib-13.f90: End data region after
	wait API calls.

(cherry picked from openacc-gcc-9-branch commit
c8992567df068c321e669ae27b8627f98dd08d25)

diff --git a/libgomp/ChangeLog.omp b/libgomp/ChangeLog.omp
index f9d8e6ecd39740eac2550f65b74986a843889c40..c7ef40e922c7a5a2b7bbeea6056be9f00a0ec175 100644 (file)
--- a/libgomp/ChangeLog.omp
+++ b/libgomp/ChangeLog.omp
@@ -1,3 +1,8 @@
+2019-09-05  Julian Brown  <julian@codesourcery.com>
+
+       * testsuite/libgomp.oacc-fortran/lib-13.f90: End data region after
+       wait API calls.
+
 2019-08-13  Julian Brown  <julian@codesourcery.com>
 
        * plugin/plugin-gcn.c (queue_push_callback): Wait on queue-full

diff --git a/libgomp/testsuite/libgomp.oacc-fortran/lib-13.f90 b/libgomp/testsuite/libgomp.oacc-fortran/lib-13.f90
index da944c35de9445b45865d8a15d5387d594963a96..ea35d71b789cb74998c91655955564f5c3181b1c 100644 (file)
--- a/libgomp/testsuite/libgomp.oacc-fortran/lib-13.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/lib-13.f90
@@ -19,11 +19,10 @@ program main
         end do
       !$acc end parallel
     end do
-  !$acc end data
 
   call acc_wait_all_async (nprocs + 1)
-
   call acc_wait (nprocs + 1)
+  !$acc end data
 
   if (acc_async_test (1) .neqv. .TRUE.) call abort
   if (acc_async_test (2) .neqv. .TRUE.) call abort