https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93580
Bug ID: 93580
Summary: [9/10 Regression] ICE in gfc_validate_kind(): Got bad
kind
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: ---
Changed between 20181028 (rejected) and 20181104 (ICE):
$ cat z1.f90
program p
integer, parameter :: n = 4
complex(n%re) :: x
x = 2.0
end
$ gfortran-10-20200202 -c z1.f90
f951: internal compiler error: gfc_validate_kind(): Got bad kind
0x649779 gfc_report_diagnostic
../../gcc/fortran/error.c:782
0x64ae9a gfc_internal_error(char const*, ...)
../../gcc/fortran/error.c:1402
0x771065 gfc_validate_kind(bt, int, bool)
../../gcc/fortran/trans-types.c:777
0x615661 gfc_set_model_kind(int)
../../gcc/fortran/arith.c:67
0x64b8df gfc_get_constant_expr(bt, int, locus*)
../../gcc/fortran/expr.c:171
0x650d7f gfc_build_init_expr(gfc_typespec*, locus*, bool)
../../gcc/fortran/expr.c:4521
0x6bc15c build_default_init_expr
../../gcc/fortran/resolve.c:12494
0x6bc15c apply_default_init_local
../../gcc/fortran/resolve.c:12510
0x6bc15c resolve_fl_variable
../../gcc/fortran/resolve.c:12800
0x6bc15c resolve_symbol
../../gcc/fortran/resolve.c:15783
0x6dded2 do_traverse_symtree
../../gcc/fortran/symbol.c:4146
0x6b5c34 resolve_types
../../gcc/fortran/resolve.c:17123
0x6b99ec gfc_resolve(gfc_namespace*)
../../gcc/fortran/resolve.c:17238
0x6a7d5c resolve_all_program_units
../../gcc/fortran/parse.c:6245
0x6a7d5c gfc_parse_file()
../../gcc/fortran/parse.c:6492
0x6f295f gfc_be_parse_file
../../gcc/fortran/f95-lang.c:210
