https://gcc.gnu.org/bugzilla/show_bug.cgi?id=105807
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |gs...@t-online.de
--- Comment #2 from G. Steinmetz <gs...@t-online.de> ---
Some simplified versions :
$ cat z1.f90
program p
type, abstract :: t
end type
type, abstract :: t2
integer :: n
class(t), allocatable :: v
end type
type, extends(t2) :: elem2d
end type
type, extends(t) :: vect3d
end type
type(vect3d) :: b
class(t2), allocatable :: e
e = elem2d(10,b)
end program
$ cat z2.f90
program p
type t
end type
type t2
integer :: n
class(t), allocatable :: v
end type
type, extends(t2) :: elem2d
end type
type, extends(t) :: vect3d
end type
type(vect3d) :: b
class(t2), allocatable :: e
e = elem2d(10,b)
end program
$ gfortran-13-20220619 -c z1.f90
z1.f90:14:20:
14 | e = elem2d(10,b)
| 1
internal compiler error: in fold_convert_loc, at fold-const.cc:2593
0x9c67b3 fold_convert_loc(unsigned int, tree_node*, tree_node*)
../../gcc/fold-const.cc:2593
0x7eb806 gfc_trans_subcomponent_assign
../../gcc/fortran/trans-expr.cc:9004
0x7ec3bb gfc_trans_structure_assign(tree_node*, gfc_expr*, bool, bool)
../../gcc/fortran/trans-expr.cc:9197
0x7ebec2 gfc_trans_subcomponent_assign
../../gcc/fortran/trans-expr.cc:9021
0x7ec3bb gfc_trans_structure_assign(tree_node*, gfc_expr*, bool, bool)
../../gcc/fortran/trans-expr.cc:9197
0x7e4970 gfc_conv_structure(gfc_se*, gfc_expr*, int)
../../gcc/fortran/trans-expr.cc:9264
0x7e4cfc gfc_conv_expr(gfc_se*, gfc_expr*)
../../gcc/fortran/trans-expr.cc:9432
0x7f5f91 gfc_trans_assignment_1
../../gcc/fortran/trans-expr.cc:11700
0x7b3b67 trans_code
../../gcc/fortran/trans.cc:1950
0x7dd0be gfc_generate_function_code(gfc_namespace*)
../../gcc/fortran/trans-decl.cc:7654
0x75f53e translate_all_program_units
../../gcc/fortran/parse.cc:6669
0x75f53e gfc_parse_file()
../../gcc/fortran/parse.cc:6956
0x7acb6f gfc_be_parse_file
../../gcc/fortran/f95-lang.cc:229
