From 78239acff60e74fa02ffbccc37ec710ad92be064 Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Sun, 8 Jan 2017 12:27:26 +0100
Subject: Remove thread-specific admin mutex

* libguile/threads.c (guilify_self_1):
* libguile/threads.h (scm_i_thread): Remove unused thread "admin
  mutex".
---
 libguile/threads.c | 1 -
 libguile/threads.h | 2 --
 2 files changed, 3 deletions(-)

diff --git a/libguile/threads.c b/libguile/threads.c
index 48a91e84f..b46a71b42 100644
--- a/libguile/threads.c
+++ b/libguile/threads.c
@@ -408,7 +408,6 @@ guilify_self_1 (struct GC_stack_base *base)
        currently have type `void'.  */
     abort ();
 
-  scm_i_pthread_mutex_init (&t.admin_mutex, NULL);
   t.exited = 0;
   t.guile_mode = 0;
 
diff --git a/libguile/threads.h b/libguile/threads.h
index e09a2ef3a..645e5eb65 100644
--- a/libguile/threads.h
+++ b/libguile/threads.h
@@ -54,8 +54,6 @@ typedef struct scm_i_thread {
   SCM handle;
   scm_i_pthread_t pthread;
 
-  scm_i_pthread_mutex_t admin_mutex;
-
   SCM result;
   int exited;
 
-- 
cgit v1.2.3