Foreign callbacks

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

diff --git a/src/compiler/generic/parms.lisp b/src/compiler/generic/parms.lisp
index abe0fba..ca556c2 100644 (file)
--- a/src/compiler/generic/parms.lisp
+++ b/src/compiler/generic/parms.lisp
@@ -123,7 +123,8 @@
     sb!di::handle-single-step-trap
     fdefinition-object
     #!+win32 sb!kernel::handle-win32-exception
-    #!+sb-thruption sb!thread::run-interruption))
+    #!+sb-thruption sb!thread::run-interruption
+    #!+sb-safepoint sb!thread::enter-foreign-callback))
 
 (defparameter *common-static-symbols*
   '(t