core: move split-at/split-with/ident?/qualified-ident?/simple-ident? to overlay
Second pure-fn batch (jolt-1j0 phase 2). All leaf fns; canonical Clojure defs. split-with now returns seqs for the parts (drop-while is a seq), matching Clojure rather than the prior all-vector result — value-equal either way. conformance 218/218 x3, clojure-test-suite 3927, core-bench 2333ms (~baseline).
This commit is contained in:
parent
16cd617bd6
commit
681b007b7a
2 changed files with 10 additions and 20 deletions
|
|
@ -65,3 +65,13 @@
|
|||
(defn not-any? [pred coll] (not (some pred coll)))
|
||||
|
||||
(defn not-every? [pred coll] (not (every? pred coll)))
|
||||
|
||||
(defn split-at [n coll] [(take n coll) (drop n coll)])
|
||||
|
||||
(defn split-with [pred coll] [(take-while pred coll) (drop-while pred coll)])
|
||||
|
||||
(defn ident? [x] (or (keyword? x) (symbol? x)))
|
||||
|
||||
(defn qualified-ident? [x] (or (qualified-symbol? x) (qualified-keyword? x)))
|
||||
|
||||
(defn simple-ident? [x] (or (simple-symbol? x) (simple-keyword? x)))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue