 
 (defmacro b-spline
   [points degree cont? & options]
-  `(u/calls! ^BSpline (b-spline* ~points ~degree ~cont?) ~@options))
+  `(let [^BSpline object# (b-spline* ~points ~degree ~cont?)]
+     (u/calls! object# ~@options)))
 
 (defmacro b-spline!
   [object k & options]


(defmacro plane
  [normal d & options]
  `(u/calls! ^Plane (plane* ~normal ~d) ~@options))

(defmacro plane!
  [object k & options]


(defmacro vector-2
  [x y & options]
  `(let [^Vector2 object# (vector-2* ~x ~y)]
     (u/calls! object# ~@options)))

(defmacro vector-2!
  [object k & options]
