https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78573
Bug ID: 78573
Summary: ICE in resolve_component, at fortran/resolve.c:13405
Product: gcc
Version: 7.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Appeared between 20161023 (no ICE) and 20161030, with invalid code :
$ cat z1.f90
program p
type t1
class(t2), pointer :: q(2)
end type
end
$ gfortran-7-20161127 z1.f90
z1.f90:3:32:
class(t2), pointer :: q(2)
1
Error: Pointer array component of structure at (1) must have a deferred shape
z1.f90:3:32:
class(t2), pointer :: q(2)
1
Error: The pointer component 'q' of 't1' at (1) is a type that has not been
declared
z1.f90:1:9:
program p
1
Error: Argument 'src' of '_copy' with PASS(src) at (1) must be of the derived
type '__class_p_T2_1_0p'
z1.f90:1:9:
program p
1
Error: Argument 'array' of '_final' with PASS(array) at (1) must be of the
derived type '__class_p_T2_1_0p'
f951: internal compiler error: Segmentation fault
0xc4532f crash_signal
../../gcc/toplev.c:333
0x7019ca resolve_component
../../gcc/fortran/resolve.c:13405
0x701c6a resolve_fl_derived0
../../gcc/fortran/resolve.c:13735
0x702037 resolve_fl_derived0
../../gcc/fortran/resolve.c:13119
0x702037 resolve_fl_derived
../../gcc/fortran/resolve.c:13812
0x6fce07 resolve_symbol
../../gcc/fortran/resolve.c:14143
0x716fbb do_traverse_symtree
../../gcc/fortran/symbol.c:3994
0x6fffba resolve_types
../../gcc/fortran/resolve.c:15945
0x6fbb0c gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.c:16058
0x6e609a resolve_all_program_units
../../gcc/fortran/parse.c:5977
0x6e609a gfc_parse_file()
../../gcc/fortran/parse.c:6224
0x729ee2 gfc_be_parse_file
../../gcc/fortran/f95-lang.c:202
