$> cat ice.f90 MODULE kd_kd_tree_type TYPE :: kd_tree_node TYPE(kd_tree_node_private), POINTER :: p END TYPE
TYPE :: kd_tree_node_private INTEGER :: dummy END TYPE TYPE :: kd_tree TYPE(kd_tree_node) :: root END TYPE CONTAINS SUBROUTINE kd_tree_init_default(this) TYPE(kd_tree), INTENT(inout) :: this ! this = kd_tree(kd_tree_node(null())) ! correct this = kd_tree(null()) ! ICE END SUBROUTINE END MODULE $> gfortran-svn ice.f90 ice.f90: In function 'kd_tree_init_default': ice.f90:15: internal compiler error: in fold_convert, at fold-const.c:2629 Please submit a full bug report, $> gfortran-svn -v gcc version 4.3.0 20080107 (experimental) Backtrace: (gdb) bt #0 fancy_abort (file=0x87f3ec4 "../../../svn/gcc/gcc/fold-const.c", line=2629, function=0x87f8472 "fold_convert") at ../../../svn/gcc/gcc/diagnostic.c:659 #1 0x0824efd1 in fold_convert (type=0xb7d0f548, arg=0xb7cd39d8) at ../../../svn/gcc/gcc/fold-const.c:2629 #2 0x080f378b in gfc_trans_subcomponent_assign (dest=0xb7cde078, cm=0x89ba8d0, expr=0x89bb1c8) at ../../../svn/gcc/gcc/fortran/trans-expr.c:3354 #3 0x080f396a in gfc_trans_structure_assign (dest=0xb7cdd108, expr=<value optimized out>) at ../../../svn/gcc/gcc/fortran/trans-expr.c:3414 #4 0x080f3b8b in gfc_conv_structure (se=0xbfec283c, expr=0x89bb760, init=0) at ../../../svn/gcc/gcc/fortran/trans-expr.c:3441 #5 0x080ef85c in gfc_conv_expr (se=0xbfec283c, expr=0x89bb760) at ../../../svn/gcc/gcc/fortran/trans-expr.c:3563 #6 0x080f0ab0 in gfc_trans_assignment_1 (expr1=0x89bb100, expr2=0x89bb760, init_flag=0 '\0') at ../../../svn/gcc/gcc/fortran/trans-expr.c:4293 #7 0x080f0c4c in gfc_trans_assignment (expr1=0x89bb100, expr2=0x89bb760, init_flag=72 'H') at ../../../svn/gcc/gcc/fortran/trans-expr.c:4440 #8 0x080f17e1 in gfc_trans_assign (code=0x89bb7d0) at ../../../svn/gcc/gcc/fortran/trans-expr.c:4452 #9 0x080cfe90 in gfc_trans_code (code=0x89bb7d0) at ../../../svn/gcc/gcc/fortran/trans.c:994 #10 0x080e7cc2 in gfc_generate_function_code (ns=0x89ba920) at ../../../svn/gcc/gcc/fortran/trans-decl.c:3298 #11 0x080cd01a in gfc_generate_module_code (ns=0x89b9e20) at ../../../svn/gcc/gcc/fortran/trans.c:1214 #12 0x0809f219 in gfc_parse_file () at ../../../svn/gcc/gcc/fortran/parse.c:3391 #13 0x080c8985 in gfc_be_parse_file (set_yydebug=0) at ../../../svn/gcc/gcc/fortran/f95-lang.c:260 #14 0x0836c6d4 in toplev_main (argc=2, argv=0xbfec2ca4) at ../../../svn/gcc/gcc/toplev.c:1042 #15 0x08114b1f in main (argc=16, argv=0x0) at ../../../svn/gcc/gcc/main.c:35 This might be related to (or be a dupe of) PR33295. -- Summary: ICE on incorrect type constructor (fold-const.c (fold_convert):2629) Product: gcc Version: 4.3.0 Status: UNCONFIRMED Keywords: ice-on-invalid-code Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: dfranke at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34813