summaryrefslogtreecommitdiff
path: root/ocaml-binary-annot/otherlibs/systhreads/mutex.ml
diff options
context:
space:
mode:
Diffstat (limited to 'ocaml-binary-annot/otherlibs/systhreads/mutex.ml')
-rw-r--r--ocaml-binary-annot/otherlibs/systhreads/mutex.ml20
1 files changed, 20 insertions, 0 deletions
diff --git a/ocaml-binary-annot/otherlibs/systhreads/mutex.ml b/ocaml-binary-annot/otherlibs/systhreads/mutex.ml
new file mode 100644
index 0000000000..4e108f4a9f
--- /dev/null
+++ b/ocaml-binary-annot/otherlibs/systhreads/mutex.ml
@@ -0,0 +1,20 @@
+(***********************************************************************)
+(* *)
+(* Caml Special Light *)
+(* *)
+(* Xavier Leroy and Pascal Cuoq, INRIA Rocquencourt *)
+(* *)
+(* Copyright 1995 Institut National de Recherche en Informatique et *)
+(* en Automatique. All rights reserved. This file is distributed *)
+(* under the terms of the GNU Library General Public License, with *)
+(* the special exception on linking described in file ../../LICENSE. *)
+(* *)
+(***********************************************************************)
+
+(* $Id$ *)
+
+type t
+external create: unit -> t = "caml_mutex_new"
+external lock: t -> unit = "caml_mutex_lock"
+external try_lock: t -> bool = "caml_mutex_try_lock"
+external unlock: t -> unit = "caml_mutex_unlock"