emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

feature/native-comp 2185859 4/4: * Clean-up some signal related dead-cod


From: Andrea Corallo
Subject: feature/native-comp 2185859 4/4: * Clean-up some signal related dead-code
Date: Tue, 16 Feb 2021 16:12:49 -0500 (EST)

branch: feature/native-comp
commit 21858596f0271a2215174d99c9007f6b2f1f5e21
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * Clean-up some signal related dead-code
    
        * src/comp.c (restore_sigmask): Remove function.
        (Fcomp__compile_ctxt_to_file): Remove some dead-code.
---
 src/comp.c | 25 -------------------------
 1 file changed, 25 deletions(-)

diff --git a/src/comp.c b/src/comp.c
index dae68dd..c9d1495 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -4331,13 +4331,6 @@ add_driver_options (void)
                            " and above."));
 }
 
-static void
-restore_sigmask (void)
-{
-  pthread_sigmask (SIG_SETMASK, &saved_sigset, 0);
-  unblock_input ();
-}
-
 DEFUN ("comp--compile-ctxt-to-file", Fcomp__compile_ctxt_to_file,
        Scomp__compile_ctxt_to_file,
        1, 1, 0,
@@ -4385,21 +4378,6 @@ DEFUN ("comp--compile-ctxt-to-file", 
Fcomp__compile_ctxt_to_file,
 
   ptrdiff_t count = 0;
 
-  if (!noninteractive)
-    {
-      sigset_t blocked;
-      /* Gcc doesn't like being interrupted at all.  */
-      block_input ();
-      sigemptyset (&blocked);
-      sigaddset (&blocked, SIGALRM);
-      sigaddset (&blocked, SIGINT);
-#ifdef USABLE_SIGIO
-      sigaddset (&blocked, SIGIO);
-#endif
-      pthread_sigmask (SIG_BLOCK, &blocked, &saved_sigset);
-      count = SPECPDL_INDEX ();
-      record_unwind_protect_void (restore_sigmask);
-    }
   emit_ctxt_code ();
 
   /* Define inline functions.  */
@@ -4451,9 +4429,6 @@ DEFUN ("comp--compile-ctxt-to-file", 
Fcomp__compile_ctxt_to_file,
   CALL1I (comp-clean-up-stale-eln, filename);
   CALL2I (comp-delete-or-replace-file, filename, tmp_file);
 
-  if (!noninteractive)
-    unbind_to (count, Qnil);
-
   return filename;
 }
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]