aboutsummaryrefslogtreecommitdiff
path: root/src/connection/fork.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/connection/fork.lisp')
-rw-r--r--src/connection/fork.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection/fork.lisp b/src/connection/fork.lisp
index f55896d..2958a04 100644
--- a/src/connection/fork.lisp
+++ b/src/connection/fork.lisp
@@ -66,7 +66,7 @@ single-threaded context for the execution of POST-FORK."))
((serious-condition
(lambda (c)
(trivial-backtrace:print-backtrace c :output *error-output*)
- (uiop:quit 3))))
+ (uiop:quit 1))))
;; Handle the finaliser thread in older SBCL, before the change in
;; 2.1.8 to call *INIT-HOOKS* before starting system threads.
#+consfigurator.connection.fork::older-sbcl