diff options
author | Andy Wingo <wingo@pobox.com> | 2016-04-26 22:11:41 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2016-04-26 22:11:41 +0200 |
commit | abf90c4e72fd7cd6573f77b06239e2e6c2f47fce (patch) | |
tree | 0e4b2146fdebb241482339fb8c91b1c3bebdb17b | |
parent | 122c8e6b37ad9dd44226d66e3357802f40d75f5f (diff) | |
download | guile-abf90c4e72fd7cd6573f77b06239e2e6c2f47fce.tar.gz |
Remove locking in scm_end_input
* libguile/ports.c (scm_end_input): Sadly, we can't naively lock around
the scm_port_buffer_take, as it might throw. Will revisit in the
future.
-rw-r--r-- | libguile/ports.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/libguile/ports.c b/libguile/ports.c index 8405a0a2a..2062f588b 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -2383,11 +2383,8 @@ scm_end_input (SCM port) size_t discarded; pt = SCM_PTAB_ENTRY (port); - - scm_i_pthread_mutex_lock (pt->lock); buf = SCM_PTAB_ENTRY (port)->read_buf; discarded = scm_port_buffer_take (buf, NULL, (size_t) -1); - scm_i_pthread_mutex_unlock (pt->lock); if (discarded != 0) SCM_PORT_DESCRIPTOR (port)->seek (port, -discarded, SEEK_CUR); |