add tty ocaml api.