From: Javier Sancho Date: Mon, 11 May 2020 11:49:45 +0000 (+0200) Subject: set-material-flag! X-Git-Url: https://git.jsancho.org/?a=commitdiff_plain;h=5cd7046669d8cb991f75e1e56b4155f29bb80935;p=guile-irrlicht.git set-material-flag! --- diff --git a/irrlicht.scm b/irrlicht.scm index dcb4de5..c9d8867 100644 --- a/irrlicht.scm +++ b/irrlicht.scm @@ -31,4 +31,5 @@ get-scene-manager get-video-driver is-empty? + set-material-flag! set-window-caption!)) diff --git a/irrlicht/scene.scm b/irrlicht/scene.scm index da0336b..ee47d4c 100644 --- a/irrlicht/scene.scm +++ b/irrlicht/scene.scm @@ -79,7 +79,13 @@ (define-class () (irr-class #:init-value "ISceneNode" #:getter irr-class)) -(export ) +(define-method (set-material-flag! (node ) flag new-value) + ((get-irrlicht-proc "setMaterialFlag" node) + (irr-pointer node) + flag + new-value)) + +(export set-material-flag!) ;; ISceneNode