Module Readline__input_char

module Readline__input_char: sig .. end

type t = [ `Backspace
       | `Char of char
       | `Delete
       | `Down
       | `End
       | `Eof
       | `Home
       | `Left
       | `Newline
       | `Right
       | `Tab
       | `Unknown_escape of string * int option * int option
       | `Up ] 

val get : unit -> t