core: Add ys::std/split with string and re swappable

yaml · Jun 18, 2024 · 39705d7 · 39705d7
1 parent b3a78e0
commit 39705d7
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/core/src/ys/std.clj b/core/src/ys/std.clj
@@ -329,6 +329,13 @@
 (defn sleep [s]
   (Thread/sleep (int (* 1000 s))))
 
+(defn split
+  ([s] (clojure.string/split s #""))
+  ([s r]
+    (let [[s r] (if (= java.util.regex.Pattern (type s)) [r s] [s r])
+          r (if (string? r) (re-pattern r) r)]
+      (clojure.string/split s r))))
+
 (defn throw [e] (throw e))
 
 (defn use-pod [pod-name version]