X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fhpux-os.c;h=605cd8b8542b2d376e054470a2fa058c944dbefc;hb=95591ed483dbb8c0846c129953acac1554f28809;hp=ff59edce1b45d7dccb33f1ab9def716cda09028c;hpb=6eab504b0bbed5d07501e5bf12b87a3654b333db;p=sbcl.git diff --git a/src/runtime/hpux-os.c b/src/runtime/hpux-os.c index ff59edc..605cd8b 100644 --- a/src/runtime/hpux-os.c +++ b/src/runtime/hpux-os.c @@ -116,14 +116,13 @@ is_valid_lisp_addr(os_vm_address_t addr) */ static void -sigsegv_handler(int signal, siginfo_t *info, void* void_context) +sigsegv_handler(int signal, siginfo_t *info, os_context_t *context) { - os_context_t *context = arch_os_get_context(&void_context); os_vm_address_t addr = arch_get_bad_addr(signal, info, context); if (!cheneygc_handle_wp_violation(context, addr)) if (!handle_guard_page_triggered(context, addr)) - interrupt_handle_now(signal, info, context); + lisp_memory_fault_error(context, addr); *((os_context_register_t *) &((ucontext_t *) context)->uc_mcontext.ss_flags) |= SS_MODIFIEDWIDE; }