#:use-module (system foreign)
#:use-module ((irrlicht bindings core) #:prefix ffi-core:)
#:use-module ((irrlicht bindings video) #:prefix ffi-video:)
+ #:use-module (irrlicht util)
#:export (begin-scene
end-scene
get-fps
(video-data %null-pointer)
(source-rect '()))
(ffi-video:begin-scene driver
- (if back-buffer 1 0)
- (if z-buffer 1 0)
+ (bool->integer back-buffer)
+ (bool->integer z-buffer)
(make-c-struct ffi-video:scolor color)
video-data
(if (null? source-rect)