------- Comment #1 from dfranke at gcc dot gnu dot org 2008-01-16 20:36 ------- > function func2() > type(bar) func2 > allocate(func1%baz(1)) > end function
Here, func1 needs to be func2 to be correct. Confirmed. Backtrace: (gdb) bt #0 fancy_abort (file=0x87d843c "../../../gcc/gcc/fortran/trans-array.c", line=224, function=0x87d8e50 "gfc_conv_descriptor_dtype") at ../../../gcc/gcc/diagnostic.c:659 #1 0x080d5811 in gfc_conv_descriptor_dtype (desc=0xb7d3c6e0) at ../../../gcc/gcc/fortran/trans-array.c:224 #2 0x080dc8d3 in gfc_array_allocate (se=0xbfd4d74c, expr=0x89ba9e0, pstat=0x0) at ../../../gcc/gcc/fortran/trans-array.c:3499 #3 0x0810768b in gfc_trans_allocate (code=0x89ba958) at ../../../gcc/gcc/fortran/trans-stmt.c:3809 #4 0x080cfb30 in gfc_trans_code (code=0x89ba958) at ../../../gcc/gcc/fortran/trans.c:1082 #5 0x080e7b52 in gfc_generate_function_code (ns=0x89ba338) at ../../../gcc/gcc/fortran/trans-decl.c:3298 #6 0x080cceaa in gfc_generate_module_code (ns=0x89b8d90) at ../../../gcc/gcc/fortran/trans.c:1214 #7 0x0809f1a9 in gfc_parse_file () at ../../../gcc/gcc/fortran/parse.c:3391 #8 0x080c8815 in gfc_be_parse_file (set_yydebug=0) at ../../../gcc/gcc/fortran/f95-lang.c:260 #9 0x0836c434 in toplev_main (argc=2, argv=0xbfd4daf4) at ../../../gcc/gcc/toplev.c:1042 #10 0x0811493f in main (argc=2097162, argv=0x0) at ../../../gcc/gcc/main.c:35 -- dfranke at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |dfranke at gcc dot gnu dot | |org Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Last reconfirmed|0000-00-00 00:00:00 |2008-01-16 20:36:53 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34714