--- Comment #5 from pault at gcc dot gnu dot org 2008-05-17 07:17 ---
Fixed on trunk and 4.3.
Thanks for the report.
Paul
--
pault at gcc dot gnu dot org changed:
What|Removed |Added
---
--- Comment #4 from pault at gcc dot gnu dot org 2008-05-17 07:11 ---
Subject: Bug 35743
Author: pault
Date: Sat May 17 07:10:13 2008
New Revision: 135461
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=135461
Log:
2008-05-17 Paul Thomas <[EMAIL PROTECTED]>
Backport fr
--- Comment #3 from pault at gcc dot gnu dot org 2008-05-16 21:12 ---
Subject: Bug 35743
Author: pault
Date: Fri May 16 21:12:04 2008
New Revision: 135443
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=135443
Log:
2008-05-16 Paul Thomas <[EMAIL PROTECTED]>
PR fortran/
--
pault at gcc dot gnu dot org changed:
What|Removed |Added
AssignedTo|unassigned at gcc dot gnu |pault at gcc dot gnu dot org
|dot org
--- Comment #2 from dominiq at lps dot ens dot fr 2008-03-31 15:14 ---
The dump shows:
rg0025 (lda, nf1, nf2, nf3, nf5, nf6, mf1, mf2)
{
integer(kind=4) ubound.9;
...
D.979 = *nf6;
D.980 = *nf3;
D.981 = *nf6;
D.982 = *nf3;
D.983 = (1 - D.979) + *nf3;
num.12 = D
--- Comment #1 from dfranke at gcc dot gnu dot org 2008-03-28 23:59 ---
Confirmed. Somewhat simplified testcase:
logical lda(5)
lda = (/ (i/2*2 .ne. I, i=1,5) /)
call rg0025(lda, 1, 2, 3, 5, 6, -1, -2)
end program
SUBROUTINE RG0025(LDA,nf1,nf2,nf3,nf5,nf6,mf1,mf2)
REAL TD