 
 (defmacro orthographic-camera
   [& options]
-  `(let [object# (orthographic-camera*)]
-     (u/calls! ^OrthographicCamera object# ~@options)
-     object#))
+  `(u/calls! ^OrthographicCamera (orthographic-camera*) ~@options))
 
 (defmacro orthographic-camera!
   [screen k & options]


(defmacro tiled-map-layer
  [screen layer & options]
  `(let [object# (tiled-map-layer* ~screen ~layer)]
     (u/calls! ^TiledMapTileLayer object# ~@options)
     object#))

(defmacro tiled-map-layer!
  [layer k & options]


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

(defmacro stage!
  [screen k & options]
