(define-class <box3d> (<irrlicht-base>)
(irr-class #:init-value "aabbox3d"))
+(define-method (add-internal-point! (box3d <box3d>) point)
+ (let ((addInternalPoint (get-irrlicht-proc "aabbox3d_addInternalPoint")))
+ (addInternalPoint box3d point)))
+
(define (make-box3d)
(let ((aabbox3d_make (get-irrlicht-proc "aabbox3d_make")))
- (make <box3d> #:irr-pointer (aabbox3d_make))))
+ (aabbox3d_make)))
(define-method (reset-box3d! (box3d <box3d>) init-value)
(let ((reset (get-irrlicht-proc "aabbox3d_reset")))
(reset box3d init-value)))
-(export <box3d> make-box3d reset-box3d!)
+(export <box3d> add-internal-point! make-box3d reset-box3d!)