0.9.1.31:

	Remove sigsetmask() calls on alpha, ppc missed out of previous
	signal rearrangement
	... (sb-sprof on ppc appears to work now :-)

diff --git a/src/runtime/alpha-arch.c b/src/runtime/alpha-arch.c
index 8cd654a..59402f1 100644 (file)
--- a/src/runtime/alpha-arch.c
+++ b/src/runtime/alpha-arch.c
@@ -279,16 +279,10 @@ static void
 sigtrap_handler(int signal, siginfo_t *siginfo, os_context_t *context)
 {
     unsigned int code;
-    sigset_t *mask;
 #ifdef LISP_FEATURE_LINUX
     os_restore_fp_control(context);
 #endif
 
-    /* Don't disallow recursive breakpoint traps.  Otherwise, we can't */
-    /* use debugger breakpoints anywhere in here. */
-    mask=(os_context_sigmask_addr(context));
-    sigsetmask(mask); 
-
     /* this is different from how CMUCL does it.  CMUCL used "call_pal
      * PAL_gentrap", which doesn't do anything on Linux (unless NL0
      * contains certain specific values).  We use "bugchk" instead.

diff --git a/src/runtime/ppc-arch.c b/src/runtime/ppc-arch.c
index df302e1..bf4b37f 100644 (file)
--- a/src/runtime/ppc-arch.c
+++ b/src/runtime/ppc-arch.c
@@ -125,12 +125,9 @@ static void
 sigtrap_handler(int signal, siginfo_t *siginfo, os_context_t *context)
 {
     u32 code;
-    sigset_t *mask;
 #ifdef LISP_FEATURE_LINUX
     os_restore_fp_control(context);
 #endif
-    mask=(os_context_sigmask_addr(context));
-    sigsetmask(mask); 
     code=*((u32 *)(*os_context_pc_addr(context)));
     if (code == ((3 << 26) | (16 << 21) | (reg_ALLOC << 16))) {
        /* twlti reg_ALLOC,0 - check for deferred interrupt */

diff --git a/version.lisp-expr b/version.lisp-expr
index c56c6b5..bbf2b92 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.9.1.30"
+"0.9.1.31"