   ([x & {:keys [meta validator]}] (RAtom. x meta validator nil)))
 
 
-
 ;;; track
 
 (declare make-reaction)

(def temp-reaction (make-reaction nil))

(defn run-in-reaction [f obj key run opts]
  (let [rea temp-reaction
        res (deref-capture f rea)]
    (when-not (nil? (.-watching rea))
      (set! temp-reaction (make-reaction nil))
      (set! (.-f rea) f)
      (._set-opts rea opts)
      (set! (.-auto-run rea) #(run obj))
      (aset obj key rea))
    res))

(defn check-derefs [f]

  (RCursor. src path nil nil nil))


;;; with-let support

(defn with-let-destroy [v]
