Source file trace_intf.ml

open! Core

module Event_arg = struct
  type value =
    | Interned of string (** use for strings which can be interned into a limited pool *)
    | String of string (** use for strings with a large number of unique values *)
    | Int of int
    | Float of float (** written as a double-precision float *)
  [@@deriving sexp_of]

  (** Each argument has a name, the names are interned *)
  type t = string * value [@@deriving sexp_of]
end