-(define irr-begin-scene begin-scene)
-(define* (begin-scene video-driver
- #:key
- (back-buffer #t)
- (z-buffer #t)
- (color '(255 0 0 0))
- (video-data #f)
- (source-rect #f))
- (irr-begin-scene video-driver
- back-buffer
- z-buffer
- color
- video-data
- source-rect))