diff --git a/src/testdir/test_writefile.in b/src/testdir/test_writefile.in
index f2dc7d5..6b354c5 100644
--- a/src/testdir/test_writefile.in
+++ b/src/testdir/test_writefile.in
@@ -13,6 +13,7 @@
 :$put =readfile(f)
 :1 delete _
 :w! test.out
+:call delete(f)
 :qa!
 ENDTEST