M.PerfContext
type t
= unit C.ptr
val t : t C.typ
val create : (unit -> t G.return) G.result
val reset : (t -> unit G.return) G.result
val destroy : (t -> unit G.return) G.result
module Counters : sig ... end
val metric : (t -> int64 -> int G.return) G.result