mirror of
https://github.com/ocaml-tracing/ocaml-opentelemetry.git
synced 2026-05-05 17:04:52 -04:00
try to work for lwt 5 and lwt 6
This commit is contained in:
parent
8438a46be5
commit
cbc1809237
4 changed files with 17 additions and 1 deletions
|
|
@ -25,3 +25,15 @@
|
|||
mtime.clock.os
|
||||
lwt.unix)
|
||||
(synopsis "Lwt-specific helpers for opentelemetry-client"))
|
||||
|
||||
(rule
|
||||
(enabled_if
|
||||
(>= %{version:lwt} 6.0))
|
||||
(action
|
||||
(copy types_.ml.6 types_.ml)))
|
||||
|
||||
(rule
|
||||
(enabled_if
|
||||
(< %{version:lwt} 6.0))
|
||||
(action
|
||||
(copy types_.ml.5 types_.ml)))
|
||||
|
|
|
|||
|
|
@ -5,7 +5,7 @@ module IO = Io_lwt
|
|||
type t = {
|
||||
notified: bool Atomic.t;
|
||||
cond: unit Lwt_condition.t;
|
||||
notification: Lwt_unix.notification;
|
||||
notification: Types_.notification;
|
||||
lwt_tid: int; (** thread ID where lwt runs *)
|
||||
deleted: bool Atomic.t;
|
||||
}
|
||||
|
|
|
|||
2
src/client/lwt/types_.ml.5
Normal file
2
src/client/lwt/types_.ml.5
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
|
||||
type notification = int
|
||||
2
src/client/lwt/types_.ml.6
Normal file
2
src/client/lwt/types_.ml.6
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
|
||||
type notification = Lwt_unix.notification
|
||||
Loading…
Add table
Reference in a new issue