[Bug fortran/77374] [6/7 Regression] ICE in resolve_omp_atomic, at fortran/openmp.c:3949

[jakub at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77374

--- Comment #5 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Author: jakub
Date: Thu Sep  1 11:48:02 2016
New Revision: 239932

URL: https://gcc.gnu.org/viewcvs?rev=239932&root=gcc&view=rev
Log:
        Backported from mainline
        2016-08-31  Jakub Jelinek  <jakub@redhat.com>

        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.

        PR fortran/77374
        * gfortran.dg/gomp/pr77374.f08: New test.

Added:
    branches/gcc-6-branch/gcc/testsuite/gfortran.dg/gomp/pr77374.f08
Modified:
    branches/gcc-6-branch/gcc/fortran/ChangeLog
    branches/gcc-6-branch/gcc/fortran/openmp.c
    branches/gcc-6-branch/gcc/fortran/parse.c
    branches/gcc-6-branch/gcc/fortran/resolve.c
    branches/gcc-6-branch/gcc/testsuite/ChangeLog