Add safepoint mechanism

[sbcl.git] / src / compiler / generic / parms.lisp

diff --git a/src/compiler/generic/parms.lisp b/src/compiler/generic/parms.lisp
index 4d793be..f720872 100644 (file)
--- a/src/compiler/generic/parms.lisp
+++ b/src/compiler/generic/parms.lisp
@@ -85,6 +85,8 @@
     *gc-pending*
     #!-sb-thread
     *stepping*
+    #!+sb-safepoint sb!impl::*gc-safe*
+    #!+sb-safepoint sb!impl::*in-safepoint*
 
     ;; threading support
     #!+sb-thread *stop-for-gc-pending*