2008-03-04 21:38:19 -07:00
|
|
|
type t
|
|
|
|
|
2008-03-18 17:20:44 -06:00
|
|
|
type command_handler = t -> Command.t -> unit
|
|
|
|
type error_handler = t -> string -> unit
|
2008-03-07 12:00:40 -07:00
|
|
|
|
2009-02-08 20:25:27 -07:00
|
|
|
val create : Dispatch.t -> Unix.file_descr -> string -> command_handler -> error_handler -> t
|
2008-03-18 15:27:03 -06:00
|
|
|
val close: t -> string -> unit
|
2008-03-18 17:20:44 -06:00
|
|
|
|
2009-02-08 20:25:27 -07:00
|
|
|
val name : t -> string
|
2008-03-18 17:20:44 -06:00
|
|
|
val write : t -> Command.t -> unit
|
|
|
|
val bind : t -> command_handler -> error_handler -> unit
|