X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fclos.test.sh;h=9f8d4e1c37955a5b39318a19eec17ddde2d4ff90;hb=d7875c296a4988e9f27e2776237884deb1984c62;hp=47e91a817ec04f20dda63969a95f7bd7295b6b2f;hpb=04d819bb1a2e64de4e997203b9516229bb73c686;p=sbcl.git

diff --git a/tests/clos.test.sh b/tests/clos.test.sh
index 47e91a8..9f8d4e1 100644
--- a/tests/clos.test.sh
+++ b/tests/clos.test.sh
@@ -13,9 +13,9 @@
 
 . ./expect.sh
 
-base_tmpfilename="clos-test-$$-tmp"
-tmpfilename="$base_tmpfilename.lisp"
-compiled_tmpfilename="$base_tmpfilename.fasl"
+use_test_subdirectory
+
+tmpfilename="$TEST_FILESTEM.lisp"
 
 # This should fail, but didn't until sbcl-0.6.12.7, with Martin
 # Atzmueller's port of Pierre Mai's fixes.
@@ -69,8 +69,5 @@ cat > $tmpfilename <<EOF
 EOF
 expect_clean_compile $tmpfilename
 
-rm $tmpfilename
-rm $compiled_tmpfilename
-
 # success
-exit 104
+exit $EXIT_TEST_WIN