advance.f90, [...]: Delete temp file.

[gcc.git] / gcc / testsuite / gfortran.dg / advance.f90

diff --git a/gcc/testsuite/gfortran.dg/advance.f90 b/gcc/testsuite/gfortran.dg/advance.f90
index 07b605f885d205eb6a531595f08a2f1d2fc175e6..9002c52b5f75849057c139fbe61cc798bcab2344 100644 (file)
--- a/gcc/testsuite/gfortran.dg/advance.f90
+++ b/gcc/testsuite/gfortran.dg/advance.f90
@@ -9,4 +9,5 @@ program pr25463
   rewind (10)
   read (10, '(a)') str
   if (str.ne.'abc') call abort()
+  close (10, status='delete')
 end