mirror of
https://github.com/ocaml-tracing/ocaml-trace.git
synced 2026-03-08 20:07:55 -04:00
fix for 4.08
This commit is contained in:
parent
4098e88c68
commit
d1759fea89
1 changed files with 1 additions and 1 deletions
|
|
@ -44,7 +44,7 @@ open struct
|
||||||
let put_in_ready (self : t) buf : unit =
|
let put_in_ready (self : t) buf : unit =
|
||||||
if Buf.size buf > 0 then (
|
if Buf.size buf > 0 then (
|
||||||
let@ q = Lock.with_ self.ready in
|
let@ q = Lock.with_ self.ready in
|
||||||
Atomic.set self.has_ready true;
|
A.set self.has_ready true;
|
||||||
Queue.push buf q
|
Queue.push buf q
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue