| (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