          (defn ~name
            ([] (~name @world-ref))
            ([^timsg.scene_var.types.Registry world#]
-            (when-let [^SceneVarAnchor sva# (obj-nil (get (.anchor->obj world#) ~kw))]
+            (when-let [^SceneVarAnchor sva# (obj-nil (anchor->obj ~kw))]
               (.gameObject sva#)))))))

(defonce world-ref
  (atom (Registry. {} {})))

(defn- obj->anchors []
  (let [^Registry world @world-ref]
    (.obj->anchors world)))

(defn- anchor->obj []
  (let [^Registry world @world-ref]
    (.anchor->obj world)))

(defn gc []
  (swap! world-ref

(defn sva-serialize [^SceneVarAnchor sva]
  (set! (.edn sva)
    (pr-str
      (obj->anchors sva))))

(defn sva-destroy [^SceneVarAnchor sva]
  (doseq [anchor (obj->anchors sva)]
    (dissoc-anchor! anchor)))

(defn sva-deserialize [^SceneVarAnchor sva]
