Yaltik/hy
2
0
Fork 0
Code Pull Requests Releases Activity

Replace forgotten instances of coll? function

Browse Source 
Replacing coll? wherever applicable
This commit is contained in:
Abhishek L 2014-02-03 21:48:30 +05:30
parent e8dfe5bfb2
commit 4432c00c59
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hy/core/language.hy
View File

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