Skip to content

Commit

Permalink
move sequence down
Browse files Browse the repository at this point in the history
  • Loading branch information
swannodette committed Dec 3, 2013
1 parent 2a8c2a9 commit a7ed3eb
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions src/cljs/cljs/core.cljs
Original file line number Diff line number Diff line change
Expand Up @@ -475,14 +475,6 @@

:else (throw (js/Error. (str coll "is not ISeqable"))))))

(defn ^seq sequence
"Coerces coll to a (possibly empty) sequence, if it is not already
one. Will not force a lazy seq. (sequence nil) yields ()"
[coll]
(if (seq? coll)
coll
(or (seq coll) ())))

(defn first
"Returns the first item in the collection. Calls seq on its
argument. If coll is nil, returns nil."
Expand Down Expand Up @@ -1261,6 +1253,14 @@ reduces them without incurring seq initialization"

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Seq fns ;;;;;;;;;;;;;;;;

(defn ^seq sequence
"Coerces coll to a (possibly empty) sequence, if it is not already
one. Will not force a lazy seq. (sequence nil) yields ()"
[coll]
(if (seq? coll)
coll
(or (seq coll) ())))

(defn ^number compare
"Comparator. Returns a negative number, zero, or a positive number
when x is logically 'less than', 'equal to', or 'greater than'
Expand Down

0 comments on commit a7ed3eb

Please sign in to comment.