module Header : sig ... endval consume_header : ([> Core.read ], Core.Iobuf.seek) Core.Iobuf.t ‑> Core_profiler.Profiler_epoch.t * Header.tmodule Short_message : sig ... endval consume_short_message : ([> Core.read ], Core.Iobuf.seek) Core.Iobuf.t ‑> Core_profiler.Profiler_epoch.t ‑> Header.t ‑> Short_message.tval fold_short_messages : ([> Core.read ], _) Core.Iobuf.t ‑> Core_profiler.Profiler_epoch.t ‑> Header.t ‑> init:'accum ‑> f:('accum ‑> Short_message.t ‑> 'accum) ‑> 'accumval iter_short_messages : ([> Core.read ], _) Core.Iobuf.t ‑> Core_profiler.Profiler_epoch.t ‑> Header.t ‑> f:(Short_message.t ‑> unit) ‑> unitval iteri_short_messages : ([> Core.read ], _) Core.Iobuf.t ‑> Core_profiler.Profiler_epoch.t ‑> Header.t ‑> f:(int ‑> Short_message.t ‑> unit) ‑> unitval map_file : string ‑> (Core.read, _) Core.Iobuf.t