diff options
author | Tobias Burnus <tobias@codesourcery.com> | 2021-08-18 15:21:18 +0200 |
---|---|---|
committer | Tobias Burnus <tobias@codesourcery.com> | 2021-08-18 15:24:22 +0200 |
commit | f74433e70ae94a3b5291e45fea488b1cfdee4a34 (patch) | |
tree | 86caeb8480d332f032516f9191bdd42847a65944 /gcc/fortran/parse.c | |
parent | be4a4fb516688d7cfe28a80a4aa333f4ecf0b518 (diff) | |
download | gcc-f74433e70ae94a3b5291e45fea488b1cfdee4a34.zip gcc-f74433e70ae94a3b5291e45fea488b1cfdee4a34.tar.gz gcc-f74433e70ae94a3b5291e45fea488b1cfdee4a34.tar.bz2 |
Fortran: Add OpenMP's nothing directive support
Fortran version of commit 5079b7781a2c506dcdfb241347d74c7891268225
gcc/fortran/ChangeLog:
* match.h (gfc_match_omp_nothing): New.
* openmp.c (gfc_match_omp_nothing): New.
* parse.c (decode_omp_directive): Match 'nothing' directive.
gcc/testsuite/ChangeLog:
* gfortran.dg/nothing-1.f90: New test.
* gfortran.dg/nothing-2.f90: New test.
Diffstat (limited to 'gcc/fortran/parse.c')
-rw-r--r-- | gcc/fortran/parse.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c index 24cc9bf..d004732 100644 --- a/gcc/fortran/parse.c +++ b/gcc/fortran/parse.c @@ -1005,6 +1005,9 @@ decode_omp_directive (void) ST_OMP_MASTER_TASKLOOP); matcho ("master", gfc_match_omp_master, ST_OMP_MASTER); break; + case 'n': + matcho ("nothing", gfc_match_omp_nothing, ST_NONE); + break; case 'l': matcho ("loop", gfc_match_omp_loop, ST_OMP_LOOP); break; |