diff --git a/poiu.asd b/poiu.asd
index 4965dff3d5d35557fed75a49a8d4e7ca626d393c..8999c3c9a24fd8a89292cea9dc7fff7a34f67a14 100644
--- a/poiu.asd
+++ b/poiu.asd
@@ -4,6 +4,7 @@
 ;;; Free Software, same MIT-style license as ASDF. See poiu.lisp.    ;;;
 ;;;                                                                  ;;;
 ;;; Copyright (c) 2001-2011 ITA Software, Inc.  All rights reserved. ;;;
+;;; Copyright (c) 2011-2012 Google, Inc.  All rights reserved.       ;;;
 ;;;                                                                  ;;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
diff --git a/poiu.lisp b/poiu.lisp
index 89a76b3a8f103d8966fb6e31d39013332628aea1..ce6e0194cbc6227736ab930f5bb60bc16bb71d2b 100644
--- a/poiu.lisp
+++ b/poiu.lisp
@@ -1,7 +1,7 @@
 ;;; This is POIU: Parallel Operator on Independent Units
 (cl:in-package :asdf)
 (eval-when (:compile-toplevel :load-toplevel :execute)
-(defparameter *poiu-version* "1.021")
+(defparameter *poiu-version* "1.022")
 (defparameter *asdf-version-required-by-poiu* "2.017.12"))
 #|
 POIU is a modification of ASDF that may operate on your systems in parallel.
@@ -372,7 +372,7 @@ Operation-executed-p is at plan execution time."))
 (progn
 
 (defun posix-exit (n)
-  (sb-unix:unix-exit n))
+  (sb-ext:quit :recklessly-p t :unix-status n))
 
 ;; Simple heuristic: if we have allocated more than the given ratio
 ;; of what is allowed between GCs, then trigger the GC.