emacs-diffs
[Top][All Lists]
Advanced

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

master 7087307 1/2: Remove obsolete thread-alive-p


From: Michael Albinus
Subject: master 7087307 1/2: Remove obsolete thread-alive-p
Date: Thu, 9 Jan 2020 07:41:20 -0500 (EST)

branch: master
commit 70873074a15edbc64993f68d7cc50d2f46cc796b
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Remove obsolete thread-alive-p
    
    * etc/NEWS (thread-alive-p):
    * lisp/thread.el (thread-alive-p):
    * src/thread.c (thread-alive-p): Remove.
---
 etc/NEWS       | 6 ++++--
 lisp/thread.el | 2 --
 src/thread.c   | 3 ---
 3 files changed, 4 insertions(+), 7 deletions(-)

diff --git a/etc/NEWS b/etc/NEWS
index 0784160..b872020 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -44,10 +44,12 @@ applies, and please also update docstrings as needed.
 
 ** 'equal' no longer examines some contents of window configurations.
 Instead, it considers window configurations to be equal only if they
-are eq.  To compare contents, use compare-window-configurations
-instead.  This change helps fix a bug in sxhash-equal, which returned
+are 'eq'.  To compare contents, use 'compare-window-configurations'
+instead.  This change helps fix a bug in 'sxhash-equal', which returned
 incorrect hashes for window configurations and some other objects.
 
+** The obsolete function 'thread-alive-p' has been removed.
+
 
 * Lisp Changes in Emacs 28.1
 
diff --git a/lisp/thread.el b/lisp/thread.el
index d40d7be..00a0084 100644
--- a/lisp/thread.el
+++ b/lisp/thread.el
@@ -43,8 +43,6 @@ An EVENT has the format
             (err (cddr event)))
         (message "Error %s: %S" thread err))))
 
-(make-obsolete 'thread-alive-p 'thread-live-p "27.1")
-
 ;;; The thread list buffer and list-threads command
 
 (defcustom thread-list-refresh-seconds 0.5
diff --git a/src/thread.c b/src/thread.c
index c7fe061..df1a705 100644
--- a/src/thread.c
+++ b/src/thread.c
@@ -1114,9 +1114,6 @@ syms_of_threads (void)
       staticpro (&last_thread_error);
       last_thread_error = Qnil;
 
-      Fdefalias (intern_c_string ("thread-alive-p"),
-                intern_c_string ("thread-live-p"), Qnil);
-
       Fprovide (intern_c_string ("threads"), Qnil);
     }
 



reply via email to

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