avoid adding nil to chan

clojure · Jan 16, 2025 · bb7186c · bb7186c
1 parent ffa73a9
commit bb7186c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/main/clojure/clojure/core/async.clj b/src/main/clojure/clojure/core/async.clj
@@ -491,7 +491,8 @@ to catch and handle."
        (Var/resetThreadBindingFrame captured-bindings#)
        (try
          (let [result# (do ~@body)]
-           (>!! c# result#))
+           (when-not (nil? result#)
+             (>!! c# result#)))
          (finally
            (close! c#)))))
      c#))