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

removed dead code

Browse source
This commit is contained in:
Nathan Marz 2015-09-12 14:15:17 -04:00
parent f89d76dbe4
commit 42befa556e
1 changed files with 0 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -551,25 +551,6 @@
res res
))) )))
(deftype ViewPath [view-fn])
(extend-protocol p/StructurePath
ViewPath
(select* [^ViewPath this structure next-fn]
(->> structure ((.-view-fn this)) next-fn))
(transform* [^ViewPath this structure next-fn]
(->> structure ((.-view-fn this)) next-fn)
))
(deftype PutValCollector [val])
(extend-protocol p/Collector
PutValCollector
(collect-val [^PutValCollector this structure]
(.-val this)
))
(extend-protocol p/StructurePath (extend-protocol p/StructurePath
nil nil
(select* [this structure next-fn] (select* [this structure next-fn]