Version used to set the protocol version
type t = [
|
`Halt
`Unknown
`Version of string
]
val read_input : IO.ic -> t IO.t
val output : IO.oc -> t -> unit IO.t