sig
  type t
  val create :
    ?out_channel:Netchannels.out_obj_channel ->
    ?in_channel:Netchannels.in_obj_channel -> unit -> GapiPipe.OcamlnetPipe.t
  val read_byte : GapiPipe.OcamlnetPipe.t -> int
  val read_string : GapiPipe.OcamlnetPipe.t -> int -> string
  val read_line : GapiPipe.OcamlnetPipe.t -> string
  val read_all : GapiPipe.OcamlnetPipe.t -> string
  val write_byte : GapiPipe.OcamlnetPipe.t -> int -> unit
  val write_string : GapiPipe.OcamlnetPipe.t -> string -> unit
  val end_reading : GapiPipe.OcamlnetPipe.t -> unit
  val end_writing : GapiPipe.OcamlnetPipe.t -> unit
end