ST
(defn parseInt [^String s]
#?(:clj (Integer/parseInt s)
:cljs (js/parseInt s)))
(defn try-parse-int [s]
(some->> s str (re-matches #"[-+]?\d+") parseInt))
(defn try-parse-int [x]
(try
(cond (string? x) (Integer/parseInt x)
(integer? x) x)
(catch Throwable _)))