diff options
author | Andy Wingo <wingo@pobox.com> | 2012-02-08 19:57:41 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2012-02-17 12:11:14 +0100 |
commit | 6a97b1f93aace5c7c976aef51d36b3ae9cfd5630 (patch) | |
tree | d62914e464bb680663453931973aef3cb4e187b5 /libguile/async.c | |
parent | 2f745b64a1eb06e9e175a1b497d5270bebff9097 (diff) | |
download | guile-6a97b1f93aace5c7c976aef51d36b3ae9cfd5630.tar.gz |
install pthread_atfork handlers for guile's static mutexen
* libguile/async.c:
* libguile/deprecation.c:
* libguile/fluids.c:
* libguile/gc.c:
* libguile/instructions.c:
* libguile/ports.c:
* libguile/posix.c:
* libguile/strings.c:
* libguile/threads.c: Use the SCM_PTHREAD_ATFORK_LOCK_STATIC_MUTEX
mechanism to lock a number of static mutexen.
Diffstat (limited to 'libguile/async.c')
-rw-r--r-- | libguile/async.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/async.c b/libguile/async.c index 80f561d10..e8739979c 100644 --- a/libguile/async.c +++ b/libguile/async.c @@ -1,4 +1,4 @@ -/* Copyright (C) 1995,1996,1997,1998,2000,2001, 2002, 2004, 2006, 2008, 2009, 2010, 2011 Free Software Foundation, Inc. +/* Copyright (C) 1995,1996,1997,1998,2000,2001, 2002, 2004, 2006, 2008, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License @@ -133,6 +133,7 @@ SCM_DEFINE (scm_run_asyncs, "run-asyncs", 1, 0, 0, static scm_i_pthread_mutex_t async_mutex = SCM_I_PTHREAD_MUTEX_INITIALIZER; +SCM_PTHREAD_ATFORK_LOCK_STATIC_MUTEX (async_mutex); /* System asyncs. */ |