[Bug fortran/92899] New: ICE in gfc_trans_omp_atomic, at fortran/trans-openmp.c:3769

[gscfq@t-online.de]

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

            Bug ID: 92899
           Summary: ICE in gfc_trans_omp_atomic, at
                    fortran/trans-openmp.c:3769
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

An old issue, ICEs down to version 5, 4.9 seems to be ok :


$ cat z1.f90
program p
   real :: x = 1.0
   double precision :: y
   !$omp atomic capture
   y = x
   x = 2.0
   !$omp end atomic
end


$ gfortran-10-20191208 -c z1.f90 -fopenmp
z1.f90:4:0:

    4 |    !$omp atomic capture
      |
internal compiler error: in gfc_trans_omp_atomic, at
fortran/trans-openmp.c:3769
0x78a409 gfc_trans_omp_atomic
        ../../gcc/fortran/trans-openmp.c:3769
0x79a29f gfc_trans_omp_directive(gfc_code*)
        ../../gcc/fortran/trans-openmp.c:5511
0x709d77 trans_code
        ../../gcc/fortran/trans.c:2139
0x74107d gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6801
0x6bafe6 translate_all_program_units
        ../../gcc/fortran/parse.c:6302
0x6bafe6 gfc_parse_file()
        ../../gcc/fortran/parse.c:6541
0x705fcf gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:210