X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fstream.impure-cload.lisp;h=323881c30def2b010b92c9c129dc4926bec6f9a1;hb=c3699db2053ff3b5ac6a98d4431c3789496002d8;hp=374f466b3f408b6aa484270c57823bf048531ac9;hpb=c177b7710a9a8668f3bf8567726370b7dbb41726;p=sbcl.git

diff --git a/tests/stream.impure-cload.lisp b/tests/stream.impure-cload.lisp
index 374f466..323881c 100644
--- a/tests/stream.impure-cload.lisp
+++ b/tests/stream.impure-cload.lisp
@@ -72,3 +72,4 @@
       b))
   (format nil "1234")
   :end1 4))
+(delete-file *scratch-file-name*)