(make-c-struct vector3df data))
;; aabbox3df struct
-(define-wrapped-pointer-type aabbox3df
+(define-wrapped-pointer-type aabbox3df-type
aabbox3df?
pointer->aabbox3df aabbox3df->pointer
(lambda (box port)
(export aabbox3df->pointer)
-(define aabbox3df-type
+(define-public aabbox3df
(list vector3df vector3df))
(define-public (make-aabbox3df)
(pointer->aabbox3df
- (make-c-struct aabbox3df-type '((0 0 0) (0 0 0)))))
+ (make-c-struct aabbox3df '((0 0 0) (0 0 0)))))
(define-foreign aabbox3d-add-internal-point
void "irr_core_aabbox3d_addInternalPoint" (list '* '*))