21 lines
931 B
OCaml
21 lines
931 B
OCaml
(***********************************************************************)
|
|
(* *)
|
|
(* Caml Special Light *)
|
|
(* *)
|
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
|
(* *)
|
|
(* Copyright 1995 Institut National de Recherche en Informatique et *)
|
|
(* Automatique. Distributed only by permission. *)
|
|
(* *)
|
|
(***********************************************************************)
|
|
|
|
(* $Id$ *)
|
|
|
|
(* Module [Condition]: synchronization between threads via conditions *)
|
|
|
|
type t
|
|
val new: unit -> t
|
|
val wait: t -> Mutex.t -> unit
|
|
val signal: t -> unit
|
|
val broadcast: t -> unit
|