functor (Future : Future.S->
  sig
    val read : Future.Reader.t -> Biocaml_lines.item Future.Pipe.Reader.t
    val write :
      Future.Writer.t ->
      Biocaml_lines.item Future.Pipe.Reader.t -> unit Future.Deferred.t
    val write_file :
      ?perm:int ->
      ?append:bool ->
      string ->
      Biocaml_lines.item Future.Pipe.Reader.t -> unit Future.Deferred.t
  end