From c160274456eb7bb09776b888f5274933f2ec2399 Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Mon, 26 Aug 2013 08:53:26 -0600 Subject: [PATCH] use record_unwind_protect_void, avoid warning --- src/thread.c | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/src/thread.c b/src/thread.c index 59845b6524f..ae2212e697d 100644 --- a/src/thread.c +++ b/src/thread.c @@ -220,11 +220,10 @@ mutex_lock_callback (void *arg) post_acquire_global_lock (self); } -static Lisp_Object -do_unwind_mutex_lock (Lisp_Object ignore) +static void +do_unwind_mutex_lock (void) { current_thread->event_object = Qnil; - return Qnil; } DEFUN ("mutex-lock", Fmutex_lock, Smutex_lock, 1, 1, 0, @@ -244,7 +243,7 @@ Note that calls to `mutex-lock' and `mutex-unlock' must be paired. */) lmutex = XMUTEX (mutex); current_thread->event_object = mutex; - record_unwind_protect (do_unwind_mutex_lock, Qnil); + record_unwind_protect_void (do_unwind_mutex_lock); flush_stack_call_func (mutex_lock_callback, lmutex); return unbind_to (count, Qnil); } -- 2.11.4.GIT