From: Tobias Burnus <tobias@codesourcery.com>
Date: Wed, 18 Aug 2021 19:47:04 +0000 (+0200)
Subject: Fortran: Add OpenMP's nothing directive support (con't)
X-Git-Tag: basepoints/gcc-13~5304
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=f0fca213bc52644ba896da622b35842a6157bd98;p=thirdparty%2Fgcc.git

Fortran: Add OpenMP's nothing directive support (con't)

Fix directory to enable -fopenmp processing.

gcc/testsuite/
	PR testsuite/101963
	* gfortran.dg/nothing-1.f90: Moved to ...
	* gfortran.dg/gomp/nothing-1.f90: ... here.
	* gfortran.dg/nothing-2.f90: Moved to ...
	* gfortran.dg/gomp/nothing-2.f90: ... here;
	avoid $ issue in $OMP in dg-error.
---

diff --git a/gcc/testsuite/gfortran.dg/nothing-1.f90 b/gcc/testsuite/gfortran.dg/gomp/nothing-1.f90
similarity index 100%
rename from gcc/testsuite/gfortran.dg/nothing-1.f90
rename to gcc/testsuite/gfortran.dg/gomp/nothing-1.f90
diff --git a/gcc/testsuite/gfortran.dg/nothing-2.f90 b/gcc/testsuite/gfortran.dg/gomp/nothing-2.f90
similarity index 75%
rename from gcc/testsuite/gfortran.dg/nothing-2.f90
rename to gcc/testsuite/gfortran.dg/gomp/nothing-2.f90
index 74a4a5a22b0f..554d4ef99ca3 100644
--- a/gcc/testsuite/gfortran.dg/nothing-2.f90
+++ b/gcc/testsuite/gfortran.dg/gomp/nothing-2.f90
@@ -3,5 +3,5 @@ pure subroutine foo
 end subroutine
 
 subroutine bar
-  !$omp nothing foo  ! { dg-error "Unexpected junk after $OMP NOTHING statement" }
+  !$omp nothing foo  ! { dg-error "Unexpected junk after .OMP NOTHING statement" }
 end