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