https://gcc.gnu.org/bugzilla/show_bug.cgi?id=108434
Bug ID: 108434
Summary: [12/13 Regression] ICE in class_allocatable, at
fortran/expr.cc:5000
Product: gcc
Version: 13.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Started between 20210905 and 20211121 :
(with -g or a combination of -Wall -g -O2 -fopenmp -fopenacc)
$ cat z1.f90
program p
type t
class(c), pointer :: a(2)
end type
class(t), allocatable :: x
class(t), pointer :: y
end
$ cat z2.f90
program p
type t
class(c), pointer :: a(2)
end type
class(t), pointer :: y
class(t), allocatable :: x
end
$ gfortran-13-20230115 -c z2.f90 -g
z2.f90:3:31:
3 | class(c), pointer :: a(2)
| 1
Error: Pointer array component of structure at (1) must have a deferred shape
f951: internal compiler error: Segmentation fault
0xf8734f crash_signal
../../gcc/toplev.cc:314
0x83e346 class_allocatable
../../gcc/fortran/expr.cc:5000
0x83e346 comp_allocatable
../../gcc/fortran/expr.cc:5013
0x83e346 gfc_generate_initializer(gfc_typespec*, bool)
../../gcc/fortran/expr.cc:5157
0x8139d5 gfc_find_derived_vtab(gfc_symbol*)
../../gcc/fortran/class.cc:2460
0x8bea8d resolve_fl_derived
../../gcc/fortran/resolve.cc:15210
0x8b8057 resolve_symbol
../../gcc/fortran/resolve.cc:15595
0x8d7472 do_traverse_symtree
../../gcc/fortran/symbol.cc:4186
0x8bb624 resolve_types
../../gcc/fortran/resolve.cc:17547
0x8b6a9c gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.cc:17662
0x89e844 resolve_all_program_units
../../gcc/fortran/parse.cc:6656
0x89e844 gfc_parse_file()
../../gcc/fortran/parse.cc:6912
0x8ed3af gfc_be_parse_file
../../gcc/fortran/f95-lang.cc:229
