1 files changed, 29 insertions, 0 deletions
diff --git a/lvm.h b/lvm.h
new file mode 100644
index 00000000..9a180e3e
--- /dev/null
+++ b/lvm.h
@@ -0,0 +1,29 @@
+/*
+** $Id: $
+** Lua virtual machine
+** See Copyright Notice in lua.h
+*/
+#ifndef lvm_h
+#define lvm_h
+#include "ldo.h"
+#include "lobject.h"
+#define tonumber(o) ((ttype(o) != LUA_T_NUMBER) && (luaV_tonumber(o) != 0))
+#define tostring(o) ((ttype(o) != LUA_T_STRING) && (luaV_tostring(o) != 0))
+void luaV_pack (StkId firstel, int nvararg, TObject *tab);
+int luaV_tonumber (TObject *obj);
+int luaV_tostring (TObject *obj);
+void luaV_gettable (void);
+void luaV_settable (TObject *t, int mode);
+void luaV_getglobal (Word n);
+void luaV_setglobal (Word n);
+StkId luaV_execute (Closure *func, StkId base);
+void luaV_closure (void);
+#endif

diff --git a/lvm.h b/lvm.h new file mode 100644 index 00000000..9a180e3e --- /dev/null +++ b/lvm.h
@@ -0,0 +1,29 @@
	1	/*
	2	** $Id: $
	3	** Lua virtual machine
	4	** See Copyright Notice in lua.h
	5	*/
	6
	7	#ifndef lvm_h
	8	#define lvm_h
	9
	10
	11	#include "ldo.h"
	12	#include "lobject.h"
	13
	14
	15	#define tonumber(o) ((ttype(o) != LUA_T_NUMBER) && (luaV_tonumber(o) != 0))
	16	#define tostring(o) ((ttype(o) != LUA_T_STRING) && (luaV_tostring(o) != 0))
	17
	18
	19	void luaV_pack (StkId firstel, int nvararg, TObject *tab);
	20	int luaV_tonumber (TObject *obj);
	21	int luaV_tostring (TObject *obj);
	22	void luaV_gettable (void);
	23	void luaV_settable (TObject *t, int mode);
	24	void luaV_getglobal (Word n);
	25	void luaV_setglobal (Word n);
	26	StkId luaV_execute (Closure *func, StkId base);
	27	void luaV_closure (void);
	28
	29	#endif