https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91727
Bug ID: 91727
Summary: ICE in conformable_arrays, at fortran/resolve.c:7490
Product: gcc
Version: 10.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to at least gfortran-5.
In this case, source=[1] doesn't have same rank as x%a.
$ cat z1.f90
program p
type t
class(*), allocatable :: a
end type
type(t) :: x
allocate (x%a, source=[1])
end
$ gfortran-10-20190908 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb3e7ff crash_signal
../../gcc/toplev.c:326
0x694c03 conformable_arrays
../../gcc/fortran/resolve.c:7490
0x694c03 resolve_allocate_expr
../../gcc/fortran/resolve.c:7689
0x694c03 resolve_allocate_deallocate
../../gcc/fortran/resolve.c:8189
0x687689 gfc_resolve_code(gfc_code*, gfc_namespace*)
../../gcc/fortran/resolve.c:11857
0x688cd7 resolve_codes
../../gcc/fortran/resolve.c:17107
0x688d9e gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.c:17142
0x67725c resolve_all_program_units
../../gcc/fortran/parse.c:6193
0x67725c gfc_parse_file()
../../gcc/fortran/parse.c:6440
0x6c181f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
