X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Finterr.lisp;h=8fb4657fe01d0db730fc89f107a5e9170abb85f9;hb=975f1932acc3a8e90fb31d2b055bfbdde78ea927;hp=fe81a1f75034534b114b673783c32889f3576915;hpb=84c126513a68dc127ca812ac9d30a579b815b1bd;p=sbcl.git diff --git a/src/code/interr.lisp b/src/code/interr.lisp index fe81a1f..8fb4657 100644 --- a/src/code/interr.lisp +++ b/src/code/interr.lisp @@ -427,7 +427,7 @@ ;; FIXME 2: Signals are currently unblocked in ;; interrupt.c:internal_error before we do stack unwinding, can this ;; introduce a race condition? - #!+(or linux mips) + #!+(and linux mips) (sb!unix::reset-signal-mask) (let ((fp (int-sap (sb!vm:context-register alien-context sb!vm::cfp-offset)))