test/test_dynamic_type.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 Base
   9 {
  10     Base(int value)
  11       : value(value)
  12     {}
  13
  14     virtual ~Base()
  15     {}
  16
  17     int g() const
  18     {
  19         return value;
  20     }
  21
  22     int value;
  23 };
  24
  25 struct Derived : Base
  26 {
  27     Derived()
  28       : Base(2)
  29     {}
  30
  31     int f() const
  32     {
  33         return 1;
  34     }
  35 };
  36
  37 struct Unregistered : Base
  38 {
  39     Unregistered()
  40       : Base(3)
  41     {}
  42 };
  43
  44 std::auto_ptr<Base> make_derived()
  45 {
  46     return std::auto_ptr<Base>(new Derived);
  47 }
  48
  49 std::auto_ptr<Base> make_unregistered()
  50 {
  51     return std::auto_ptr<Base>(new Unregistered);
  52 }
  53
  54 void test_main(lua_State* L)
  55 {
  56     using namespace luabind;
  57
  58     module(L) [
  59         class_<Base>("Base")
  60             .def("g", &Base::g),
  61         class_<Derived, Base>("Derived")
  62             .def("f", &Derived::f),
  63         def("make_derived", &make_derived),
  64         def("make_unregistered", &make_unregistered)
  65     ];
  66
  67     DOSTRING(L,
  68         "x = make_derived()\n"
  69         "assert(x:f() == 1)\n"
  70     );
  71
  72     DOSTRING(L,
  73         "x = make_unregistered()\n"
  74         "assert(x:g() == 3)\n"
  75     );
  76 }