summaryrefslogtreecommitdiff
path: root/libguile/async.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/async.c')
-rw-r--r--libguile/async.c9
1 files changed, 6 insertions, 3 deletions
diff --git a/libguile/async.c b/libguile/async.c
index 174a87afb..92ed2f4d6 100644
--- a/libguile/async.c
+++ b/libguile/async.c
@@ -148,9 +148,12 @@ SCM_DEFINE (scm_system_async_mark_for_thread, "system-async-mark", 1, 1, 0,
sleep_mutex locked while setting t->sleep_mutex and will only
unlock it again while waiting on sleep_cond.
*/
- scm_i_scm_pthread_mutex_lock (wake->mutex);
- scm_i_pthread_cond_signal (&t->sleep_cond);
- scm_i_pthread_mutex_unlock (wake->mutex);
+ if (wake->mutex)
+ {
+ scm_i_scm_pthread_mutex_lock (wake->mutex);
+ scm_i_pthread_cond_signal (&t->sleep_cond);
+ scm_i_pthread_mutex_unlock (wake->mutex);
+ }
if (wake->fd >= 0)
{