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
|
mtime.clock.os
|
||||||
lwt.unix)
|
lwt.unix)
|
||||||
(synopsis "Lwt-specific helpers for opentelemetry-client"))
|
(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 = {
|
type t = {
|
||||||
notified: bool Atomic.t;
|
notified: bool Atomic.t;
|
||||||
cond: unit Lwt_condition.t;
|
cond: unit Lwt_condition.t;
|
||||||
notification: Lwt_unix.notification;
|
notification: Types_.notification;
|
||||||
lwt_tid: int; (** thread ID where lwt runs *)
|
lwt_tid: int; (** thread ID where lwt runs *)
|
||||||
deleted: bool Atomic.t;
|
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