(defn r-some? | |
"Super fast version of clojure.core/some that does minimal allocation" | |
[pred coll] | |
(reduce | |
(fn [acc v] | |
(if-let [val (pred coll)] | |
(reduced val) | |
acc)) | |
false | |
coll)) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment