summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2016-04-26 22:11:41 +0200
committerAndy Wingo <wingo@pobox.com>2016-04-26 22:11:41 +0200
commitabf90c4e72fd7cd6573f77b06239e2e6c2f47fce (patch)
tree0e4b2146fdebb241482339fb8c91b1c3bebdb17b
parent122c8e6b37ad9dd44226d66e3357802f40d75f5f (diff)
downloadguile-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.c3
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);