X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Freference-counted.cpp;h=24394a4d850a67dd90d887aecf5f6a4fde4b6ee6;hb=79e12d94cc21232477796a4e76fc2ddb5d88f9dc;hp=1bdc8daf8737de65dc5791d363a18a6f68d29262;hpb=41a6ad96e81a8d8153c54877c4c12f61100677a9;p=guile-irrlicht.git

diff --git a/src/reference-counted.cpp b/src/reference-counted.cpp
index 1bdc8da..24394a4 100644
--- a/src/reference-counted.cpp
+++ b/src/reference-counted.cpp
@@ -23,6 +23,7 @@
 #include <libguile.h>
 #include "gsubr.h"
 #include "reference-counted.h"
+#include "wrapped.h"
 
 using namespace irr;
 
@@ -30,11 +31,13 @@ template <typename T>
 SCM
 IReferenceCounted_drop (SCM obj)
 {
-  return scm_from_bool (((T) scm_to_pointer (obj))->drop ());
+  return scm_from_bool (((T) scm_to_irr_pointer (obj))->drop ());
 }
 
 void
 init_reference_counted (void)
 {
   DEFINE_GSUBR ("IrrlichtDevice_drop", 1, 0, 0, IReferenceCounted_drop<IrrlichtDevice*>);
+  DEFINE_GSUBR ("ISceneNodeAnimator_drop", 1, 0, 0,
+                IReferenceCounted_drop<scene::ISceneNodeAnimator*>);
 }