https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93734
Richard Biener <rguenth at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |needs-bisection
Known to work| |10.0
Known to fail|10.0 |
--- Comment #2 from Richard Biener <rguenth at gcc dot gnu.org> ---
Hmm, it seems to be fixed on trunk.
Testcase that aborts on failure, we probably have a duplicate.
subroutine test(incx)
implicit none
integer i,incx,jx
double complex a(5),x(9),temp
a(1:4)=1
a(5)=10
x(1:9)=1
jx = 9
temp = x(9)
do i = 4,1,-1
jx = jx - incx
x(jx) = x(jx) - temp*a(i)
enddo
if (x(5).ne.0) call abort
end subroutine test
program bug
call test(2)
end program bug
