(define-module (irrlicht bindings core)
- #:use-module (system foreign))
+ #:use-module (system foreign)
+ #:use-module (irrlicht util))
-;; dimension2d struct
-(define-public dimension2d
- (list uint32 uint32))
+;; vector2df struct
+(define-public vector2df
+ (list float float float))
-;; rect struct
-(define-public rect
- (list int32 int32 int32 int32))
+;; vector3df struct
+(define-public vector3df
+ (list float float float))
+
+;; aabbox3d f32 struct and functions
+(define-public aabbox3d_f32
+ (append
+ vector3df ; min-edge
+ vector3df ; max-edge
+ ))
+
+(define-foreign aabbox3d-add-internal-point
+ void "irr_core_aabbox3d_addInternalPoint" (list '* '*))
+
+(define-foreign aabbox3d-reset
+ void "irr_core_aabbox3d_reset" (list '* '*))