cljs.spec/unstrument*

(defn unstrument*
  [v]
  (locking instrumented-vars
           (when-let [{:keys [raw wrapped]} (get @instrumented-vars v)]
             (let [current @v]
               (when (= wrapped current)
                 (swap! instrumented-vars dissoc v)
                 raw)))))