Module Header_protocol.Epoch
type phantom
= [
]
type nonrec -'rw t
= (phantom, 'rw) t
constraint 'rw = [> Core.read ]
val message_type : char
val buffer_length : int
val of_iobuf_exn : ('rw, _) Iobuf.t -> 'rw t
val write : epoch:Profiler_epoch.t -> (Core.read_write, _) Iobuf.t -> int
val create : epoch:Profiler_epoch.t -> (Core.read_write, Iobuf.seek) Iobuf.t
val get_message_length : _ t -> int
val get_message_type : _ t -> char
val get_epoch : _ t -> Profiler_epoch.t
val set_epoch : (Core.read_write, _) Iobuf.t -> Profiler_epoch.t -> unit
val to_sub_iobuf : 'rw t -> ('rw, Iobuf.seek) Iobuf.t
val to_unpacked : 'rw t -> Unpacked.t
val of_unpacked : Unpacked.t -> 'rw t