Major rewrite of scripting support:

[supertux.git] / src / object / camera.cpp

diff --git a/src/object/camera.cpp b/src/object/camera.cpp
index c1077cc..61d404a 100644 (file)
--- a/src/object/camera.cpp
+++ b/src/object/camera.cpp
@@ -25,6 +25,8 @@
 #include "lisp/lisp.hpp"
 #include "lisp/writer.hpp"
 #include "lisp/list_iterator.hpp"
+#include "scripting/camera.hpp"
+#include "scripting/wrapper_util.hpp"
 #include "camera.hpp"
 #include "player.hpp"
 #include "tilemap.hpp"
@@ -46,6 +48,19 @@ Camera::~Camera()
 {
 }
 
+void
+Camera::expose(HSQUIRRELVM vm, int table_idx)
+{
+  Scripting::Camera* interface = new Scripting::Camera(this);
+  expose_object(vm, table_idx, interface, "Camera", true);
+}
+
+void
+Camera::unexpose(HSQUIRRELVM vm, int table_idx)
+{
+  Scripting::unexpose_object(vm, table_idx, "Camera");
+}
+
 const Vector&
 Camera::get_translation() const
 {