Skip to content

Instantly share code, notes, and snippets.

@fogus fogus/zencat.clj
Created Jul 7, 2011

Embed
What would you like to do?
(defn zencat [x y]
(loop [src y, ret (transient x)]
(if (seq src)
(recur (next src)
(conj! ret (first src)))
(persistent! ret))))
(zencat [1 2 3] [4 5 6])
;=> [1 2 3 4 5 6]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.