 
 (defmacro tiled-map-cell
   [screen layer x y & options]
-  `(let [object# (tiled-map-cell* ~screen ~layer ~x ~y)]
-     (u/calls! ^TiledMapTileLayer$Cell object# ~@options)
-     object#))
+  `(u/calls! ^TiledMapTileLayer$Cell (tiled-map-cell* ~screen ~layer ~x ~y)
+             ~@options))
 
 (defmacro tiled-map-cell!
   [cell k & options]


(defmacro orthogonal-tiled-map
  [path unit & options]
  `(let [object# (orthogonal-tiled-map* ~path ~unit)]
     (u/calls! ^OrthogonalTiledMapRenderer object# ~@options)
     object#))

(defmacro orthogonal-tiled-map!
  [screen k & options]


(defmacro stage
  [& options]
  `(u/calls! ^Stage (stage*) ~@options))

(defmacro stage!
  [screen k & options]
