1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
#include <iostream>
extern "C"
{
#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"
}
bool dostring(lua_State* L, const char* str)
{
if (luaL_loadbuffer(L, str, std::strlen(str), str) || lua_pcall(L, 0, 0, 0))
{
const char* a = lua_tostring(L, -1);
std::cout << a << "\n";
lua_pop(L, 1);
return true;
}
return false;
}
#include <luabind/luabind.hpp>
#include <luabind/detail/convert_to_lua.hpp>
#include <boost/any.hpp>
template<class T>
struct convert_any
{
static void convert(lua_State* L, const boost::any& a)
{
luabind::detail::convert_to_lua(L, *boost::any_cast<T>(&a));
}
};
std::map<const std::type_info*, void(*)(lua_State*, const boost::any&)> any_converters;
template<class T>
void register_any_converter()
{
any_converters[&typeid(T)] = convert_any<T>::convert;
}
namespace luabind
{
namespace converters
{
yes_t is_user_defined(by_value<boost::any>);
yes_t is_user_defined(by_const_reference<boost::any>);
void convert_cpp_to_lua(lua_State* L, const boost::any& a)
{
typedef void(*conv_t)(lua_State* L, const boost::any&);
conv_t conv = any_converters[&a.type()];
conv(L, a);
}
}
}
boost::any f(bool b)
{
if (b) return "foobar";
else return 3.5f;
}
int main()
{
register_any_converter<int>();
register_any_converter<float>();
register_any_converter<const char*>();
register_any_converter<std::string>();
lua_State* L = luaL_newstate();
#if LUA_VERSION_NUM >= 501
luaL_openlibs(L);
#else
lua_baselibopen(L);
#endif
using namespace luabind;
open(L);
module(L)
[
def("f", &f)
];
dostring(L, "print( f(true) )");
dostring(L, "print( f(false) )");
dostring(L, "function update(p) print(p) end");
boost::any param = std::string("foo");
luabind::call_function<void>(L, "update", param);
lua_close(L);
}
|
