X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fload.impure.lisp;h=c9eab11115a061a457bb84e0a4b0fa1a140cf0da;hb=c8cc0137e55e6179f6af344f42e54f514660f68b;hp=b54b3745c995f8284d1700a8f9b61eed0ed7548e;hpb=e9840c3696d663a186df1a7e20d15b6caf4aec86;p=sbcl.git

diff --git a/tests/load.impure.lisp b/tests/load.impure.lisp
index b54b374..c9eab11 100644
--- a/tests/load.impure.lisp
+++ b/tests/load.impure.lisp
@@ -33,3 +33,5 @@
              (assert (not (array-has-fill-pointer-p *array*)))))
       (when tmp-fasl (delete-file tmp-fasl))
       (delete-file *tmp-filename*))))
+
+(quit :unix-status 104)