Commit 32c850b7 by Jerry DeLisle

2007-04-27 Jerry DeLisle

	PR libfortran/31532
	* gfortran.dg/inquire_5.f90: Update test.

From-SVN: r124254
parent 16d962d9
2007-04-27 Jerry DeLisle
PR libfortran/31532
* gfortran.dg/inquire_5.f90: Update test.
2007-04-27 Ian Lance Taylor <iant@google.com>
PR middle-end/31710
......@@ -26,6 +26,8 @@
close(7)
open(7,STATUS='SCRATCH',POSITION='REWIND')
write(7,*)'this is a record written to the file'
write(7,*)'this is another record'
backspace(7)
inquire(7,position=chr)
if (chr.NE.'ASIS') CALL ABORT
rewind(7)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment