X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fgeneric%2Fparms.lisp;h=4661321a9776ad81c9cc81fd526a24938e6318f3;hb=bcd323c39d6f5f80020ba4a5d9eb8d348c6cc499;hp=ca556c201327cc5719dcd81cd94a826251f325d6;hpb=daa6f0ce672d8dc60176ff885da18e44ee0355c6;p=sbcl.git

diff --git a/src/compiler/generic/parms.lisp b/src/compiler/generic/parms.lisp
index ca556c2..4661321 100644
--- a/src/compiler/generic/parms.lisp
+++ b/src/compiler/generic/parms.lisp
@@ -124,7 +124,9 @@
     fdefinition-object
     #!+win32 sb!kernel::handle-win32-exception
     #!+sb-thruption sb!thread::run-interruption
-    #!+sb-safepoint sb!thread::enter-foreign-callback))
+    #!+sb-safepoint sb!thread::enter-foreign-callback
+    #!+(and sb-safepoint-strictly (not win32))
+    sb!unix::signal-handler-callback))
 
 (defparameter *common-static-symbols*
   '(t