thank you colin jones

default_args.clj

(defmacro def-defaults [name args defaults & exprs]
  `(defn ~name [~@args & {:keys ~(vec (keys defaults)) :or ~defaults}]
     ~@exprs))

(def-defaults use-the-operator [a b] {operator +} (operator a b))

(prn "--------------------------")
(prn (use-the-operator 1 2)) ; --> 3
(prn (use-the-operator 1 2 :operator *)) ; --> 2
(prn "--------------------------")

Look I'm writing closure

`(--> (~@d & {:k ~(.Wow "code" :or ~such :and '[@readable {:much ~@syntax}])))