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

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>)