diff --git a/collects/tests/racket/file.rktl b/collects/tests/racket/file.rktl
index 5c4d840c70..806ec3d886 100644
--- a/collects/tests/racket/file.rktl
+++ b/collects/tests/racket/file.rktl
@@ -403,6 +403,7 @@
 (write-char #\x out-p)
 (close-output-port out-p)
 (test 'hx with-input-from-file tempfilename read)
+(delete-file tempfilename)
 
 (arity-test call-with-input-file 2 2)
 (arity-test call-with-output-file 2 2)