Clojure macro to log bindings

log_bindings.clj

(defmacro logged-binding {:style/indent 1} [[symb val] & body]
  `(do
     (let [val# ~val]
       (println
        (colorize.core/magenta
         (format ~(format "[%s:%d] BOUND %s -> %%s" (ns-name *ns*) (:line (meta &form)) (str symb)) val#)))
       (let [result# (binding [~symb val#]
                       ~@body)]
         (println
          (colorize.core/red
           (format ~(format "[%s:%d] RESTORED %s -> %%s" (ns-name *ns*) (:line (meta &form)) (str symb)) ~symb)))
         result#))))

for debugging purposes

Replace calls to binding with logged-binding