luciano/specter
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

have params-paramspath helper automatically compile the path, refactor filterer

Browse source
This commit is contained in:
Nathan Marz 2015-09-10 17:12:54 -04:00
parent efd4f2ee9a
commit 3187cdad34
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/com/rpl/specter.cljc
View file

@ -162,7 +162,7 @@
(defn codewalker [afn] (i/->CodeWalkerStructurePath afn))
(defn filterer [& path]
(params-paramspath [late (i/comp-paths* path)]
(params-paramspath [late path]
(select* [this structure next-fn]
(->> structure (filter #(i/selected?* late %)) doall next-fn))
(transform* [this structure next-fn]

2
src/com/rpl/specter/impl.cljc
View file

@ -381,7 +381,7 @@
))
)))
[]))
binding-decls (mapcat (fn [b] [(:path-sym b) (:path b)]) bindings)
binding-decls (mapcat (fn [b] [(:path-sym b) `(comp-paths* ~(:path b))]) bindings)
offset-decls (mapcat (fn [b] [(:offset-sym b) (:offset b)]) bindings)
needed-params (map (fn [b] `(num-needed-params ~(:path-sym b))) bindings)
latefn-decls (mapcat