Permalink
Browse files

CMUCL does not support exit codes. Thus, an error is raised if the gi…

…ven code is non-zero.
  • Loading branch information...
1 parent 1e47e4e commit 13f132e6223816d3f0012ff0afdda59837669b1a @lokedhs committed Sep 4, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 dev/cmucl.lisp
View
@@ -24,4 +24,6 @@
ext:*environment-list*)))
(defun %exit (code)
- (ext:quit code))
+ (unless (zerop code)
+ (error "CMUCL does not support exit codes."))
+ (ext:quit))

0 comments on commit 13f132e

Please sign in to comment.