1 (**************************************************************************)
2 (* *)
3 (* OCaml *)
4 (* *)
5 (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
6 (* *)
7 (* Copyright 1996 Institut National de Recherche en Informatique et *)
8 (* en Automatique. *)
9 (* *)
10 (* All rights reserved. This file is distributed under the terms of *)
11 (* the GNU Lesser General Public License version 2.1, with the *)
12 (* special exception on linking described in the file LICENSE. *)
13 (* *)
14 (**************************************************************************)
15
16 (** Basic interface to the terminfo database
17
18 {b Warning:} this module is unstable and part of
19 {{!Compiler_libs}compiler-libs}.
20
21 *)
22
23 type status =
24 | Uninitialised
25 | Bad_term
26 | Good_term
27
28 val setup : out_channel -> status
29 val num_lines : out_channel -> int
30 val backup : out_channel -> int -> unit
31 val standout : out_channel -> bool -> unit
32 val resume : out_channel -> int -> unit
33