cljs.spec.test.alpha/unstrument-1

(defmacro unstrument-1
  [[quote s]]
  (when-let [v (ana-api/resolve &env s)]
    (when (@instrumented-vars (:name v))
      (swap! instrumented-vars disj (:name v))
      `(let [raw# (#'unstrument-1* '~s (var ~s))]
         (when raw# (set! ~s raw#))
         '~(:name v)))))