aboutsummaryrefslogtreecommitdiff
path: root/lib/cThread.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/cThread.ml')
-rw-r--r--lib/cThread.ml4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/cThread.ml b/lib/cThread.ml
index 19f14637de..7a3f152003 100644
--- a/lib/cThread.ml
+++ b/lib/cThread.ml
@@ -6,8 +6,10 @@
(* * GNU Lesser General Public License Version 2.1 *)
(************************************************************************)
+type thread_ic = in_channel
+
let prepare_in_channel_for_thread_friendly_io ic =
- Unix.set_nonblock (Unix.descr_of_in_channel ic)
+ Unix.set_nonblock (Unix.descr_of_in_channel ic); ic
let safe_wait_timed_read fd time =
try Thread.wait_timed_read fd time