diff options
Diffstat (limited to 'ocaml-binary-annot/utils/terminfo.ml')
| -rw-r--r-- | ocaml-binary-annot/utils/terminfo.ml | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/ocaml-binary-annot/utils/terminfo.ml b/ocaml-binary-annot/utils/terminfo.ml new file mode 100644 index 0000000000..cc17991081 --- /dev/null +++ b/ocaml-binary-annot/utils/terminfo.ml @@ -0,0 +1,25 @@ +(***********************************************************************) +(* *) +(* Objective Caml *) +(* *) +(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) +(* *) +(* 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$ *) + +(* Basic interface to the terminfo database *) + +type status = + | Uninitialised + | Bad_term + | Good_term of int +;; +external setup : out_channel -> status = "caml_terminfo_setup";; +external backup : int -> unit = "caml_terminfo_backup";; +external standout : bool -> unit = "caml_terminfo_standout";; +external resume : int -> unit = "caml_terminfo_resume";; |