simon/ocaml-opentelemetry
1
0
Fork 0
mirror of https://github.com/ocaml-tracing/ocaml-opentelemetry.git synced 2026-03-09 04:17:56 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

try to fix compat with versions of cohttp

Browse source 
it seems like now IO is a required component of Cohttp_lwt.S.Client, so
now we should include parameter `C` so that it just contains whatever
the client has, minus the functions we change.
This commit is contained in:
Simon Cruanes 2025-12-27 20:17:33 -05:00
parent 581590abcc
commit dc21341d92
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
src/integrations/cohttp/opentelemetry_cohttp_lwt.ml
View file

@ -149,21 +149,7 @@ let client ?(tracer = Otel.Tracer.dynamic_main) ?(span : Otel.Span.t option)
(* These types and values are not customized by our client, but are required to satisfy (* These types and values are not customized by our client, but are required to satisfy
[Cohttp_lwt.S.Client]. *) [Cohttp_lwt.S.Client]. *)
include ( include C
C :
sig
type ctx = C.ctx
type 'a io = 'a C.io
type 'a with_context = 'a C.with_context
type body = C.body
val map_context : 'a with_context -> ('a -> 'b) -> 'b with_context
val set_cache : Cohttp_lwt.S.call -> unit
end)
let attrs_for ~uri ~meth:_ () = let attrs_for ~uri ~meth:_ () =
[ [