diff --git a/src/opentelemetry.ml b/src/opentelemetry.ml index 16959506..c0243257 100644 --- a/src/opentelemetry.ml +++ b/src/opentelemetry.ml @@ -470,8 +470,9 @@ module Trace = struct let span_id = Span_id.create() in let scope = {trace_id;span_id;events=[]; attrs} in - let finally ok = - let status = match ok with + (* called once we're done, to emit a span *) + let finally res = + let status = match res with | Ok () -> default_status ~code:Status_code_ok () | Error e -> default_status ~code:Status_code_error ~message:e () in let span, _ =