------- Comment #7 from paul dot richard dot thomas at gmail dot com 2010-02-14 19:54 ------- Subject: Re: unneeded temporary (2x)
Joost, This time I beat you to it :-) Dominique's problems on fortran-dev are fixed by a test for the array_spec, which also fixes this one. As soon as somebody gives me the green light, I'll apply the patch. The present version is attached. Cheers Paul On Sun, Feb 14, 2010 at 8:27 PM, jv244 at cam dot ac dot uk <gcc-bugzi...@gcc.gnu.org> wrote: > > > ------- Comment #6 from jv244 at cam dot ac dot uk 2010-02-14 19:27 ------- > (In reply to comment #5) >> I had to exclude >> dummies but I now do not recall why. I'll look into it. > > Hi Paul, > > tested your patch at http://gcc.gnu.org/ml/fortran/2010-02/msg00106.html. > > However, this ICEs with: > > Program received signal SIGSEGV, Segmentation fault. > 0x0000000000550816 in gfc_conv_array_parameter (se=0x7fff19b82f90, > expr=0x13af600, ss=0x13b1e20, g77=1, fsym=0x0, > proc_name=0x7f450fd48ee8 "newuob", size=0x0) at > /data03/vondele/gcc_trunk/gcc/gcc/fortran/trans-array.c:5550 > 5550 if (contiguous && g77 && !this_array_result > (gdb) list > 5545 se->expr = gfc_conv_array_data (tmp); > 5546 return; > 5547 } > 5548 } > 5549 > 5550 if (contiguous && g77 && !this_array_result > 5551 && expr->symtree->n.sym->as->type != AS_ASSUMED_SHAPE) > 5552 { > 5553 gfc_conv_expr_descriptor (se, expr, ss); > 5554 if (expr->ts.type == BT_CHARACTER) > (gdb) q > > on the following reduced testcase. > > MODULE powell > INTEGER, PARAMETER :: dp=8 > TYPE opt_state_type > REAL(dp), DIMENSION(:), POINTER :: w > END TYPE opt_state_type > CONTAINS > SUBROUTINE newuoa (n,x,optstate) > TYPE(opt_state_type) :: optstate > CALL newuob (optstate%w(ixb:),optstate%w(ixo:),& > optstate%w(ivl:),optstate%w(iw:),optstate) > END SUBROUTINE newuoa > END MODULE powell > > > -- > > > http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36932 > > ------- You are receiving this mail because: ------- > You are on the CC list for the bug, or are watching someone who is. > ------- Comment #8 from paul dot richard dot thomas at gmail dot com 2010-02-14 19:54 ------- Created an attachment (id=19863) --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=19863&action=view) -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36932
