Module Cothread

module Cothread: sig .. end

Super set of standard Thread module.

It serves two purpose: 1) a unified threads maniputation interface among different engines, so that we can achieve object-level compatability 2) extended functions of threads maniputation

The part compatible with standard Thread module

type t

val create : ('a -> 'b) -> 'a -> t

val self : unit -> t

val id : t -> int

val exit : unit -> unit

val kill : t -> unit

val delay : float -> unit

val join : t -> unit

val wait_read : Unix.file_descr -> unit

val wait_write : Unix.file_descr -> unit

val wait_timed_read : Unix.file_descr -> float -> bool

val wait_timed_write : Unix.file_descr -> float -> bool

val select : Unix.file_descr list ->
       Unix.file_descr list ->
       Unix.file_descr list ->
       float -> Unix.file_descr list * Unix.file_descr list * Unix.file_descr list

val wait_pid : int -> int * Unix.process_status

val yield : unit -> unit

val wait_signal : int list -> int

Extended functions

The interface of spawn and spawnl may change in the future. We have find a more elegent and comprehensive way to abstract the whole family of this kind of computation. Just need more time to implement.

val spawn : ('a -> 'b) -> 'a -> 'b Event.event

spawn f x launch up the computation of (f x) in a separate thread right away, the result is return as a event which you can sync with. Re-sync with the same event will bring you the same result, the computation won't repeat.

val spawnl : ('a -> 'b) -> 'a -> 'b Event.event

spawnl f x returns a event represents the computation of (f x) as a separate thread, just like spwan. However the computation will be defered until it's been sync with. Whenever you sync the event, a new thread is relaunched to do the same computation