 
 (defmacro grid-point-2
   [x y & options]
-  `(let [^GridPoint2 object# (grid-point-2* ~x ~y)]
-     (u/calls! object# ~@options)))
+  `(u/calls! ^GridPoint2 (grid-point-2* ~x ~y) ~@options))
 
 (defmacro grid-point-2!
   [object k & options]


(defmacro float-counter
  [window-size & options]
  `(let [^FloatCounter object# (float-counter* ~window-size)]
     (u/calls! object# ~@options)))

(defmacro float-counter!
  [object k & options]


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

(defmacro frustum!
  [object k & options]
