------- Comment #3 from dominiq at lps dot ens dot fr 2008-10-22 14:24 ------- I am not 100% sure that the following is due to the patch in comment #1, but the following code segfaults (at the write) after having applied it:
integer :: i(1) = 1 integer :: foo(3) foo = 17 print *, i, foo write(*,*) foo([1]), foo([1]+i), [1]+1 end -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36091