diff options
Diffstat (limited to 'ocaml-binary-annot/debugger/trap_barrier.mli')
| -rw-r--r-- | ocaml-binary-annot/debugger/trap_barrier.mli | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/ocaml-binary-annot/debugger/trap_barrier.mli b/ocaml-binary-annot/debugger/trap_barrier.mli new file mode 100644 index 0000000000..28bba5a3eb --- /dev/null +++ b/ocaml-binary-annot/debugger/trap_barrier.mli @@ -0,0 +1,27 @@ +(***********************************************************************) +(* *) +(* Objective Caml *) +(* *) +(* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) +(* Objective Caml port by John Malecki and Xavier Leroy *) +(* *) +(* Copyright 1996 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + +(* $Id$ *) + +(************************* Trap barrier ********************************) + +val install_trap_barrier : int -> unit + +val remove_trap_barrier : unit -> unit + +(* Ensure the trap barrier state is up to date in current checkpoint. *) +val update_trap_barrier : unit -> unit + +(* Execute `funct' with a trap barrier. *) +(* --- Used by `finish'. *) +val exec_with_trap_barrier : int -> (unit -> unit) -> unit |