Module Terminfo

module Terminfo: sig .. end

---

type status = 

|	Uninitialised
|	Bad_term
|	Good_term

let setup: out_channel => status;

let num_lines: out_channel => int;

let backup: (out_channel, int) => unit;

let standout: (out_channel, bool) => unit;

let resume: (out_channel, int) => unit;