From 5e92e9ed61903658015c2a75c79a32ad41dbd29d Mon Sep 17 00:00:00 2001 From: Thiemo Seufer Date: Tue, 13 Sep 2005 12:28:41 +0000 Subject: [PATCH] 0.9.4.68: Some more use of preinitialized sigset_t. Minor code cleanup. --- src/runtime/interrupt.c | 12 +++++------- version.lisp-expr | 2 +- 2 files changed, 6 insertions(+), 8 deletions(-) diff --git a/src/runtime/interrupt.c b/src/runtime/interrupt.c index 7e4fa03..2be4af4 100644 --- a/src/runtime/interrupt.c +++ b/src/runtime/interrupt.c @@ -150,14 +150,14 @@ union interrupt_handler interrupt_handlers[NSIG]; * mask ought to be clear anyway most of the time, but may be non-zero * if we were interrupted e.g. while waiting for a queue. */ -void reset_signal_mask () +void reset_signal_mask(void) { sigset_t new; sigemptyset(&new); thread_sigmask(SIG_SETMASK,&new,0); } -void block_blockable_signals () +void block_blockable_signals(void) { sigset_t block; sigcopyset(&block, &blockable_sigset); @@ -169,7 +169,7 @@ void block_blockable_signals () * utility routines used by various signal handlers */ -void +static void build_fake_control_stack_frames(struct thread *th,os_context_t *context) { #ifndef LISP_FEATURE_C_STACK_IS_CONTROL_STACK @@ -1059,8 +1059,7 @@ undoably_install_low_level_interrupt_handler (int signal, else sa.sa_sigaction = handler; - sigemptyset(&sa.sa_mask); - sigaddset_blockable(&sa.sa_mask); + sigcopyset(&sa.sa_mask, &blockable_sigset); sa.sa_flags = SA_SIGINFO | SA_RESTART; #ifdef LISP_FEATURE_C_STACK_IS_CONTROL_STACK if((signal==SIG_MEMORY_FAULT) @@ -1102,8 +1101,7 @@ install_handler(int signal, void handler(int, siginfo_t*, void*)) sa.sa_sigaction = interrupt_handle_now_handler; } - sigemptyset(&sa.sa_mask); - sigaddset_blockable(&sa.sa_mask); + sigcopyset(&sa.sa_mask, &blockable_sigset); sa.sa_flags = SA_SIGINFO | SA_RESTART; sigaction(signal, &sa, NULL); } diff --git a/version.lisp-expr b/version.lisp-expr index 11eb1ac..2845ade 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.9.4.67" +"0.9.4.68" -- 1.7.10.4