diff --git a/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml b/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml
index 189b341e..9f71d52f 100644
--- a/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml
+++ b/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml
@@ -81,8 +81,14 @@ let report_err_ = function
   | `Sysbreak -> Printf.eprintf "opentelemetry: ctrl-c captured, stopping\n%!"
   | `Failure msg ->
     Format.eprintf "@[<2>opentelemetry: export failed: %s@]@." msg
-  | `Status (code, { Opentelemetry.Proto.Status.code = scode; message; details })
-    ->
+  | `Status
+      ( code,
+        {
+          Opentelemetry.Proto.Status.code = scode;
+          message;
+          details;
+          _presence = _;
+        } ) ->
     let pp_details out l =
       List.iter
         (fun s -> Format.fprintf out "%S;@ " (Bytes.unsafe_to_string s))
diff --git a/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml b/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml
index 4cb8f22e..53786ed2 100644
--- a/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml
+++ b/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml
@@ -61,8 +61,14 @@ let report_err_ = function
   | `Sysbreak -> Printf.eprintf "opentelemetry: ctrl-c captured, stopping\n%!"
   | `Failure msg ->
     Format.eprintf "@[<2>opentelemetry: export failed: %s@]@." msg
-  | `Status (code, { Opentelemetry.Proto.Status.code = scode; message; details })
-    ->
+  | `Status
+      ( code,
+        {
+          Opentelemetry.Proto.Status.code = scode;
+          message;
+          details;
+          _presence = _;
+        } ) ->
     let pp_details out l =
       List.iter
         (fun s -> Format.fprintf out "%S;@ " (Bytes.unsafe_to_string s))
diff --git a/src/integrations/logs/opentelemetry_logs.ml b/src/integrations/logs/opentelemetry_logs.ml
index 713d4e38..a06cf117 100644
--- a/src/integrations/logs/opentelemetry_logs.ml
+++ b/src/integrations/logs/opentelemetry_logs.ml
@@ -23,9 +23,6 @@ let log_level_to_severity (level : Logs.level) : Otel.Logs.severity =
 (* Logs Util *)
 (*****************************************************************************)
 
-let create_tag (tag : string) : string Logs.Tag.def =
-  Logs.Tag.def tag Format.pp_print_string
-
 let emit_telemetry_tag =
   Logs.Tag.def ~doc:"Whether or not to emit this log via telemetry"
     "emit_telemetry" Format.pp_print_bool