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

fix

Browse source
This commit is contained in:
Simon Cruanes 2024-02-09 15:52:00 -05:00
parent 479f1f39c8
commit 7d40554025
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/core/opentelemetry.ml
View file

@ -750,7 +750,7 @@ module Trace = struct
let add_attrs = Scope.add_attrs [@@deprecated "use Scope.add_attrs"] let add_attrs = Scope.add_attrs [@@deprecated "use Scope.add_attrs"]
let with_ ?(force_new_trace_id = false) ?trace_state ?service_name let with_' ?(force_new_trace_id = false) ?trace_state ?service_name
?(attrs : (string * [< value ]) list = []) ?kind ?trace_id ?parent ?scope ?(attrs : (string * [< value ]) list = []) ?kind ?trace_id ?parent ?scope
?links name cb = ?links name cb =
let scope = let scope =
@ -825,7 +825,7 @@ module Trace = struct
let with_ ?force_new_trace_id ?trace_state ?service_name ?attrs ?kind let with_ ?force_new_trace_id ?trace_state ?service_name ?attrs ?kind
?trace_id ?parent ?scope ?links name (cb : Scope.t -> 'a) : 'a = ?trace_id ?parent ?scope ?links name (cb : Scope.t -> 'a) : 'a =
let thunk, finally = let thunk, finally =
with_ ?force_new_trace_id ?trace_state ?service_name ?attrs ?kind with_' ?force_new_trace_id ?trace_state ?service_name ?attrs ?kind
?trace_id ?parent ?scope ?links name cb ?trace_id ?parent ?scope ?links name cb
in in