test/test_held_type.cpp

   1 #include <boost/shared_ptr.hpp>
   2
   3
   4 namespace luabind
   5 {
   6         namespace detail
   7         {
   8                 template<class T>
   9                 T* get_pointer(boost::shared_ptr<T>& p) { return p.get(); }
  10         }
  11 }
  12
  13 #include "test.h"
  14
  15 namespace
  16 {
  17
  18         LUABIND_ANONYMOUS_FIX int feedback = 0;
  19
  20         struct held_type_test
  21         {
  22                 held_type_test(): val(4) { feedback = 3; }
  23                 ~held_type_test() { feedback = 1; }
  24                 int val;
  25         };
  26
  27         void tester(held_type_test* t)
  28         {
  29                 if (t->val == 4) feedback = 2;
  30         }
  31
  32 } // anonymous namespace
  33
  34
  35 bool test_held_type()
  36 {
  37         // This feature is not finished yet
  38
  39         using namespace luabind;
  40
  41         {
  42                 lua_State* L = lua_open();
  43                 lua_closer c(L);
  44                 int top = lua_gettop(L);
  45
  46                 open(L);
  47
  48                 function(L, "tester", &tester);
  49
  50                 class_<held_type_test, boost::shared_ptr<held_type_test> >("held_type_test")
  51                         .def(constructor<>())
  52                         .commit(L)
  53                         ;
  54
  55                 object g = get_globals(L);
  56                 g["test"] = boost::shared_ptr<held_type_test>(new held_type_test());
  57                 if (dostring(L, "tester(test)")) return false;
  58                 if (feedback != 2) return false;
  59                 if (dostring(L, "a = held_type_test()"))
  60                 if (feedback != 3) return false;
  61                 if (top != lua_gettop(L)) return false;
  62
  63         }
  64         if (feedback != 1) return false;
  65
  66         return true;
  67 }
  68