test/test_extend_class_in_lua.cpp

   1 // Copyright Daniel Wallin 2009. Use, modification and distribution is
   2 // subject to the Boost Software License, Version 1.0. (See accompanying
   3 // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
   4
   5 #include "test.hpp"
   6 #include <luabind/luabind.hpp>
   7
   8 struct CppClass
   9 {
  10     int f(int x)
  11     {
  12         return x;
  13     }
  14 };
  15
  16 void test_main(lua_State* L)
  17 {
  18     using namespace luabind;
  19
  20     module(L) [
  21         class_<CppClass>("CppClass")
  22           .def(constructor<>())
  23           .def("f", &CppClass::f)
  24     ];
  25
  26     DOSTRING(L,
  27         "function CppClass:f_in_lua(x)\n"
  28         "    return self:f(x) * 2\n"
  29         "end\n"
  30     );
  31
  32     DOSTRING(L,
  33         "x = CppClass()\n"
  34         "assert(x:f(1) == 1)\n"
  35         "assert(x:f_in_lua(1) == 2)\n"
  36     );
  37 }