------- Comment #13 from dominiq at lps dot ens dot fr 2010-01-24 23:31 -------
I think the patch in comment #11 caused pr42858. Also the tests in comment #1
and #4 give a segmentation fault:
(gdb) run pr39304_1.f90
The program being debugged has been started already.
Start it from the beginning? (y or n) y
Starting program: /opt/gcc/gcc4.5c/libexec/gcc/x86_64-apple-darwin10/4.5.0/f951
pr39304_1.f90
matmul_k21 sd_one sd_matrix_one
Program received signal EXC_BAD_ACCESS, Could not access memory.
Reason: KERN_INVALID_ADDRESS at address: 0x0000000000000018
0x00000001000c8b8a in gfc_trans_pointer_assignment (expr1=0x14181cf70,
expr2=<value temporarily unavailable, due to optimizations>) at
../../_clean/gcc/fortran/trans-expr.c:4675
4675 gfc_add_modify (&lse.post, GFC_DECL_SPAN(decl), tmp);
(gdb) bt
#0 0x00000001000c8b8a in gfc_trans_pointer_assignment (expr1=0x14181cf70,
expr2=<value temporarily unavailable, due to optimizations>) at
../../_clean/gcc/fortran/trans-expr.c:4675
#1 0x00000001000a6ad6 in gfc_trans_code (code=0x14181db10) at
../../_clean/gcc/fortran/trans.c:1097
#2 0x00000001000c2be7 in gfc_generate_function_code (ns=<value temporarily
unavailable, due to optimizations>) at
../../_clean/gcc/fortran/trans-decl.c:4373
#3 0x00000001000a6e2b in gfc_generate_module_code (ns=<value temporarily
unavailable, due to optimizations>) at ../../_clean/gcc/fortran/trans.c:1363
#4 0x00000001000694bf in gfc_parse_file () at
../../_clean/gcc/fortran/parse.c:4212
#5 0x00000001000a1c1c in gfc_be_parse_file (set_yydebug=<value temporarily
unavailable, due to optimizations>) at ../../_clean/gcc/fortran/f95-lang.c:239
#6 0x00000001006d0cda in toplev_main (argc=2, argv=0x7fff5fbfed18) at
../../_clean/gcc/toplev.c:1053
#7 0x00000001000012a4 in start ()
The test in comment #10 gives
pr39304_3.f90:19.4:
res => x(1,1)%xx
1
Error: Different ranks in pointer assignment at (1)
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=39304
