[Bug fortran/93552] New: [8/9/10 Regression] ICE in gfc_trans_exit, at fortran/trans-stmt.c:6110

[gscfq@t-online.de]

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

            Bug ID: 93552
           Summary: [8/9/10 Regression] ICE in gfc_trans_exit, at
                    fortran/trans-stmt.c:6110
           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: ---

Started with early r7 :


$ cat z1.f90
program p
   integer :: i, j
   !$acc parallel loop tile(2,2)
   do i = 1, 8
      do j = 1, 8
         exit
      end do
   end do
end


$ gfortran-6 -c z1.f90 -fopenacc
$
$ gfortran-10-20200202 -c z1.f90 -fopenacc
z1.f90:6:0:

    6 |          exit
      |
internal compiler error: in gfc_trans_exit, at fortran/trans-stmt.c:6110
0x76b975 gfc_trans_exit(gfc_code*)
        ../../gcc/fortran/trans-stmt.c:6110
0x6f6077 trans_code
        ../../gcc/fortran/trans.c:1895
0x756487 gfc_trans_omp_code
        ../../gcc/fortran/trans-openmp.c:3620
0x75f087 gfc_trans_omp_do
        ../../gcc/fortran/trans-openmp.c:4426
0x75fbb3 gfc_trans_oacc_combined_directive
        ../../gcc/fortran/trans-openmp.c:4537
0x75fce4 gfc_trans_oacc_directive(gfc_code*)
        ../../gcc/fortran/trans-openmp.c:5725
0x6f5e07 trans_code
        ../../gcc/fortran/trans.c:2158
0x71f504 gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6835
0x6a83a6 translate_all_program_units
        ../../gcc/fortran/parse.c:6306
0x6a83a6 gfc_parse_file()
        ../../gcc/fortran/parse.c:6545
0x6f295f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:210