(define-public begin-scene
(pointer->procedure
int
- (dynamic-func "irr_video_IVideoDriver_beginScene" cirr)
+ (dynamic-func "irr_video_beginScene" cirr)
(list '* int int '* '* '*)))
(define-public end-scene
(pointer->procedure
int
- (dynamic-func "irr_video_IVideoDriver_endScene" cirr)
+ (dynamic-func "irr_video_endScene" cirr)
(list '*)))