Correct documentation of reactive/barrier.

barrier.clj

;; Given a seq of channels, waits until each channel has received a value, and
;; then returns a vec of each value.
(defn barrier [cs]
  (go (loop [cs (seq cs) result []]
        (if cs
          (recur (next cs) (conj result (<! (first cs))))
          result))))