diff --git a/tests/bin/cohttp_client.ml b/tests/bin/cohttp_client.ml
index dcd395ef..8cd4dbb0 100644
--- a/tests/bin/cohttp_client.ml
+++ b/tests/bin/cohttp_client.ml
@@ -70,5 +70,4 @@ let () =
     "Check HTTP requests at \
      https://requestbin.com/r/enec1hql02hz/26qShWryt5vJc1JfrOwalhr5vQt@.";
 
-  Opentelemetry_client_cohttp_lwt.with_setup ~config () (fun () ->
-      Lwt_main.run (run ()))
+  Opentelemetry_client_cohttp_lwt.with_setup ~config () run |> Lwt_main.run
diff --git a/tests/bin/emit1_cohttp.ml b/tests/bin/emit1_cohttp.ml
index deb5359d..849ff37a 100644
--- a/tests/bin/emit1_cohttp.ml
+++ b/tests/bin/emit1_cohttp.ml
@@ -139,5 +139,5 @@ let () =
         Printf.printf "\ndone. %d spans in %.4fs (%.4f/s)\n%!"
           (Atomic.get num_tr) elapsed n_per_sec)
   in
-  Opentelemetry_client_cohttp_lwt.with_setup ~stop ~config () @@ fun () ->
-  Lwt_main.run @@ run ()
+  Opentelemetry_client_cohttp_lwt.with_setup ~stop ~config () run
+  |> Lwt_main.run