0.9.1.59:

[sbcl.git] / src / code / gc.lisp

diff --git a/src/code/gc.lisp b/src/code/gc.lisp
index f90150f..43c2b07 100644 (file)
--- a/src/code/gc.lisp
+++ b/src/code/gc.lisp
@@ -236,7 +236,7 @@ environment these hooks may run in any thread.")
            ;; of things and not a bug.
            (when (plusp freed)
              (incf *n-bytes-freed-or-purified* freed)))
-         (sb!thread::reap-dead-threads)))
+          (sb!thread::reap-dead-threads)))
       ;; Outside the mutex, these may cause another GC. FIXME: it can
       ;; potentially exceed maximum interrupt nesting by triggering
       ;; GCs.