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 name of library

Browse source 
Matches the convention in /src/trace/dune and prevents dependency on
the library from polluting the global namespace of a component with the
generic `Client` module.
This commit is contained in:
Shon Feder 2025-06-10 18:11:30 -04:00
parent 90fa0ba3b7
commit 8511f547d7
No known key found for this signature in database
5 changed files with 14 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/client-cohttp-lwt/config.ml
View file

@ -1,7 +1,7 @@
type t = Client.Config.t type t = Opentelemetry_client.Config.t
module Env = Client.Config.Env () module Env = Opentelemetry_client.Config.Env ()
let pp = Client.Config.pp let pp = Opentelemetry_client.Config.pp
let make = Env.make (fun common () -> common) let make = Env.make (fun common () -> common)

6
src/client-cohttp-lwt/config.mli
View file

@ -1,4 +1,4 @@
type t = Client.Config.t type t = Opentelemetry_client.Config.t
(** Configuration. (** Configuration.
To build one, use {!make} below. This might be extended with more fields in To build one, use {!make} below. This might be extended with more fields in
@ -6,7 +6,7 @@ type t = Client.Config.t
val pp : Format.formatter -> t -> unit val pp : Format.formatter -> t -> unit
val make : (unit -> t) Client.Config.make val make : (unit -> t) Opentelemetry_client.Config.make
(** Make a configuration {!t}. *) (** Make a configuration {!t}. *)
module Env : Client.Config.ENV module Env : Opentelemetry_client.Config.ENV

7
src/client-ocurl/config.ml
View file

@ -10,7 +10,7 @@ type t = {
[ticker_thread] is [true]. This will be clamped between [2 ms] and [ticker_thread] is [true]. This will be clamped between [2 ms] and
some longer interval (maximum [60s] currently). Default 500. some longer interval (maximum [60s] currently). Default 500.
@since 0.7 *) @since 0.7 *)
common: Client.Config.t; common: Opentelemetry_client.Config.t;
(** Common configuration options (** Common configuration options
@since 0.12*) @since 0.12*)
} }
@ -20,9 +20,10 @@ let pp out self =
Format.fprintf out Format.fprintf out
"{@[ bg_threads=%d;@ ticker_thread=%B;@ ticker_interval_ms=%d;@ common=%a \ "{@[ bg_threads=%d;@ ticker_thread=%B;@ ticker_interval_ms=%d;@ common=%a \
@]}" @]}"
bg_threads ticker_thread ticker_interval_ms Client.Config.pp common bg_threads ticker_thread ticker_interval_ms Opentelemetry_client.Config.pp
common
module Env = Client.Config.Env () module Env = Opentelemetry_client.Config.Env ()
let make = let make =
Env.make Env.make

6
src/client-ocurl/config.mli
View file

@ -12,7 +12,7 @@ type t = {
[ticker_thread] is [true]. This will be clamped between [2 ms] and [ticker_thread] is [true]. This will be clamped between [2 ms] and
some longer interval (maximum [60s] currently). Default 500. some longer interval (maximum [60s] currently). Default 500.
@since 0.7 *) @since 0.7 *)
common: Client.Config.t; common: Opentelemetry_client.Config.t;
(** Common configuration options (** Common configuration options
@since NEXT_RELEASE*) @since NEXT_RELEASE*)
} }
@ -29,7 +29,7 @@ val make :
?ticker_interval_ms:int -> ?ticker_interval_ms:int ->
unit -> unit ->
t) t)
Client.Config.make Opentelemetry_client.Config.make
(** Make a configuration {!t}. *) (** Make a configuration {!t}. *)
module Env : Client.Config.ENV module Env : Opentelemetry_client.Config.ENV

2
src/client/dune
View file

@ -1,4 +1,4 @@
(library (library
(name client) (name opentelemetry_client)
(public_name opentelemetry.client) (public_name opentelemetry.client)
(synopsis "Common types and logic shared between client implementations")) (synopsis "Common types and logic shared between client implementations"))