从文档字符串中的引用："(link: ...)每个输出必须在接受下一个项目分发之前接受它。"
`
(def ch (chan))
(def m (mult ch))
(def t-1 (chan))
(def t-2 (chan))
(def t-3 (chan))
(def t-1-takes (atom []))
(defn log [l] (partial swap! l conj))
(tap m t-1)
(tap m t-2)
(tap m t-3)
(close! t-3)
(take! t-1 (log t-1-takes))
(take! t-1 (log t-1-takes)) ;; 这个 take 不应该在之前发生
;; a take on t-2
(put! ch true)
(put! ch true)
@t-1-takes
;-> [true true] ;; 但它确实发生了。
`
原因是当被连接的通道已经关闭时，内部原子 dctr 会减少两次。
