X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fhpux-os.c;h=7737762161931c25675b49156a1304a3c2b760d9;hb=eac461c1f1ca91cfe282c779291d582ed6b336cb;hp=2d2323b935acf549dc4b8f5ade61ed7dbb4da03c;hpb=64eccd1724e5f1e638bfc574f7f376427ee3dcb1;p=sbcl.git diff --git a/src/runtime/hpux-os.c b/src/runtime/hpux-os.c index 2d2323b..7737762 100644 --- a/src/runtime/hpux-os.c +++ b/src/runtime/hpux-os.c @@ -30,7 +30,7 @@ size_t os_vm_page_size; void os_init(char *argv[], char *envp[]) { - os_vm_page_size = getpagesize(); + os_vm_page_size = BACKEND_PAGE_BYTES; } os_vm_address_t @@ -116,9 +116,8 @@ 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)) @@ -136,9 +135,9 @@ os_install_interrupt_handlers(void) } char * -os_get_runtime_executable_path() +os_get_runtime_executable_path(int external) { - return copied_string("NOPE"); + return NULL; } /* when inside call_into_lisp, we will first jump to the stub