package trace

  1. Overview
  2. Docs
A lightweight stub for tracing/observability, agnostic in how data is collected

Install

dune-project
 Dependency

Authors

Maintainers

Sources

trace-0.12.tbz
sha256=c173d6bf9433e9eeb41bbddda116a296373d45865841dcbb78bff3be8abd9fd8
sha512=1105c52112095fdc8d4961d7346b02e416627bde6ac79ddd137bff63ac0ff5cd23fa53192be642614efadb9cb0cbb83b7d571bb5a0d100ad0ae6d10bc61d3bba

doc/src/trace.util/trace_id64.ml.html

Source file trace_id64.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
open struct
  module A = Trace_core.Internal_.Atomic_
end

type t = int64

module Gen : sig
  type t

  val create : unit -> t
  val gen : t -> int64
end = struct
  type t = int A.t

  let create () = A.make 0
  let[@inline] gen self : int64 = A.fetch_and_add self 1 |> Int64.of_int
end