# Module Ledit

    module Ledit: sig .. end

    val input_char : Pervasives.in_channel -> string

    val set_prompt : string -> unit

    val get_prompt : unit -> string

    val open_histfile : bool -> string -> unit

    val close_histfile : unit -> unit

    val set_max_len : int -> unit

    val set_son_pid : int -> unit

    val unset_meta_as_escape : unit -> unit

    val set_utf8 : unit -> unit

    val set_ascii : unit -> unit

    val trace_sequences : bool Pervasives.ref