------- Additional Comments From tobi at gcc dot gnu dot org 2005-03-19 01:35 ------- Further reduction: segfaults at -O2, runs at -O0. real vx(1) num=2 do i=1,num call advance(vx) end do contains subroutine advance(bodies) real, dimension(:)::bodies bodies = 1.0 end subroutine advance end
-- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20538