6385b2a6b82a

Fix exit code
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Wed, 19 Dec 2018 10:16:08 -0500
parents a08b75bd86ad
children 674260595163
branches/tags (none)
files src/base.lisp

Changes

--- a/src/base.lisp	Tue Dec 18 21:30:00 2018 -0500
+++ b/src/base.lisp	Wed Dec 19 10:16:08 2018 -0500
@@ -449,7 +449,7 @@
   (multiple-value-bind (arguments options) (adopt:parse-options *ui*)
     (when (gethash 'help options)
       (adopt:print-usage *ui*)
-      (sb-ext:exit :code 0))
+      (adopt:exit 0))
     (when (gethash 'inform options)
       (print-version))
     (when-let ((rc (gethash 'rcfile options)))