Source
net/licenser/sandbox/tester.clj:6
top
(defn s-seq
"Convertns a form into a sequence."
[form]
(tree-seq #(and (coll? %) (not (empty? %)))
#(let [a (macroexpand %)]
(or (and (coll? a)
(seq a))
(list a)))
form))
Comments top
No comments for s-seq. Log in to add a comment.