sig
  type field = Stats_reporting.field
  val init :
    msg:string -> ?memory_limit:int -> ?file_name:string -> unit -> unit
  val create_field : desc:string -> type_desc:string -> name:string -> field
  val add_datum : field -> int -> unit
  val add_datum_float : field -> float -> unit
  module Delta :
    sig
      type t = Stats_reporting.Delta.t
      val create : field -> t
      val set : t -> int -> unit
      val add_delta : t -> int -> unit
      val add_delta_and_set : t -> int -> unit
      val set_float : t -> float -> unit
      val add_delta_float : t -> float -> unit
      val add_delta_and_set_float : t -> float -> unit
    end
  val adjust_if_required : unit -> unit
  module Stored_data :
    sig
      type type_desc = string
      type name = string
      type t =
        Stats_reporting.Stored_data.t =
          New_field of int * string * type_desc * name
        | Int_datum of int * int * Time_stamp_counter.Cycles.t
        | Float_datum of int * float * Time_stamp_counter.Cycles.t
      val read_msg_and_snapshot :
        file:string -> string * Time_stamp_counter.Cycles.snapshot
      val fold : file:string -> init:'a -> f:('a -> t -> 'a) -> 'a
      val bin_type_desc : type_desc Core.Std.Bin_prot.Type_class.t
      val bin_read_type_desc : type_desc Core.Std.Bin_prot.Read.reader
      val __bin_read_type_desc__ :
        (int -> type_desc) Core.Std.Bin_prot.Read.reader
      val bin_reader_type_desc :
        type_desc Core.Std.Bin_prot.Type_class.reader
      val bin_size_type_desc : type_desc Core.Std.Bin_prot.Size.sizer
      val bin_write_type_desc : type_desc Core.Std.Bin_prot.Write.writer
      val bin_writer_type_desc :
        type_desc Core.Std.Bin_prot.Type_class.writer
      val type_desc_of_sexp : Sexplib.Sexp.t -> type_desc
      val sexp_of_type_desc : type_desc -> Sexplib.Sexp.t
      val bin_name : name Core.Std.Bin_prot.Type_class.t
      val bin_read_name : name Core.Std.Bin_prot.Read.reader
      val __bin_read_name__ : (int -> name) Core.Std.Bin_prot.Read.reader
      val bin_reader_name : name Core.Std.Bin_prot.Type_class.reader
      val bin_size_name : name Core.Std.Bin_prot.Size.sizer
      val bin_write_name : name Core.Std.Bin_prot.Write.writer
      val bin_writer_name : name Core.Std.Bin_prot.Type_class.writer
      val name_of_sexp : Sexplib.Sexp.t -> name
      val sexp_of_name : name -> Sexplib.Sexp.t
      val bin_t : t Core.Std.Bin_prot.Type_class.t
      val bin_read_t : t Core.Std.Bin_prot.Read.reader
      val __bin_read_t__ : (int -> t) Core.Std.Bin_prot.Read.reader
      val bin_reader_t : t Core.Std.Bin_prot.Type_class.reader
      val bin_size_t : t Core.Std.Bin_prot.Size.sizer
      val bin_write_t : t Core.Std.Bin_prot.Write.writer
      val bin_writer_t : t Core.Std.Bin_prot.Type_class.writer
      val t_of_sexp : Sexplib.Sexp.t -> t
      val sexp_of_t : t -> Sexplib.Sexp.t
    end
  val bin_field : field Core.Std.Bin_prot.Type_class.t
  val bin_read_field : field Core.Std.Bin_prot.Read.reader
  val __bin_read_field__ : (int -> field) Core.Std.Bin_prot.Read.reader
  val bin_reader_field : field Core.Std.Bin_prot.Type_class.reader
  val bin_size_field : field Core.Std.Bin_prot.Size.sizer
  val bin_write_field : field Core.Std.Bin_prot.Write.writer
  val bin_writer_field : field Core.Std.Bin_prot.Type_class.writer
  val field_of_sexp : Sexplib.Sexp.t -> field
  val sexp_of_field : field -> Sexplib.Sexp.t
end