6385b2a6b82a
Fix exit code
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)))