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

gcc/testsuite/gfortran.dg/unf_read_corrupted_2.f90

@@ -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