Use safepoints for INTERRUPT-THREAD

[sbcl.git] / src / code / early-impl.lisp

diff --git a/src/code/early-impl.lisp b/src/code/early-impl.lisp
index 7f0ff41..6de6698 100644 (file)
--- a/src/code/early-impl.lisp
+++ b/src/code/early-impl.lisp
@@ -42,6 +42,7 @@
                   sb!unix::*unblock-deferrables-on-enabling-interrupts-p*
                   *interrupts-enabled*
                   *interrupt-pending*
+                  #!+sb-thruption *thruption-pending*
                   #!+sb-safepoint *gc-safe*
                   #!+sb-safepoint *in-safepoint*
                   *free-interrupt-context-index*