From: Jerry DeLisle Date: Mon, 31 Jul 2006 00:09:16 +0000 (+0000) Subject: re PR fortran/28335 (flush() / write() statement on closed units - error?) X-Git-Tag: releases/gcc-4.2.0~1910 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=8b956d3d381610258beb367331e476698459fecf;p=thirdparty%2Fgcc.git re PR fortran/28335 (flush() / write() statement on closed units - error?) 2006-07-30 Jerry DeLisle PR libgfortran/28335 * gfortran.dg/no_unit_error_1.f90: Delete test. * gfortran.dg/no_unit_error_2.f90: Delete test. From-SVN: r115828 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index d598354d6ed4..c3a169b50b9b 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2006-07-30 Jerry DeLisle + + 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 * gcc/testsuite/gfortran.dg/chmod_3.f90: New test. diff --git a/gcc/testsuite/gfortran.dg/no_unit_error_1.f90 b/gcc/testsuite/gfortran.dg/no_unit_error_1.f90 deleted file mode 100644 index fea2875988d6..000000000000 --- a/gcc/testsuite/gfortran.dg/no_unit_error_1.f90 +++ /dev/null @@ -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 - - diff --git a/gcc/testsuite/gfortran.dg/no_unit_error_2.f90 b/gcc/testsuite/gfortran.dg/no_unit_error_2.f90 deleted file mode 100644 index 595191f9edf6..000000000000 --- a/gcc/testsuite/gfortran.dg/no_unit_error_2.f90 +++ /dev/null @@ -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 - -