diff options
| author | pixel <pixel> | 2003-11-06 11:56:07 +0000 |
|---|---|---|
| committer | pixel <pixel> | 2003-11-06 11:56:07 +0000 |
| commit | bb6ade743cea6ba6f4f8746a12d52fd1886f4db9 (patch) | |
| tree | 5933870bd6be14674dab87bd8386631f16322f81 /lib/lua/includes/lvm.h | |
| parent | f70ad229bc765f3e6fd218f1e54bd0828fc9e1b4 (diff) | |
Adding LUA
Diffstat (limited to 'lib/lua/includes/lvm.h')
| -rw-r--r-- | lib/lua/includes/lvm.h | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/lib/lua/includes/lvm.h b/lib/lua/includes/lvm.h new file mode 100644 index 0000000..4fae948 --- /dev/null +++ b/lib/lua/includes/lvm.h @@ -0,0 +1,35 @@ +/*
+** $Id: lvm.h,v 1.1 2003-11-06 11:56:07 pixel 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))
+
+
+int luaV_lessthan (lua_State *L, const TObject *l, const TObject *r);
+int luaV_equalval (lua_State *L, const TObject *t1, const TObject *t2);
+const TObject *luaV_tonumber (const TObject *obj, TObject *n);
+int luaV_tostring (lua_State *L, StkId obj);
+const TObject *luaV_gettable (lua_State *L, const TObject *t, TObject *key,
+ int loop);
+void luaV_settable (lua_State *L, const TObject *t, TObject *key, StkId val);
+StkId luaV_execute (lua_State *L);
+void luaV_concat (lua_State *L, int total, int last);
+
+#endif
|