http://gcc.gnu.org/bugzilla/show_bug.cgi?id=49050
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Known to fail| |4.6.1, 4.7.0
--- Comment #1 from kargl at gcc dot gnu.org 2011-05-18 18:04:23 UTC ---
ev.f90: In function 'test_simple':
ev.f90:8:0: internal compiler error: in gfc_get_derived_type, at
fortran/trans-types.c:2298
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.
(gdb) bt
#0 gfc_get_derived_type (derived=0x202097380)
at ../../gcc4x/gcc/fortran/trans-types.c:2325
#1 0x00000000005451cc in gfc_get_module_backend_decl (sym=0x202097700)
at ../../gcc4x/gcc/fortran/trans-decl.c:690
#2 0x00000000005881eb in gfc_get_derived_type (derived=0x202097700)
at ../../gcc4x/gcc/fortran/trans-types.c:2216
#3 0x0000000000588752 in gfc_typenode_for_spec (spec=0x202097c60)
at ../../gcc4x/gcc/fortran/trans-types.c:1049
#4 0x000000000058888b in gfc_sym_type (sym=0x202097c40)
at ../../gcc4x/gcc/fortran/trans-types.c:1983
#5 0x00000000005498e5 in gfc_get_symbol_decl (sym=0x202097c40)
at ../../gcc4x/gcc/fortran/trans-decl.c:1303
#6 0x000000000054a722 in generate_local_decl (sym=0x202097c40)
at ../../gcc4x/gcc/fortran/trans-decl.c:4207
#7 0x00000000005155de in traverse_ns (st=0x2020073d0,
func=0x54a460 <generate_local_decl>)
at ../../gcc4x/gcc/fortran/symbol.c:3333
#8 0x00000000005155cf in traverse_ns (st=0x202007310,
func=0x54a460 <generate_local_decl>)
at ../../gcc4x/gcc/fortran/symbol.c:3330
#9 0x00000000005155cf in traverse_ns (st=0x202007340,
func=0x54a460 <generate_local_decl>)
at ../../gcc4x/gcc/fortran/symbol.c:3330
#10 0x000000000054c834 in gfc_generate_function_code (ns=0x2021ab600)
at ../../gcc4x/gcc/fortran/trans-decl.c:4900
#11 0x00000000004ed9da in gfc_parse_file ()
at ../../gcc4x/gcc/fortran/parse.c:4271
#12 0x000000000052466e in gfc_be_parse_file ()
at ../../gcc4x/gcc/fortran/f95-lang.c:250
#13 0x0000000000877ca2 in do_compile () at ../../gcc4x/gcc/toplev.c:570
#14 0x00000000008788c5 in toplev_main (argc=2, argv=0x7fffffffd508)
(gdb) list
2321 {
2322 if (c->ts.type == BT_CHARACTER)
2323 {
2324 /* Evaluate the string length. */
2325 gfc_conv_const_charlen (c->ts.u.cl);
2326 gcc_assert (c->ts.u.cl->backend_decl);
2327 }
2328
2329 field_type = gfc_typenode_for_spec (&c->ts);
2330 }
(gdb) print c->ts.u.cl->backend_decl
$6 = 0x0
(gdb) print *c->ts.u.cl
$8 = {length = 0x0, next = 0x0, length_from_typespec = 0 '\0',
backend_decl = 0x0, passed_length = 0x0, resolved = 1}
