Add comment based on Miikka's comments

This commit is contained in:
Tommi Reiman 2017-08-22 16:44:05 +03:00
parent f893be3d00
commit b23bcfbd30

View file

@ -61,6 +61,7 @@
(cond->> (->> (walk data opts) (map-meta merge-meta))
coerce (into [] (keep #(coerce % opts)))))
;; This whole function might be more efficient and easier to understand with transducers.
(defn conflicting-routes [routes]
(some->>
(loop [[r & rest] routes, acc {}]