fix for 4.08

This commit is contained in:
Simon Cruanes 2025-05-07 22:32:29 -04:00
parent 4098e88c68
commit d1759fea89
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -44,7 +44,7 @@ open struct
let put_in_ready (self : t) buf : unit =
if Buf.size buf > 0 then (
let@ q = Lock.with_ self.ready in
Atomic.set self.has_ready true;
A.set self.has_ready true;
Queue.push buf q
)