| commit | a7b3b7c4dce64ba911fbeec227d5d43c3bb995ec | |
| author | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Wed, 31 Aug 2016 18:42:08 +0000 (31 18:42 +0000) | ||
| committer | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Wed, 31 Aug 2016 18:42:08 +0000 (31 18:42 +0000) | ||
| tree | 9c780ac0e723481df09dc6e41511db61ca68b25f | treesnapshot (tar.gz zip) |
| parent | 51a43c06be6ae849a6503a3babf8603e4742e069 | commitdiff |
PR fortran/77374
* parse.c (parse_omp_oacc_atomic): Copy over cp->ext.omp_atomic
to cp->block->ext.omp_atomic.
* resolve.c (gfc_resolve_blocks): Assert block with one or two
EXEC_ASSIGNs for EXEC_*_ATOMIC.
* openmp.c (resolve_omp_atomic): Don't assert one or two
EXEC_ASSIGNs, instead return quietly for EXEC_NOPs and otherwise
error unexpected statements.
* gfortran.dg/gomp/pr77374.f08: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@239903 138bc75d-0d04-0410-961f-82ee72b054a4
* parse.c (parse_omp_oacc_atomic): Copy over cp->ext.omp_atomic
to cp->block->ext.omp_atomic.
* resolve.c (gfc_resolve_blocks): Assert block with one or two
EXEC_ASSIGNs for EXEC_*_ATOMIC.
* openmp.c (resolve_omp_atomic): Don't assert one or two
EXEC_ASSIGNs, instead return quietly for EXEC_NOPs and otherwise
error unexpected statements.
* gfortran.dg/gomp/pr77374.f08: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@239903 138bc75d-0d04-0410-961f-82ee72b054a4