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

fix for trace 0.1

Browse source
This commit is contained in:
Simon Cruanes 2023-06-12 10:06:25 -04:00
parent 92dfa4c2f8
commit 1ff96737db
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/trace/opentelemetry_trace.ml
View file

@ -138,6 +138,14 @@ let collector () : Trace.collector =
let name_process _name = () let name_process _name = ()
let name_thread _name = () let name_thread _name = ()
let counter_int name cur_val : unit =
let m = Otel.Metrics.(gauge ~name [ int cur_val ]) in
Otel.Metrics.emit [ m ]
let counter_float name cur_val : unit =
let m = Otel.Metrics.(gauge ~name [ float cur_val ]) in
Otel.Metrics.emit [ m ]
end in end in
(module M) (module M)