sig
  module type Serializer =
    sig
      type t
      val string_of_t : Seqdb_log.Serializer.t -> string
      val t_of_string : string -> Seqdb_log.Serializer.t
    end
  module Make :
    functor (B : Serializer) ->
      sig
        type t
        val open_log :
          ?create:bool ->
          ?flush_every:int -> ?auto_sync:int -> string -> Seqdb_log.Make.t
        val close_log : Seqdb_log.Make.t -> unit
        val add : Seqdb_log.Make.t -> B.t -> unit
        val num_entries : Seqdb_log.Make.t -> int64
        val iter :
          Seqdb_log.Make.t ->
          (Seqdb_containers.Kvseq.pointer -> B.t -> 'a) -> unit
      end
end