https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100194
Bug ID: 100194
Summary: [9/10/11/12 Regression] ICE in
gfc_trans_create_temp_array, at
fortran/trans-array.c:1351
Product: gcc
Version: 12.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 20190113 and 20190120 :
$ cat z1.f90
subroutine s(x)
real :: x(..)
call t(x)
contains
subroutine t(y)
real, contiguous :: y(..)
end
end
$ gfortran-9-20190113 -c z1.f90
$
$ gfortran-11-20210418 -c z1.f90
z1.f90:3:12:
3 | call t(x)
| 1
internal compiler error: in gfc_trans_create_temp_array, at
fortran/trans-array.c:1351
0x73d26a gfc_trans_create_temp_array(stmtblock_t*, stmtblock_t*, gfc_ss*,
tree_node*, tree_node*, bool, bool, bool, locus*)
../../gcc/fortran/trans-array.c:1351
0x7475d2 gfc_conv_loop_setup(gfc_loopinfo*, locus*)
../../gcc/fortran/trans-array.c:5309
0x76bcee gfc_conv_subref_array_arg(gfc_se*, gfc_expr*, int, sym_intent, bool,
gfc_symbol const*, char const*, gfc_symbol*, bool)
../../gcc/fortran/trans-expr.c:4929
0x773875 gfc_conv_procedure_call(gfc_se*, gfc_symbol*, gfc_actual_arglist*,
gfc_expr*, vec<tree_node*, va_gc, vl_embed>*)
../../gcc/fortran/trans-expr.c:6450
0x7a95e8 gfc_trans_call(gfc_code*, bool, tree_node*, tree_node*, bool)
../../gcc/fortran/trans-stmt.c:424
0x739ad8 trans_code
../../gcc/fortran/trans.c:2000
0x75fd34 gfc_generate_function_code(gfc_namespace*)
../../gcc/fortran/trans-decl.c:6884
0x6e66b6 translate_all_program_units
../../gcc/fortran/parse.c:6351
0x6e66b6 gfc_parse_file()
../../gcc/fortran/parse.c:6620
0x7329cf gfc_be_parse_file
../../gcc/fortran/f95-lang.c:212
