> From: Doug Evans <xdj...@gmail.com>
> cc: guile-devel@gnu.org
> Date: Sat, 29 Aug 2015 10:22:11 -0700
>
> --- a/gdb/guile/guile.c
> +++ b/gdb/guile/guile.c
> @@ -847,7 +847,7 @@ _initialize_guile (void)
> #if HAVE_GUILE
> {
> #ifdef HAVE_SIGPROCMASK
> - sigset_t sigchld_mask, prev_mask;
> + sigset_t guile_init_mask, prev_mask;
> #endif
>
> /* The Python support puts the C side in module "_gdb", leaving the
> Python
> @@ -867,9 +867,23 @@ _initialize_guile (void)
> have SIGCHLD blocked. PR 17247.
> Really libgc and Guile should do this, but we need to work with
> libgc 7.4.x. */
> - sigemptyset (&sigchld_mask);
> - sigaddset (&sigchld_mask, SIGCHLD);
> - sigprocmask (SIG_BLOCK, &sigchld_mask, &prev_mask);
> + sigemptyset (&guile_init_mask);
> + sigaddset (&guile_init_mask, SIGCHLD);
> + /* Also block other asynchronous signals used by GDB. See event-top.c.
> + Really we want to block every signal here except for those
> specifically
> + used by Guile (e.g., GC threads), but this is safer for now. */
> + sigaddset (&guile_init_mask, SIGINT);
> + sigaddset (&guile_init_mask, SIGTERM);
> +#ifdef SIGQUIT
> + sigaddset (&guile_init_mask, SIGQUIT);
> +#endif
> +#ifdef SIGHUP
> + sigaddset (&guile_init_mask, SIGHUP);
> +#endif
> +#ifdef SIGWINCH
> + sigaddset (&guile_init_mask, SIGWINCH);
> +#endif
> + sigprocmask (SIG_BLOCK, &guile_init_mask, &prev_mask);
> #endif
What about platforms that don't have sigprocmask, but do have SIGINT?
Don't we want to block SIGINT on those platforms?
