https://gcc.gnu.org/bugzilla/show_bug.cgi?id=107000
Bug ID: 107000 Summary: ICE in gfc_real2complex, at fortran/arith.cc:2243 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: --- Affects versions down to at least r5 : $ cat z1.f90 program p complex :: x(1) x = (1.0, 2.0) * [real :: +'1'] x = (1.0, 2.0) * [real :: -'1'] end $ cat z2.f90 program p complex :: x x = (1.0, 2.0) * [real :: +'1'] x = (1.0, 2.0) * [real :: -'1'] end $ gfortran-13-20220918 -c z1.f90 f951: internal compiler error: Segmentation fault 0xf3a72f crash_signal ../../gcc/toplev.cc:314 0x7be3a1 gfc_real2complex(gfc_expr*, int) ../../gcc/fortran/arith.cc:2243 0x890cb2 gfc_convert_constant(gfc_expr*, bt, int) ../../gcc/fortran/simplify.cc:8754 0x808edb do_simplify ../../gcc/fortran/intrinsic.cc:4658 0x814a51 gfc_convert_type_warn(gfc_expr*, gfc_typespec*, int, int, bool) ../../gcc/fortran/intrinsic.cc:5384 0x7bb887 eval_intrinsic ../../gcc/fortran/arith.cc:1591 0x82e2bc match_add_operand ../../gcc/fortran/matchexp.cc:392 0x82e46c match_level_2 ../../gcc/fortran/matchexp.cc:480 0x82e5c2 match_level_3 ../../gcc/fortran/matchexp.cc:551 0x82e6b4 match_level_4 ../../gcc/fortran/matchexp.cc:599 0x82e6b4 match_and_operand ../../gcc/fortran/matchexp.cc:693 0x82e8a2 match_or_operand ../../gcc/fortran/matchexp.cc:722 0x82e972 match_equiv_operand ../../gcc/fortran/matchexp.cc:765 0x82ea44 match_level_5 ../../gcc/fortran/matchexp.cc:811 0x82de11 gfc_match_expr(gfc_expr**) ../../gcc/fortran/matchexp.cc:870 0x825450 gfc_match(char const*, ...) ../../gcc/fortran/match.cc:1131 0x8271e9 gfc_match_assignment() ../../gcc/fortran/match.cc:1330 0x851950 match_word ../../gcc/fortran/parse.cc:67 0x851950 decode_statement ../../gcc/fortran/parse.cc:363 0x85344a next_free ../../gcc/fortran/parse.cc:1399