diff options
author | Andy Wingo <wingo@pobox.com> | 2011-11-09 23:02:02 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-11-09 23:02:02 +0100 |
commit | b86b70feced7d2be203be0738e1bab8d1e81a11e (patch) | |
tree | a39295951f40d06b722c66679ae6ce50b7c95862 | |
parent | 880e7948126e594d64cbf45c75a66ad3308ce1b3 (diff) | |
download | guile-b86b70feced7d2be203be0738e1bab8d1e81a11e.tar.gz |
disable port locking
* libguile/ports.h (scm_c_lock_port, scm_c_try_lock_port)
(scm_c_unlock_port): Disable port locking until I have time to sort
out the bugs that are coming up.
-rw-r--r-- | libguile/ports.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/ports.h b/libguile/ports.h index 624b7b860..b6db482b2 100644 --- a/libguile/ports.h +++ b/libguile/ports.h @@ -385,7 +385,7 @@ SCM_INTERNAL void scm_init_ports (void); SCM_INLINE_IMPLEMENTATION int scm_c_lock_port (SCM port) { -#if SCM_USE_PTHREAD_THREADS +#if 0 && SCM_USE_PTHREAD_THREADS return scm_i_pthread_mutex_lock (&SCM_PTAB_ENTRY (port)->lock); #else return 0; @@ -395,7 +395,7 @@ scm_c_lock_port (SCM port) SCM_INLINE_IMPLEMENTATION int scm_c_try_lock_port (SCM port) { -#if SCM_USE_PTHREAD_THREADS +#if 0 && SCM_USE_PTHREAD_THREADS return scm_i_pthread_mutex_trylock (&SCM_PTAB_ENTRY (port)->lock); #else return 0; @@ -405,7 +405,7 @@ scm_c_try_lock_port (SCM port) SCM_INLINE_IMPLEMENTATION int scm_c_unlock_port (SCM port) { -#if SCM_USE_PTHREAD_THREADS +#if 0 && SCM_USE_PTHREAD_THREADS return scm_i_pthread_mutex_unlock (&SCM_PTAB_ENTRY (port)->lock); #else return 0; |