simon/ocaml-opentelemetry
1
0
Fork 0
mirror of https://github.com/ocaml-tracing/ocaml-opentelemetry.git synced 2026-03-08 20:07:55 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

heinous typo

Browse source
This commit is contained in:
Simon Cruanes 2022-07-06 16:29:02 -04:00
parent 77ebf0cced
commit 12b5f6c765
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/opentelemetry.ml
View file

@ -605,7 +605,7 @@ module Trace = struct
This instructs the collector to forward This instructs the collector to forward
the spans to some backend at a later point. the spans to some backend at a later point.
{b NOTE} be careful not too call this inside a Gc alarm, as it can {b NOTE} be careful not to call this inside a Gc alarm, as it can
cause deadlocks. *) cause deadlocks. *)
let emit ?service_name ?attrs (spans : span list) : unit = let emit ?service_name ?attrs (spans : span list) : unit =
let rs = make_resource_spans ?service_name ?attrs spans in let rs = make_resource_spans ?service_name ?attrs spans in
@ -637,7 +637,7 @@ module Trace = struct
(** Sync span guard. (** Sync span guard.
{b NOTE} be careful not too call this inside a Gc alarm, as it can {b NOTE} be careful not to call this inside a Gc alarm, as it can
cause deadlocks. *) cause deadlocks. *)
let with_ ?trace_state ?service_name let with_ ?trace_state ?service_name
?(attrs : (string * [< value ]) list = []) ?kind ?trace_id ?parent ?scope ?(attrs : (string * [< value ]) list = []) ?kind ?trace_id ?parent ?scope
@ -782,7 +782,7 @@ module Metrics = struct
the backend has pushed the metrics into some internal queue, or the backend has pushed the metrics into some internal queue, or
discarded them. discarded them.
{b NOTE} be careful not too call this inside a Gc alarm, as it can {b NOTE} be careful not to call this inside a Gc alarm, as it can
cause deadlocks. cause deadlocks.
*) *)
let emit ?attrs (l : t list) : unit = let emit ?attrs (l : t list) : unit =
@ -868,7 +868,7 @@ module Logs = struct
This instructs the collector to send the logs to some backend at This instructs the collector to send the logs to some backend at
a later date. a later date.
{b NOTE} be careful not too call this inside a Gc alarm, as it can {b NOTE} be careful not to call this inside a Gc alarm, as it can
cause deadlocks. *) cause deadlocks. *)
let emit ?service_name ?attrs (l : t list) : unit = let emit ?service_name ?attrs (l : t list) : unit =
let attributes = Globals.mk_attributes ?service_name ?attrs () in let attributes = Globals.mk_attributes ?service_name ?attrs () in