X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Fdynamic-extent.impure.lisp;h=ff26c1dfbd393f3cab80203dfac142c5bfadc798;hb=151b7b5db692eb7c089e92100df0b037418e8d27;hp=dd256ac08f810e63ae0368442fee0bfa13abdd34;hpb=9aa842e2eddd107b697c9bdf1c29b380f4b80853;p=sbcl.git

diff --git a/tests/dynamic-extent.impure.lisp b/tests/dynamic-extent.impure.lisp
index dd256ac..ff26c1d 100644
--- a/tests/dynamic-extent.impure.lisp
+++ b/tests/dynamic-extent.impure.lisp
@@ -12,7 +12,7 @@
 ;;;; more information.
 
 (when (eq sb-ext:*evaluator-mode* :interpret)
-  (sb-ext:quit :unix-status 104))
+  (sb-ext:exit :code 104))
 
 (load "compiler-test-util.lisp")
 (use-package :ctu)