#include "box3d.h"
#include "gsubr.h"
#include "vector3d.h"
-
+#include "wrapped.h"
using namespace irr;
-
SCM
-irr_core_aabbox3d_addInternalPoint (SCM box3d,
- SCM point)
+aabbox3d_addInternalPoint (SCM box3d,
+ SCM point)
{
- ((core::aabbox3df*)scm_to_pointer (box3d))->addInternalPoint (scm_to_vector3df (point));
+ ((core::aabbox3df*)scm_to_irr_pointer (box3d))->addInternalPoint (scm_to_vector3df (point));
return SCM_UNSPECIFIED;
}
-
SCM
-irr_core_aabbox3d_make ()
+aabbox3d_make ()
{
core::aabbox3df* aabbox = new core::aabbox3df ();
return scm_from_pointer ((void*)aabbox, NULL);
}
-
SCM
-irr_core_aabbox3d_reset (SCM box3d,
- SCM init_value)
+aabbox3d_reset (SCM box3d,
+ SCM init_value)
{
- ((core::aabbox3df*)scm_to_pointer (box3d))->reset (scm_to_vector3df (init_value));
+ ((core::aabbox3df*)scm_to_irr_pointer (box3d))->reset (scm_to_vector3df (init_value));
return SCM_UNSPECIFIED;
}
-
-extern "C" {
-
- void
- init_box3d (void)
- {
- DEFINE_GSUBR ("irr_core_aabbox3d_addInternalPoint", 2, 0, 0,
- irr_core_aabbox3d_addInternalPoint);
- DEFINE_GSUBR ("irr_core_aabbox3d_make", 0, 0, 0,
- irr_core_aabbox3d_make);
- DEFINE_GSUBR ("irr_core_aabbox3d_reset", 2, 0, 0,
- irr_core_aabbox3d_reset);
- }
-
+void
+init_box3d (void)
+{
+ DEFINE_GSUBR ("aabbox3d_addInternalPoint", 2, 0, 0, aabbox3d_addInternalPoint);
+ DEFINE_GSUBR ("aabbox3d_make", 0, 0, 0, aabbox3d_make);
+ DEFINE_GSUBR ("aabbox3d_reset", 2, 0, 0, aabbox3d_reset);
}