Fix failure in testcase gfortran.dg/goacc/routine-module-mod-1.f90

This testcase prints an extra diagnostic message due to 'Default compute
dimensions (compile time)' (commit 4472e4cdcd264b8e9102a2804c0ce35a5865f7a1).

2020-07-24  Kwok Cheung Yeung  <kcy@codesourcery.com>

	gcc/testsuite/
	* gfortran.dg/goacc/routine-module-mod-1.f90 (g_1): Add
	expected output.

diff --git a/gcc/testsuite/ChangeLog.omp b/gcc/testsuite/ChangeLog.omp
index 592ed8e56f072a217d54502a83e223a51baed537..c346fdf109ce6830127e5478de87a21cbd77f284 100644 (file)
--- a/gcc/testsuite/ChangeLog.omp
+++ b/gcc/testsuite/ChangeLog.omp
@@ -1,3 +1,8 @@
+2020-07-24  Kwok Cheung Yeung  <kcy@codesourcery.com>
+
+       * gfortran.dg/goacc/routine-module-mod-1.f90 (g_1): Add
+       expected output.
+
 2020-07-24  Kwok Cheung Yeung  <kcy@codesourcery.com>
 
        * gfortran.dg/goacc/loop-2-kernels.f95: Add XFAILs.

diff --git a/gcc/testsuite/gfortran.dg/goacc/routine-module-mod-1.f90 b/gcc/testsuite/gfortran.dg/goacc/routine-module-mod-1.f90
index 23c673fe3bd1b20e8d0926bd18ae53dcdbc7f5bb..2ea4094927de4717da83bb96c1a08434911ca54f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/goacc/routine-module-mod-1.f90
+++ b/gcc/testsuite/gfortran.dg/goacc/routine-module-mod-1.f90
@@ -50,7 +50,7 @@ contains
     end do
   end subroutine w_1
 
-  subroutine g_1
+  subroutine g_1 ! { dg-warning "region is worker partitioned but does not contain worker partitioned code" }
     implicit none
     !$acc routine gang