diff options
| author | Marius Vollmer <mvo@zagadka.de> | 2005-01-24 19:14:54 +0000 |
|---|---|---|
| committer | Marius Vollmer <mvo@zagadka.de> | 2005-01-24 19:14:54 +0000 |
| commit | a54a94b39707f47a1f30533bcf7664094d65d073 (patch) | |
| tree | 69a524a4c3fbb084e1e2fef05da61e1852700909 /libguile/ioext.c | |
| parent | be1b896c82273d97b79cd839d7281b46e54920f8 (diff) | |
| download | guile-a54a94b39707f47a1f30533bcf7664094d65d073.tar.gz | |
Threading changes.
Diffstat (limited to 'libguile/ioext.c')
| -rw-r--r-- | libguile/ioext.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/ioext.c b/libguile/ioext.c index 22a2de57e..f49d697f3 100644 --- a/libguile/ioext.c +++ b/libguile/ioext.c @@ -280,14 +280,14 @@ SCM_DEFINE (scm_fdes_to_ports, "fdes->ports", 1, 0, 0, int_fd = scm_to_int (fd); - scm_mutex_lock (&scm_i_port_table_mutex); + scm_pthread_mutex_lock (&scm_i_port_table_mutex); for (i = 0; i < scm_i_port_table_size; i++) { if (SCM_OPFPORTP (scm_i_port_table[i]->port) && ((scm_t_fport *) scm_i_port_table[i]->stream)->fdes == int_fd) result = scm_cons (scm_i_port_table[i]->port, result); } - scm_mutex_unlock (&scm_i_port_table_mutex); + pthread_mutex_unlock (&scm_i_port_table_mutex); return result; } #undef FUNC_NAME |