sig
  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 -> Readline__input_char.t
  val ounit_tests : unit -> OUnit.test
end