Mark todo

This commit is contained in:
Shon Feder 2025-05-28 14:26:49 -04:00
parent f23d22adb0
commit 9134f4db23
No known key found for this signature in database

View file

@ -1,5 +1,4 @@
module T = Opentelemetry module T = Opentelemetry
module Otel_lwt = Opentelemetry_lwt
let spf = Printf.sprintf let spf = Printf.sprintf
@ -9,7 +8,7 @@ let sleep_inner = ref 0.1
let sleep_outer = ref 2.0 let sleep_outer = ref 2.0
let mk_client ~scope:_ = raise (Failure "TODO") (* let mk_client ~scope:_ = raise (Failure "TODO") *)
(* Opentelemetry_cohttp_lwt.client ~scope (module Cohttp_eio.Client) *) (* Opentelemetry_cohttp_lwt.client ~scope (module Cohttp_eio.Client) *)
let run () = let run () =
@ -72,4 +71,5 @@ let () =
"Check HTTP requests at \ "Check HTTP requests at \
https://requestbin.com/r/enec1hql02hz/26qShWryt5vJc1JfrOwalhr5vQt@."; https://requestbin.com/r/enec1hql02hz/26qShWryt5vJc1JfrOwalhr5vQt@.";
Opentelemetry_client_cohttp_eio.with_setup ~config () run (* TODO *)
(* Opentelemetry_client_cohttp_eio.with_setup ~config () run *)