X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fwin32-foreign-stack-unwind.impure.lisp;h=40a63623b3353bde61ce8be50bb8ed5982fc0f1b;hb=e6d83d25e4cc19a43498703e2262ff1f60939f85;hp=43c2a3ba378a64ce09628a9dcc0bb3d2e826b1ca;hpb=4c81c652cdc32faefee1bccb84c3c9a7854e3edd;p=sbcl.git

diff --git a/tests/win32-foreign-stack-unwind.impure.lisp b/tests/win32-foreign-stack-unwind.impure.lisp
index 43c2a3b..40a6362 100755
--- a/tests/win32-foreign-stack-unwind.impure.lisp
+++ b/tests/win32-foreign-stack-unwind.impure.lisp
@@ -11,7 +11,7 @@
 ;;;; absolutely no warranty. See the COPYING and CREDITS files for
 ;;;; more information.
 
-#-win32 (quit :unix-status 104) ;; This is extremely win32-specific.
+#-win32 (exit :code 104) ;; This is extremely win32-specific.
 
 (use-package :sb-alien)