X-Git-Url: https://git.jsancho.org/?p=guile-irrlicht.git;a=blobdiff_plain;f=src%2Fbox3d.cpp;h=ed56fdc3228f514e9bbf52f30c5d153c5200f69e;hp=71571b1013b9e59772ca4ac1b02e20e787039fd3;hb=41a6ad96e81a8d8153c54877c4c12f61100677a9;hpb=bf2cb00e2ef19e2eb33557f900405f836ebe65a3 diff --git a/src/box3d.cpp b/src/box3d.cpp index 71571b1..ed56fdc 100644 --- a/src/box3d.cpp +++ b/src/box3d.cpp @@ -25,10 +25,8 @@ #include "gsubr.h" #include "vector3d.h" - using namespace irr; - SCM aabbox3d_addInternalPoint (SCM box3d, SCM point) @@ -37,7 +35,6 @@ aabbox3d_addInternalPoint (SCM box3d, return SCM_UNSPECIFIED; } - SCM aabbox3d_make () { @@ -45,7 +42,6 @@ aabbox3d_make () return scm_from_pointer ((void*)aabbox, NULL); } - SCM aabbox3d_reset (SCM box3d, SCM init_value) @@ -54,15 +50,10 @@ aabbox3d_reset (SCM box3d, return SCM_UNSPECIFIED; } - -extern "C" { - - 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); - } - +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); }