[Bug fortran/92977] ICE in gfc_trans_omp_atomic, at fortran/trans-openmp.c:3526

[jakub at gcc dot gnu.org]

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

--- Comment #4 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Author: jakub
Date: Wed Dec 18 23:33:54 2019
New Revision: 279554

URL: https://gcc.gnu.org/viewcvs?rev=279554&root=gcc&view=rev
Log:
        PR fortran/92977
        * frontend-passes.c (in_omp_atomic): New variable.
        (cfe_expr_0, matmul_to_var_expr, matmul_temp_args,
        inline_matmul_assign, call_external_blas): Don't optimize in
        EXEC_OMP_ATOMIC.
        (optimize_namespace): Clear in_omp_atomic.
        (gfc_code_walker): Set in_omp_atomic for EXEC_OMP_ATOMIC, save/restore
        it around.

        * gfortran.dg/gomp/pr92977.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/gomp/pr92977.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/frontend-passes.c
    trunk/gcc/testsuite/ChangeLog