------- Comment #3 from roconnor2 at tampabay dot rr dot com 2007-05-10 01:02
-------
(In reply to comment #2)
> (In reply to comment #1)
> > Confirmed on i686-linux, for all active branches.
> >
>
> I'm not sure how you can confirm this. The program is invalid.
> a,b,c, and e are undefined in the write statement, so gfortran
> can do whateve it wants.
>
This also exhibits the bug:
program r3
integer*4 a(1025),b(1025),c(1025),d(2048),e(1022)
a = 0
b = 0
c = 0
e = 0
do i=1,2048
d(i)=i
end do
open (3,file='a',form='unformatted')
write (3) a,b,c,d,e
rewind 3
read (3) a,b,c,d
close (3)
print *,d(1)
end
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31880
