The defprint macro defines a function with a tweak: each time the function is called, it prints the values of its arguments. The tricky part is that it works also with desctructuring.

defprint.cljs

(ns my.best$macros)
(defmacro defprint1 [func-name args & body]
  `(defn ~func-name [& args#]
     (print '~func-name "called with: " args#)
     (let [~args args#]
       ~@body)))


(defmacro defprint2
  [name args & body]
  `(defn ~name [~@args]
     (do
       (print '~name "called with:" ~args)
       ~@body)))


(defmacro defprint3
  [name args & body]
  `(defn ~name ~args
     (do
       (print '~name "called with:" ~args)
       ~@body)))


(my.best/defprint1 hello-world-1 [& {:keys [language] 
                                  :or {language :en}}]
  (case language
    :fr "bonjour monde"
    :en "hello world"))


(my.best/defprint2 hello-world-2 [& {:keys [language] 
                                  :or {language :en}}]
  (case language
    :fr "bonjour monde"
    :en "hello world"))



(my.best/defprint3 hello-world-3 [& {:keys [language] 
                                  :or {language :en}}]
  (case language
    :fr "bonjour monde"
    :en "hello world"))

  [(with-out-str (hello-world-1 :language :fr))
   (with-out-str (hello-world-2 :language :fr))
   (with-out-str (hello-world-3 :language :fr))]