diff options
| author | Tobias Burnus <tobias@codesourcery.com> | 2019-10-08 10:49:27 +0000 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2019-10-08 12:49:27 +0200 |
| commit | 8beaf167f7ca723101e87da432870b65ff521e99 (patch) | |
| tree | 0cdde010d1a0ab9f25491e6c335f5b44ee220020 /gcc/fortran/match.h | |
| parent | db4fd465197346f0023dc7821ba14da6987042c7 (diff) | |
| download | gcc-8beaf167f7ca723101e87da432870b65ff521e99.zip gcc-8beaf167f7ca723101e87da432870b65ff521e99.tar.gz gcc-8beaf167f7ca723101e87da432870b65ff521e99.tar.bz2 | |
Fortran - Improve OpenMP/OpenACC diagnostic
gcc/fortran/
* match.h (gfc_match_omp_eos_error): Renamed from gfc_match_omp_eos.
* openmp.c (gfc_match_omp_eos): Make static.
(gfc_match_omp_eos_error): New.
* parse.c (matchs, matchdo, matchds): Do as done for 'matcho' -
if error occurred after OpenMP/OpenACC directive matched, do not
try other directives.
(decode_oacc_directive, decode_omp_directive): Call new function
instead.
testsuite/
* gfortran.dg/goacc/continuation-free-form.f95: Update dg-error.
From-SVN: r276694
Diffstat (limited to 'gcc/fortran/match.h')
| -rw-r--r-- | gcc/fortran/match.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/match.h b/gcc/fortran/match.h index 1bd78b1..611d796 100644 --- a/gcc/fortran/match.h +++ b/gcc/fortran/match.h @@ -151,7 +151,7 @@ match gfc_match_oacc_exit_data (void); match gfc_match_oacc_routine (void); /* OpenMP directive matchers. */ -match gfc_match_omp_eos (void); +match gfc_match_omp_eos_error (void); match gfc_match_omp_atomic (void); match gfc_match_omp_barrier (void); match gfc_match_omp_cancel (void); |