Skip to content

Commit

Permalink
* src/cljs/cljs/core.cljs: clean up delcares
Browse files Browse the repository at this point in the history
  • Loading branch information
swannodette committed Feb 20, 2012
1 parent 5365601 commit 9eadccd
Showing 1 changed file with 6 additions and 3 deletions.
9 changes: 6 additions & 3 deletions src/cljs/cljs/core.cljs
Expand Up @@ -324,6 +324,8 @@ reduces them without incurring seq initialization"
(recur (f val (-nth cicoll n)) (inc n))
val))))

(declare hash-coll cons)

(deftype IndexedSeq [a i]
ISeqable
(-seq [this] this)
Expand Down Expand Up @@ -1041,6 +1043,8 @@ reduces them without incurring seq initialization"
(str* sb)))
(gstring/StringBuffer. (str* x)) ys)))

(declare apply)

(defn str
"With no args, returns the empty string. With one arg x, returns
x.toString(). (str nil) returns the empty string. With more than
Expand Down Expand Up @@ -1098,6 +1102,8 @@ reduces them without incurring seq initialization"
(defn- hash-coll [coll]
(reduce #(hash-combine %1 (hash %2)) (hash (first coll)) (next coll)))

(declare name)

(defn- extend-object!
"Takes a JavaScript object and a map of names to functions and
attaches said functions as methods on the object. Any references to
Expand Down Expand Up @@ -1220,8 +1226,6 @@ reduces them without incurring seq initialization"
[x seq]
(Cons. nil x seq))

(declare hash-map)

(extend-type string
IHash
(-hash [o] (goog.string/hashCode o))
Expand Down Expand Up @@ -2234,7 +2238,6 @@ reduces them without incurring seq initialization"
(> a b) 1
:else 0)))

(declare hash-map)
(deftype ObjMap [meta keys strobj]
IWithMeta
(-with-meta [coll meta] (ObjMap. meta keys strobj))
Expand Down

0 comments on commit 9eadccd

Please sign in to comment.