X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fruntime%2Fruntime.c;h=573b38924cf5392e87eece5943074de5c0b876f2;hb=95591ed483dbb8c0846c129953acac1554f28809;hp=23c323f5702784fb6ed48b7d11068f906fc4d6c3;hpb=d1873cc3f7a09f9891bb9c05f206af1774876c0c;p=sbcl.git diff --git a/src/runtime/runtime.c b/src/runtime/runtime.c index 23c323f..573b389 100644 --- a/src/runtime/runtime.c +++ b/src/runtime/runtime.c @@ -43,14 +43,14 @@ #include "signal.h" #include "runtime.h" -#include "alloc.h" #include "vars.h" #include "globals.h" #include "os.h" +#include "interr.h" +#include "alloc.h" #include "interrupt.h" #include "arch.h" #include "gc.h" -#include "interr.h" #include "validate.h" #include "core.h" #include "save.h" @@ -79,10 +79,10 @@ extern void *return_from_lisp_stub; /* SIGINT handler that invokes the monitor (for when Lisp isn't up to it) */ static void -sigint_handler(int signal, siginfo_t *info, void *void_context) +sigint_handler(int signal, siginfo_t *info, os_context_t *context) { lose("\nSIGINT hit at 0x%08lX\n", - (unsigned long) *os_context_pc_addr(void_context)); + (unsigned long) *os_context_pc_addr(context)); } /* (This is not static, because we want to be able to call it from @@ -235,7 +235,7 @@ main(int argc, char *argv[], char *envp[]) const char *sbcl_home = getenv("SBCL_HOME"); interrupt_init(); - block_blockable_signals(); + block_blockable_signals(0, 0); setlocale(LC_ALL, "");