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
|
//
//
#include "LuaSEXP.h"
namespace scripting {
namespace api {
lua_sexp_h::lua_sexp_h(sexp::LuaSEXP* handle) : sexp_handle(handle) {
}
lua_sexp_h::lua_sexp_h() : sexp_handle(nullptr) {
}
bool lua_sexp_h::isValid() const {
return sexp_handle != nullptr;
}
ADE_OBJ(l_LuaSEXP, lua_sexp_h, "LuaSEXP", "Lua SEXP handle");
ADE_VIRTVAR(Action,
l_LuaSEXP,
"function(any... args) => void action",
"The action of this SEXP",
"function(any... args) => void action",
"The action function or nil on error")
{
lua_sexp_h lua_sexp;
luacpp::LuaFunction action_arg;
if (!ade_get_args(L, "o|u", l_LuaSEXP.Get(&lua_sexp), &action_arg)) {
return ADE_RETURN_NIL;
}
if (!lua_sexp.isValid()) {
return ADE_RETURN_NIL;
}
if (ADE_SETTING_VAR) {
Assertion(action_arg.isValid(), "Action function reference must be valid!");
lua_sexp.sexp_handle->setAction(action_arg);
}
auto action = lua_sexp.sexp_handle->getAction();
return ade_set_args(L, "u", &action);
}
}
}
|
