(dynamic-func "irr_IrrlichtDevice_getVideoDriver" cirr)
(list '*)))
+(define-public get-gui-environment
+ (pointer->procedure
+ '*
+ (dynamic-func "irr_IrrlichtDevice_getGUIEnvironment" cirr)
+ (list '*)))
+
(define-public get-scene-manager
(pointer->procedure
'*