From 8c46d17826ae89bfa22b5e8048c013c0e3a38b2d Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Tue, 27 Aug 2013 12:57:18 -0600 Subject: [PATCH] rename thread-blocker to thread--blocker --- doc/lispref/threads.texi | 7 ++++--- src/thread.c | 2 +- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/doc/lispref/threads.texi b/doc/lispref/threads.texi index 9c333546040..c846993172f 100644 --- a/doc/lispref/threads.texi +++ b/doc/lispref/threads.texi @@ -1,6 +1,6 @@ @c -*-texinfo-*- @c This is part of the GNU Emacs Lisp Reference Manual. -@c Copyright (C) 2012 +@c Copyright (C) 2012, 2013 @c Free Software Foundation, Inc. @c See the file elisp.texi for copying conditions. @node Threads @@ -101,9 +101,10 @@ Return @code{t} if @var{thread} is alive, or @code{nil} if it is not. A thread is alive as long as its function is still executing. @end defun -@defun thread-blocker thread +@defun thread--blocker thread Return the object that @var{thread} is waiting on. This function is -primarily intended for debugging. +primarily intended for debugging, and is given a ``double hyphen'' +name to indicate that. If @var{thread} is blocked in @code{thread-join}, this returns the thread for which it is waiting. diff --git a/src/thread.c b/src/thread.c index 20d0568bef5..39a21518ec6 100644 --- a/src/thread.c +++ b/src/thread.c @@ -804,7 +804,7 @@ DEFUN ("thread-alive-p", Fthread_alive_p, Sthread_alive_p, 1, 1, 0, return thread_alive_p (tstate) ? Qt : Qnil; } -DEFUN ("thread-blocker", Fthread_blocker, Sthread_blocker, 1, 1, 0, +DEFUN ("thread--blocker", Fthread_blocker, Sthread_blocker, 1, 1, 0, doc: /* Return the object that THREAD is blocking on. If THREAD is blocked in `thread-join' on a second thread, return that thread. -- 2.39.5