X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fstress-gc.sh;h=386e903deb84b986106b6b64bb719b9c1ee2e267;hb=d7875c296a4988e9f27e2776237884deb1984c62;hp=36ef3364ce7a1d7783b1f8e440d246a6b9499b42;hpb=6db5731e2db2d90cc3a6996a310dbf248ad9aebb;p=sbcl.git

diff --git a/tests/stress-gc.sh b/tests/stress-gc.sh
index 36ef336..386e903 100644
--- a/tests/stress-gc.sh
+++ b/tests/stress-gc.sh
@@ -18,7 +18,7 @@ run_sbcl <<EOF
     (load *)
     (time (stress-gc ${1:-100000} ${2:-3000}))
     (format t "~&test completed successfully~%")
-    (quit :unix-status $EXIT_LISP_WIN)
+    (exit :code $EXIT_LISP_WIN)
 EOF
 check_status_maybe_lose "stress-gc" $?
 exit $EXIT_TEST_WIN
\ No newline at end of file