if set is constant make a static navigator for it

This commit is contained in:
Nathan Marz 2016-08-06 02:23:11 -04:00
parent 5e1f596e60
commit c4f5a1b02b

View file

@ -960,8 +960,10 @@
:else :else
(cond (set? p) (cond (set? p)
(do (swap! params-atom conj p) (if (constant-node? p)
pred*) p
(do (swap! params-atom conj p)
pred*))
(keyword? p) (keyword? p)
p p