Used default_url

This commit is contained in:
Shon Feder 2025-06-23 22:09:04 -04:00
parent a95b787a7b
commit b6448b330d
No known key found for this signature in database
2 changed files with 8 additions and 2 deletions

View file

@ -20,8 +20,9 @@ let run () =
in in
let* () = Lwt_unix.sleep !sleep_outer in let* () = Lwt_unix.sleep !sleep_outer in
let module C = (val mk_client ~scope) in let module C = (val mk_client ~scope) in
(* Using the same default server O *)
let* _res, body = let* _res, body =
C.get (Uri.of_string "https://enec1hql02hz.x.pipedream.net") C.get (Uri.of_string Opentelemetry_client.Config.default_url)
in in
let* () = Cohttp_lwt.Body.drain_body body in let* () = Cohttp_lwt.Body.drain_body body in
go () go ()

View file

@ -1,7 +1,11 @@
(executable (executable
(name emit1) (name emit1)
(modules emit1) (modules emit1)
(libraries unix opentelemetry opentelemetry-client-ocurl)) (libraries
unix
opentelemetry
opentelemetry.client
opentelemetry-client-ocurl))
(executable (executable
(name emit1_cohttp) (name emit1_cohttp)
@ -12,6 +16,7 @@
unix unix
opentelemetry opentelemetry
opentelemetry-lwt opentelemetry-lwt
opentelemetry.client
opentelemetry-client-cohttp-lwt opentelemetry-client-cohttp-lwt
lwt.unix)) lwt.unix))