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
This commit is contained in:
parent
1ccbef7746
commit
8b956d3d38
|
@ -1,3 +1,9 @@
|
||||||
|
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>
|
2006-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
|
||||||
|
|
||||||
* gcc/testsuite/gfortran.dg/chmod_3.f90: New test.
|
* gcc/testsuite/gfortran.dg/chmod_3.f90: New test.
|
||||||
|
|
|
@ -1,7 +0,0 @@
|
||||||
! { 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
|
|
||||||
|
|
||||||
|
|
|
@ -1,7 +0,0 @@
|
||||||
! { 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
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue