   [{:keys [name kw init update]
     :as init-spec}]
   (let [anchor kw]
-    (-> (or (when-let [x (get (anchor->obj) anchor)]
+    (-> (or (when-let [x (anchor->obj anchor)]
               (if (null-obj? x)
                 (do (gc) ;; there shouldn't be any of these
                     nil)

(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 ~name
           ([] (~name @world-ref))
           ([^timsg.scene_var.types.Registry world#]
            (when-let [^SceneVarAnchor sva# (obj-nil (anchor->obj ~kw))]
              (.gameObject sva#)))))))
