diff mbox

[committed] Add missing cleanup in gfortran.dg/fmt_cache_1.f

Message ID 54E4F78A.4080901@mentor.com
State New
Headers show

Commit Message

Tom de Vries Feb. 18, 2015, 8:35 p.m. UTC 
Hi,

I found a fort.10 file in the test directories, and using the contents tracked 
it back to fmt_cache_1.f, which creates fort.10 but doesn't remove it. This 
patch fixes that.

Tested by running the test-case and checking that fort.10 doesn't appear anymore 
in the test directory.

Committed as obvious.

Thanks,
- Tom
diff mbox

Patch

2015-02-18  Tom de Vries  <tom@codesourcery.com>

	* gfortran.dg/fmt_cache_1.f: Add missing close.

---
 gcc/testsuite/gfortran.dg/fmt_cache_1.f | 1 +
 1 file changed, 1 insertion(+)

diff --git a/gcc/testsuite/gfortran.dg/fmt_cache_1.f b/gcc/testsuite/gfortran.dg/fmt_cache_1.f
index b9b9fe8..3344e5d 100644
--- a/gcc/testsuite/gfortran.dg/fmt_cache_1.f
+++ b/gcc/testsuite/gfortran.dg/fmt_cache_1.f
@@ -28,6 +28,7 @@ 
       teststring = ""
       read(10,'(a)') teststring
       if (teststring.ne."   arlxca =   0.00000     arlxcc =")call abort
+      close(10, status='delete')
       end program astap
 
 
-- 
1.9.1