Commit 8b956d3d by Jerry DeLisle

re PR fortran/28335 (flush() / write() statement on closed units - error?)

2006-07-30  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/28335
	* gfortran.dg/no_unit_error_1.f90: Delete test.
	* gfortran.dg/no_unit_error_2.f90: Delete test.

From-SVN: r115828
parent 1ccbef77
2006-07-30 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/28335
* gfortran.dg/no_unit_error_1.f90: Delete test.
* gfortran.dg/no_unit_error_2.f90: Delete test.
2006-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
* gcc/testsuite/gfortran.dg/chmod_3.f90: New test.
! { dg-do run }
! { dg-shouldfail "UNIT is not open before CLOSE" }
! PR28335 Check for error on no unit.
close(88) ! { dg-output "Can't find specified UNIT in CLOSE" }
end
! { dg-do run }
! { dg-shouldfail "UNIT is not open before FLUSH" }
! PR28335 Check for error on no unit.
flush(88) ! { dg-output "Can't find specified UNIT in FLUSH" }
end
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