+(define-method (set-transform! (video-driver <video-driver>) state mat)
+ (let ((setTransform (get-irrlicht-proc "setTransform" video-driver)))
+ (setTransform video-driver state mat)))
+
+(export <video-driver> begin-scene draw-vertex-primitive-list end-scene get-fps get-name get-texture
+ set-material! set-transform!)