X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Finterrupt.h;h=d26df2855c43510310922a23ad449ccbfd5eba8d;hb=2529c316d05494f2bcdeccf98c3a6298ecd08d7d;hp=e8a23b634fef5a9d906e3185d65fae8979612851;hpb=e60863045b4bc5b7c09d54f745d5d7ecc215f477;p=sbcl.git diff --git a/src/runtime/interrupt.h b/src/runtime/interrupt.h index e8a23b6..d26df28 100644 --- a/src/runtime/interrupt.h +++ b/src/runtime/interrupt.h @@ -26,7 +26,9 @@ /* FIXME: do not rely on NSIG being a multiple of 8 */ #define REAL_SIGSET_SIZE_BYTES ((NSIG/8)) -extern void check_blockables_blocked_or_lose(); +extern void check_blockables_blocked_or_lose(void); +extern void check_gc_signals_unblocked_or_lose(void); +extern void unblock_gc_signals(void); static inline void sigcopyset(sigset_t *new, sigset_t *old) @@ -60,7 +62,7 @@ struct interrupt_data { }; -extern void interrupt_init(); +extern void interrupt_init(void); extern void fake_foreign_function_call(os_context_t* context); extern void undo_fake_foreign_function_call(os_context_t* context); extern void arrange_return_to_lisp_function(os_context_t *, lispobj); @@ -80,13 +82,12 @@ extern void do_pending_interrupt(void); extern void interrupt_thread_handler(int, siginfo_t*, void*); extern void sig_stop_for_gc_handler(int, siginfo_t*, void*); #endif -extern void undoably_install_low_level_interrupt_handler (int signal, - void - handler(int, - siginfo_t*, - void*)); +typedef void (*interrupt_handler_t)(int, siginfo_t *, void *); +extern void undoably_install_low_level_interrupt_handler ( + int signal, + interrupt_handler_t handler); extern unsigned long install_handler(int signal, - void handler(int, siginfo_t*, void*)); + interrupt_handler_t handler); extern union interrupt_handler interrupt_handlers[NSIG]; @@ -95,7 +96,7 @@ extern void sigaddset_deferrable(sigset_t *s); /* Set all blockable signals into *s. */ extern void sigaddset_blockable(sigset_t *s); -extern void block_blockable_signals(); +extern void block_blockable_signals(void); /* The void* casting here avoids having to mess with the various types * of function argument lists possible for signal handlers: @@ -104,7 +105,7 @@ extern void block_blockable_signals(); * "cleanly" with union types is in fact a mess. */ #define ARE_SAME_HANDLER(x, y) ((void*)(x) == (void*)(y)) -extern boolean maybe_handle_trap(os_context_t *context, int trap); +extern void handle_trap(os_context_t *context, int trap); #ifndef LISP_FEATURE_WIN32 extern void lisp_memory_fault_error(os_context_t *context, os_vm_address_t addr);