re PR libfortran/31880 ([4.2 only] silent data corruption in gfortran read statement)

2007-05-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libfortran/31880
	* gfortran.dg/unf_read_corrupted_2.f90: Fix test.

From-SVN: r124591
This commit is contained in:
Jerry DeLisle 2007-05-10 03:22:40 +00:00
parent d9099df883
commit 8e3dfafeb9

View File

@ -14,7 +14,7 @@
d(i)=i
end do
open (3,file='a',form='unformatted')
open (3,form='unformatted', status="scratch")
write (3) a,b,c,d,e
rewind 3
d = 0