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

format

Browse source
This commit is contained in:
Simon Cruanes 2026-02-26 17:23:27 -05:00
parent 9095c2a506
commit d7f73b4b04
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
2 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/lib/dynamic_enricher.ml
View file

@ -17,6 +17,7 @@ let collect () : Key_value.t list =
| exception exn -> | exception exn ->
let bt = Printexc.get_raw_backtrace () in let bt = Printexc.get_raw_backtrace () in
Printf.eprintf "opentelemetry: dynamic_enricher raised %s\n%s%!" Printf.eprintf "opentelemetry: dynamic_enricher raised %s\n%s%!"
(Printexc.to_string exn) (Printexc.raw_backtrace_to_string bt)) (Printexc.to_string exn)
(Printexc.raw_backtrace_to_string bt))
(Alist.get enrichers_); (Alist.get enrichers_);
!acc !acc

3
src/trace/opentelemetry_trace.ml
View file

@ -39,8 +39,7 @@ open struct
OTEL.Span_ctx.k_ambient OTEL.Span_ctx.k_ambient
let enter_span (self : state) ~__FUNCTION__ ~__FILE__ ~__LINE__ ~level:_ let enter_span (self : state) ~__FUNCTION__ ~__FILE__ ~__LINE__ ~level:_
~params:_ ~(data : (_ * Trace.user_data) list) ~parent name : Trace.span ~params:_ ~(data : (_ * Trace.user_data) list) ~parent name : Trace.span =
=
let start_time = OTEL.Clock.now self.clock in let start_time = OTEL.Clock.now self.clock in
let trace_id, parent_id = let trace_id, parent_id =
match parent with match parent with