mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-15 16:20:17 +02:00
Code Activity

(do_unlock): Renamed from "unlock", which is defined

Browse source 
in unistd.h on QNX.  (Reported by Matt Kraai.)
This commit is contained in:
Neil Jerram 2006-03-10 23:04:46 +00:00
parent e610622906
commit b82115b8ba
3 changed files with 8 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/threads.c
View file

@ -1397,7 +1397,7 @@ scm_pthread_mutex_lock (scm_i_pthread_mutex_t *mutex)
}
static void
unlock (void *data)
do_unlock (void *data)
{
scm_i_pthread_mutex_unlock ((scm_i_pthread_mutex_t *)data);
}
@ -1406,7 +1406,7 @@ void
scm_dynwind_pthread_mutex_lock (scm_i_pthread_mutex_t *mutex)
{
scm_i_scm_pthread_mutex_lock (mutex);
scm_dynwind_unwind_handler (unlock, mutex, SCM_F_WIND_EXPLICITLY);
scm_dynwind_unwind_handler (do_unlock, mutex, SCM_F_WIND_EXPLICITLY);
}
int