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
|
#ifndef __LUA_BIND_CFUNCTIONS_H__
#define __LUA_BIND_CFUNCTIONS_H__
#include "LuaBindConfig.h"
/**
* luax_cfunction里的函数用来注册给lua，一些特殊功能的通用函数。
*/
namespace
{
// 获得第一个upvalue
extern int luax_c_getupvalue(lua_State* L);
// 调用此函数时会报错，upvalue(1)是错误信息
extern int luax_c_errfunc(lua_State* L);
#define luax_is(T, L, i) (lua_is##T(L, i))
#define luax_isnumber(L, i) luax_is(number, L, i)
inline int luax_isinteger(lua_State* L, int i)
{
if (!luax_isnumber(L, i))
return 0;
return lua_tonumber(L, i) == lua_tointeger(L, i);
}
inline int luax_isfloat(lua_State* L, int i)
{
if (!luax_isnumber(L, i))
return 0;
return lua_tonumber(L, i) != lua_tointeger(L, i);
}
}
#endif
|
