https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83078
Bug ID: 83078
Summary: ICE in gfc_typenode_for_spec, at
fortran/trans-types.c:1110
Product: gcc
Version: 8.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With an undefined value "n" :
$ cat z1.f90
program p
implicit none
type t
integer :: a(n)
end type t
type(t) :: x = t([1, 2])
end
$ gfortran-8-20171119 -c z1.f90
z1.f90:1:0:
program p
internal compiler error: in gfc_typenode_for_spec, at
fortran/trans-types.c:1110
0x7a9ee3 gfc_typenode_for_spec(gfc_typespec*, int)
../../gcc/fortran/trans-types.c:1110
0x7aa22a gfc_sym_type(gfc_symbol*)
../../gcc/fortran/trans-types.c:2213
0x755974 gfc_get_symbol_decl(gfc_symbol*)
../../gcc/fortran/trans-decl.c:1716
0x7589c7 generate_local_decl
../../gcc/fortran/trans-decl.c:5525
0x71d9ab do_traverse_symtree
../../gcc/fortran/symbol.c:4157
0x759622 generate_local_vars
../../gcc/fortran/trans-decl.c:5725
0x759622 gfc_generate_function_code(gfc_namespace*)
../../gcc/fortran/trans-decl.c:6372
0x6eb720 translate_all_program_units
../../gcc/fortran/parse.c:6091
0x6eb720 gfc_parse_file()
../../gcc/fortran/parse.c:6294
0x72ff5f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
