diff options
Diffstat (limited to 'libguile/symbols.c')
-rw-r--r-- | libguile/symbols.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/symbols.c b/libguile/symbols.c index 204bc7446..e63b79bd8 100644 --- a/libguile/symbols.c +++ b/libguile/symbols.c @@ -279,9 +279,9 @@ SCM_DEFINE (scm_gensym, "gensym", 0, 1, 0, prefix = scm_from_locale_string (" g"); /* mutex in case another thread looks and incs at the exact same moment */ - scm_mutex_lock (&scm_i_misc_mutex); + scm_pthread_mutex_lock (&scm_i_misc_mutex); n = gensym_counter++; - scm_mutex_unlock (&scm_i_misc_mutex); + pthread_mutex_unlock (&scm_i_misc_mutex); n_digits = scm_iint2str (n, 10, buf); suffix = scm_from_locale_stringn (buf, n_digits); |