diff --git a/src/Std/Sync/Channel.lean b/src/Std/Sync/Channel.lean
index 201c68e9e9..f10a433a40 100644
--- a/src/Std/Sync/Channel.lean
+++ b/src/Std/Sync/Channel.lean
@@ -391,17 +391,24 @@ private def isClosed (ch : Bounded α) : BaseIO Bool :=
     return (← get).closed
 
 private def tryRecv' : AtomicT (Bounded.State α) BaseIO (Option α) := do
-  let st ← get
+  let mut st ← get
   if st.bufCount == 0 then
     return none
   else
     let val ← st.buf[st.recvIdx]'st.hrecv |>.swap none
     let nextRecvIdx := incMod st.recvIdx st.capacity
-    set { st with
+    st := { st with
       bufCount := st.bufCount - 1
       recvIdx := nextRecvIdx,
       hrecv := incMod_lt st.hrecv
     }
+
+    if let some (producer, producers) := st.producers.dequeue? then
+      producer.resolve true
+      st := { st with producers }
+
+    set st
+
     return val
 
 private def tryRecv (ch : Bounded α) : BaseIO (Option α) :=
@@ -411,10 +418,6 @@ private def tryRecv (ch : Bounded α) : BaseIO (Option α) :=
 private partial def recv (ch : Bounded α) : BaseIO (Task (Option α)) := do
   ch.state.atomically do
     if let some val ← tryRecv' then
-      let st ← get
-      if let some (producer, producers) := (← get).producers.dequeue? then
-        producer.resolve true
-        set { st with producers }
       return .pure <| some val
     else if (← get).closed then
       return .pure none