Skip to content

Commit

Permalink
Replace forgotten instances of coll? function
Browse files Browse the repository at this point in the history
Replacing coll? wherever applicable
  • Loading branch information
theanalyst committed Feb 3, 2014
1 parent e8dfe5b commit 4432c00
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions hy/core/language.hy
Original file line number Diff line number Diff line change
Expand Up @@ -110,7 +110,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]]
Expand All @@ -131,7 +131,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))
Expand Down

0 comments on commit 4432c00

Please sign in to comment.