Message ID | 54E4F35E.5040002@mentor.com |
---|---|
State | New |
Headers | show |
2015-02-18 Tom de Vries <tom@codesourcery.com> PR testsuite/65107 * gfortran.dg/read_eof_8.f90: Add missing close. gcc/testsuite/gfortran.dg/read_eof_8.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/gcc/testsuite/gfortran.dg/read_eof_8.f90 b/gcc/testsuite/gfortran.dg/read_eof_8.f90 index 7436a2b..86228da 100644 --- a/gcc/testsuite/gfortran.dg/read_eof_8.f90 +++ b/gcc/testsuite/gfortran.dg/read_eof_8.f90 @@ -20,6 +20,7 @@ program test enddo call abort 100 if (k /= 5) call abort + close(25, status="delete") stop 101 call abort end program test -- 1.9.1