diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2017-03-16 17:50:27 +0100 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2017-03-16 17:50:27 +0100 |
| commit | e711928b48b62d04a44c098322441fe80ea88839 (patch) | |
| tree | 6165520e5e7ddcc0273dcd874c78f170f1f5ea2f /gcc/fortran/parse.c | |
| parent | c05c23808106294ff0b6665cb4dd395a691be659 (diff) | |
| download | gcc-e711928b48b62d04a44c098322441fe80ea88839.zip gcc-e711928b48b62d04a44c098322441fe80ea88839.tar.gz gcc-e711928b48b62d04a44c098322441fe80ea88839.tar.bz2 | |
re PR fortran/80010 (diagnostics: typo $!)
PR fortran/80010
* parse.c (gfc_ascii_statement): Use !$ACC for ST_OACC_ATOMIC
and ST_OACC_END_ATOMIC, instead of !ACC.
* trans-decl.c (finish_oacc_declare): Use !$ACC instead of $!ACC.
* openmp.c (gfc_match_oacc_declare, gfc_match_oacc_wait,
gfc_resolve_oacc_declare): Likewise.
* gfortran.dg/goacc/asyncwait-3.f95: Adjust expected diagnostic.
From-SVN: r246204
Diffstat (limited to 'gcc/fortran/parse.c')
| -rw-r--r-- | gcc/fortran/parse.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c index 28fa218..305a036 100644 --- a/gcc/fortran/parse.c +++ b/gcc/fortran/parse.c @@ -2128,10 +2128,10 @@ gfc_ascii_statement (gfc_statement st) p = "!$ACC ROUTINE"; break; case ST_OACC_ATOMIC: - p = "!ACC ATOMIC"; + p = "!$ACC ATOMIC"; break; case ST_OACC_END_ATOMIC: - p = "!ACC END ATOMIC"; + p = "!$ACC END ATOMIC"; break; case ST_OMP_ATOMIC: p = "!$OMP ATOMIC"; |