(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