Merge pull request #492 from theanalyst/fix/coll

Replace forgotten instances of coll? function
This commit is contained in:
Berker Peksag 2014-03-08 18:42:38 +02:00
commit a11f92da37

View File

@ -114,7 +114,7 @@
(defn fake-source-positions [tree]
"Fake the source positions for a given tree"
(if (and (iterable? tree) (not (string? tree)))
(if (coll? tree)
(for* [subtree tree]
(fake-source-positions subtree)))
(for* [attr '[start-line end-line start-column end-column]]
@ -135,7 +135,7 @@
(raise (TypeError (.format "{0!r} is not a collection" coll)))))
(defn _flatten [coll result]
(if (and (iterable? coll) (not (string? coll)))
(if (coll? coll)
(do (for* [b coll]
(_flatten b result)))
(.append result coll))