0.9.1.29:

[sbcl.git] / src / runtime / hppa-arch.c

diff --git a/src/runtime/hppa-arch.c b/src/runtime/hppa-arch.c
index 8d2ae21..aadb9a0 100644 (file)
--- a/src/runtime/hppa-arch.c
+++ b/src/runtime/hppa-arch.c
@@ -11,9 +11,9 @@
 #include <stdio.h>
 
 /* Copied from sparc-arch.c.  Not all of these are necessary, probably */
+#include "sbcl.h"
 #include "runtime.h"
 #include "arch.h"
-#include "sbcl.h"
 #include "globals.h"
 #include "validate.h"
 #include "os.h"
@@ -181,7 +181,6 @@ static void sigtrap_handler(int signal, siginfo_t *siginfo, void *void_context)
     os_context_t *context = arch_os_get_context(&void_context);
     unsigned long bad_inst;
 
-    sigprocmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
 #if 0
     printf("sigtrap_handler, pc=0x%08x, alloc=0x%08x\n", scp->sc_pcoqh,
           SC_REG(scp,reg_ALLOC));
@@ -416,11 +415,6 @@ void arch_install_interrupt_handlers(void)
     undoably_install_low_level_interrupt_handler(SIGBUS,sigbus_handler);
 }
 
-void get_spinlock(lispobj *word, int value) {
-    /* FIXME: dummy definition */
-    *word = value;
-}
-
 
 lispobj funcall0(lispobj function)
 {