X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=irrlicht%2Fio.scm;h=0229ac32316b68e7a26c784da7da1a931152f837;hb=98052b04792129db97286fdd77ef3b0de8912286;hp=73961bb7655efdde69536940d86766a6419d4287;hpb=8c5c5f5fc4aef51c5dfa515b3a8eee67de3b8e9b;p=guile-irrlicht.git

diff --git a/irrlicht/io.scm b/irrlicht/io.scm
index 73961bb..0229ac3 100644
--- a/irrlicht/io.scm
+++ b/irrlicht/io.scm
@@ -25,6 +25,7 @@
 
 
 ;; IAttributeExchangingObject
-(define-class <attribute-exchanging-object> (<reference-counted>))
+(define-class <attribute-exchanging-object> (<reference-counted>)
+  (irr-class #:init-value "IAttributeExchangingObject" #:getter irr-class))
 
 (export <attribute-exchanging-object>)