From cb8ea3805f02684c17c5dd8b55714dc1e8ce6c48 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Fri, 15 Nov 2013 17:14:15 +0100 Subject: [PATCH] Remove use of SCM_CRITICAL_SECTION in smob.c * libguile/smob.c (scm_make_smob_type): Use a mutex instead of a critical section, which does an async tick. Not important, just a thing I saw. --- libguile/smob.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/libguile/smob.c b/libguile/smob.c index e13591f0f..768257840 100644 --- a/libguile/smob.c +++ b/libguile/smob.c @@ -205,11 +205,11 @@ scm_make_smob_type (char const *name, size_t size) { long new_smob; - SCM_CRITICAL_SECTION_START; + scm_i_pthread_mutex_lock (&scm_i_misc_mutex); new_smob = scm_numsmob; if (scm_numsmob != MAX_SMOB_COUNT) ++scm_numsmob; - SCM_CRITICAL_SECTION_END; + scm_i_pthread_mutex_unlock (&scm_i_misc_mutex); if (new_smob == MAX_SMOB_COUNT) scm_misc_error (FUNC_NAME, "maximum number of smobs exceeded", SCM_EOL);