(defn get-cljs-arglists [args]
(loop [args args
arglists []]
(if-let [arg (first args)]
(cond
(vector? arg)
(list arg)
(and (list? arg) (vector? (first arg)))
(recur (rest args) (conj arglists (first arg)))
:else
(recur (rest args) arglists))
arglists)))