#include <libguile.h>
#include "vector3d.h"
-extern "C" {
-
- SCM
- scm_from_vector3df (irr::core::vector3df vector3d)
- {
- return scm_list_3 (scm_from_double (vector3d.X),
- scm_from_double (vector3d.Y),
- scm_from_double (vector3d.Z));
- }
-
- irr::core::vector3df
- scm_to_vector3df (SCM vector3d)
- {
- return irr::core::vector3df
- (scm_to_double (scm_car (vector3d)),
- scm_to_double (scm_cadr (vector3d)),
- scm_to_double (scm_caddr (vector3d)));
- }
+using namespace irr;
+
+
+SCM
+scm_from_vector3df (core::vector3df vector3d)
+{
+ return scm_list_3 (scm_from_double (vector3d.X),
+ scm_from_double (vector3d.Y),
+ scm_from_double (vector3d.Z));
+}
+
+
+core::vector3df
+scm_to_vector3df (SCM vector3d)
+{
+ return core::vector3df
+ (scm_to_double (scm_car (vector3d)),
+ scm_to_double (scm_cadr (vector3d)),
+ scm_to_double (scm_caddr (vector3d)));
}
#include <irrlicht/irrlicht.h>
#include <libguile.h>
-extern "C" {
+SCM
+scm_from_vector3df (irr::core::vector3df vector3d);
- SCM
- scm_from_vector3df (irr::core::vector3df vector3d);
-
- irr::core::vector3df
- scm_to_vector3df (SCM vector3d);
-
-}
+irr::core::vector3df
+scm_to_vector3df (SCM vector3d);
#endif