                        @recording)))
 (util/defalias r-pr rec-print)
 
-(defn mk-printer-*-list
+(defn- mk-printer-*-list
   [opts init-prn whitelist?]
   (loop [prn init-prn
          opts' opts]

                         name
                         args))
    (ws-deref! workspace)))


(defn ws-deep-trace-apply
  [qual-sym args]

  [] (#'ws/clear-log! (ws-init! :quiet)))
(util/defalias w-cl! ws-clear-log!)

(defn- ws-add-trace-fn!*
  "`fn-sym` is a symbol that references an existing function. Applies an
  enabled trace to said functions. Adds the traces to the active
  workspace trace set."
