[Bug fortran/85879] New: [6/7/8/9 Regression] ICE in expand_debug_locations, at cfgexpand.c:5405

[gscfq@t-online.de]

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

            Bug ID: 85879
           Summary: [6/7/8/9 Regression] ICE in expand_debug_locations, at
                    cfgexpand.c:5405
           Product: gcc
           Version: 9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

A release version needs option -g at -O[gs123] :


$ cat z1.f90
program p
   integer, pointer :: i
   integer, target :: j
   j = 2
   i => j
   !$acc parallel
   j = i
   !$acc end parallel
end


$ gfortran-5 -c z1.f90 -g -O2 -fopenacc
$
$ gfortran-9-20180520 -c z1.f90 -g -O2 -fopenacc
during RTL pass: expand
z1.f90:6:0:

    !$acc parallel

internal compiler error: in expand_debug_locations, at cfgexpand.c:5405
0x80bcca expand_debug_locations
        ../../gcc/cfgexpand.c:5401
0x80bcca execute
        ../../gcc/cfgexpand.c:6444



Configured with --enable-checking=yes :

$ gfortran-9-20180520 -c z1.f90 -g -O2 -fopenacc
z1.f90:7:0:

    j = i

Error: non-trivial conversion at assignment
integer(kind=4)
integer(kind=4) *
i.4 = *D.3808;
during GIMPLE pass: lower
z1.f90:7:0: internal compiler error: verify_gimple failed
0xd3b7bd verify_gimple_in_seq(gimple*)
        ../../gcc/tree-cfg.c:5013
0xc0d220 execute_function_todo
        ../../gcc/passes.c:1996
0xc0daf9 execute_todo
        ../../gcc/passes.c:2048