diff options
author | chai <chaifix@163.com> | 2018-08-11 12:06:55 +0800 |
---|---|---|
committer | chai <chaifix@163.com> | 2018-08-11 12:06:55 +0800 |
commit | 2877e6b939b64b33c119997288bba42f86a06776 (patch) | |
tree | 6b044ec7a131787e391ba624e47709950a009c4b /Source/lua51/lvm.h | |
parent | 74f0f02a7de9cea83928a15e34d3cc80ee55efea (diff) |
Diffstat (limited to 'Source/lua51/lvm.h')
-rw-r--r-- | Source/lua51/lvm.h | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/Source/lua51/lvm.h b/Source/lua51/lvm.h new file mode 100644 index 0000000..484121b --- /dev/null +++ b/Source/lua51/lvm.h @@ -0,0 +1,36 @@ +/* +** $Id: lvm.h,v 2.5.1.1 2007/12/27 13:02:25 roberto Exp $ +** Lua virtual machine +** See Copyright Notice in lua.h +*/ + +#ifndef lvm_h +#define lvm_h + + +#include "ldo.h" +#include "lobject.h" +#include "ltm.h" + + +#define tostring(L,o) ((ttype(o) == LUA_TSTRING) || (luaV_tostring(L, o))) + +#define tonumber(o,n) (ttype(o) == LUA_TNUMBER || \ + (((o) = luaV_tonumber(o,n)) != NULL)) + +#define equalobj(L,o1,o2) \ + (ttype(o1) == ttype(o2) && luaV_equalval(L, o1, o2)) + + +LUAI_FUNC int luaV_lessthan (lua_State *L, const TValue *l, const TValue *r); +LUAI_FUNC int luaV_equalval (lua_State *L, const TValue *t1, const TValue *t2); +LUAI_FUNC const TValue *luaV_tonumber (const TValue *obj, TValue *n); +LUAI_FUNC int luaV_tostring (lua_State *L, StkId obj); +LUAI_FUNC void luaV_gettable (lua_State *L, const TValue *t, TValue *key, + StkId val); +LUAI_FUNC void luaV_settable (lua_State *L, const TValue *t, TValue *key, + StkId val); +LUAI_FUNC void luaV_execute (lua_State *L, int nexeccalls); +LUAI_FUNC void luaV_concat (lua_State *L, int total, int last); + +#endif |