From d1759fea8989ae67e4ff599741c4a360ee82932a Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Wed, 7 May 2025 22:32:29 -0400
Subject: [PATCH] fix for 4.08

---
 src/fuchsia/buf_chain.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fuchsia/buf_chain.ml b/src/fuchsia/buf_chain.ml
index 77616e5..f31d81b 100644
--- a/src/fuchsia/buf_chain.ml
+++ b/src/fuchsia/buf_chain.ml
@@ -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
     )