X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Fstep.impure.lisp;h=9b48dc2214b7c044a3a20409cbaf84cc7493a1b2;hb=f0da2f63aa0b4e6d4dbf884854a4bf2dfdd01fc0;hp=55be2adc7d89f8d7c3a4e785234d2d96aeb46633;hpb=4ce962e92568e52624959d8abc83f609abc3605c;p=sbcl.git

diff --git a/tests/step.impure.lisp b/tests/step.impure.lisp
index 55be2ad..9b48dc2 100644
--- a/tests/step.impure.lisp
+++ b/tests/step.impure.lisp
@@ -15,7 +15,7 @@
 
 ;; No stepper support on some platforms.
 #-(or x86 x86-64 ppc sparc mips)
-(sb-ext:quit :unix-status 104)
+(sb-ext:exit :code 104)
 
 (defun fib (x)
   (declare (optimize debug))