draw-all

[guile-irrlicht.git] / irrlicht / scene.scm

diff --git a/irrlicht/scene.scm b/irrlicht/scene.scm
index c1fac94bea43aa1d63b0f6737d25a77d0af56a3d..cf51aa56866c7fa8c44f39d9a3d9b71abe8f5724 100644 (file)
--- a/irrlicht/scene.scm
+++ b/irrlicht/scene.scm
@@ -85,6 +85,10 @@
        id
        make-active))))
 
+(define-method (draw-all (scene-manager <scene-manager>))
+  ((get-irrlicht-proc "drawAll" scene-manager)
+   (irr-pointer scene-manager)))
+
 (define-method (get-mesh (scene-manager <scene-manager>) filename)
   (make <animated-mesh>
     #:irr-pointer
@@ -92,7 +96,7 @@
      (irr-pointer scene-manager)
      filename)))
 
-(export <scene-manager> add-animated-mesh-scene-node! add-camera-scene-node! get-mesh)
+(export <scene-manager> add-animated-mesh-scene-node! add-camera-scene-node! draw-all get-mesh)
 
 
 ;; ISceneNode