From 3448e33d2917ba988ab59a80f312c089171eb6d4 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Tue, 12 Apr 2022 13:53:24 -0400 Subject: [PATCH] fix: same --- src/client/opentelemetry_client_ocurl.ml | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/client/opentelemetry_client_ocurl.ml b/src/client/opentelemetry_client_ocurl.ml index 06dfebc4..f5403c57 100644 --- a/src/client/opentelemetry_client_ocurl.ml +++ b/src/client/opentelemetry_client_ocurl.ml @@ -450,9 +450,10 @@ let mk_emitter ~(config:Config.t) () : (module EMITTER) = while !continue do let@ () = guard in let timeout = batch_timeout() in - if emit_metrics ~force:timeout () then () - else if emit_traces ~force:timeout () then () - else ( + + let do_metrics = emit_metrics ~force:timeout () in + let do_traces = emit_traces ~force:timeout () in + if not do_metrics && not do_traces then ( (* wait *) let@ () = with_mutex_ m in Condition.wait cond m;