From e789ecf3dac1b1a4daba7d53e8be69d1f4ae15b2 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Wed, 16 Oct 2024 13:30:20 -0400 Subject: [PATCH] cleanup --- src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml | 1 - src/client-ocurl/opentelemetry_client_ocurl.ml | 2 +- 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml b/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml index cffe8a7..5894f8b 100644 --- a/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml +++ b/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml @@ -567,7 +567,6 @@ let create_backend ?(stop = Atomic.make false) ?(config = Config.make ()) () = let setup_ ?stop ?config () = let backend = create_backend ?stop ?config () in - let (module B : OT.Collector.BACKEND) = backend in OT.Collector.set_backend backend; OT.Collector.remove_backend diff --git a/src/client-ocurl/opentelemetry_client_ocurl.ml b/src/client-ocurl/opentelemetry_client_ocurl.ml index b5412f2..3da89ba 100644 --- a/src/client-ocurl/opentelemetry_client_ocurl.ml +++ b/src/client-ocurl/opentelemetry_client_ocurl.ml @@ -498,7 +498,7 @@ let setup_ticker_thread ~stop ~sleep_ms (module B : Collector.BACKEND) () = let setup_ ?(stop = Atomic.make false) ?(config : Config.t = Config.make ()) () = - let ((module B) as backend) = create_backend ~stop ~config () in + let backend = create_backend ~stop ~config () in Opentelemetry.Collector.set_backend backend; Atomic.set Self_trace.enabled config.self_trace;