diff src/lua/src/lvm.h @ 1:f9f4f1b99eed

importing src directory
author Robert McIntyre <rlm@mit.edu>
date Sat, 03 Mar 2012 10:31:27 -0600
parents
children
line wrap: on
line diff
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/lua/src/lvm.h	Sat Mar 03 10:31:27 2012 -0600
     1.3 @@ -0,0 +1,36 @@
     1.4 +/*
     1.5 +** $Id: lvm.h,v 2.5.1.1 2007/12/27 13:02:25 roberto Exp $
     1.6 +** Lua virtual machine
     1.7 +** See Copyright Notice in lua.h
     1.8 +*/
     1.9 +
    1.10 +#ifndef lvm_h
    1.11 +#define lvm_h
    1.12 +
    1.13 +
    1.14 +#include "ldo.h"
    1.15 +#include "lobject.h"
    1.16 +#include "ltm.h"
    1.17 +
    1.18 +
    1.19 +#define tostring(L,o) ((ttype(o) == LUA_TSTRING) || (luaV_tostring(L, o)))
    1.20 +
    1.21 +#define tonumber(o,n)	(ttype(o) == LUA_TNUMBER || \
    1.22 +                         (((o) = luaV_tonumber(o,n)) != NULL))
    1.23 +
    1.24 +#define equalobj(L,o1,o2) \
    1.25 +	(ttype(o1) == ttype(o2) && luaV_equalval(L, o1, o2))
    1.26 +
    1.27 +
    1.28 +LUAI_FUNC int luaV_lessthan (lua_State *L, const TValue *l, const TValue *r);
    1.29 +LUAI_FUNC int luaV_equalval (lua_State *L, const TValue *t1, const TValue *t2);
    1.30 +LUAI_FUNC const TValue *luaV_tonumber (const TValue *obj, TValue *n);
    1.31 +LUAI_FUNC int luaV_tostring (lua_State *L, StkId obj);
    1.32 +LUAI_FUNC void luaV_gettable (lua_State *L, const TValue *t, TValue *key,
    1.33 +                                            StkId val);
    1.34 +LUAI_FUNC void luaV_settable (lua_State *L, const TValue *t, TValue *key,
    1.35 +                                            StkId val);
    1.36 +LUAI_FUNC void luaV_execute (lua_State *L, int nexeccalls);
    1.37 +LUAI_FUNC void luaV_concat (lua_State *L, int total, int last);
    1.38 +
    1.39 +#endif