lua.h File Reference

#include <stdarg.h>
#include <stddef.h>
#include "luaconf.h"

Go to the source code of this file.

Data Structures
struct	lua_Debug

Macros
#define	LUA_VERSION_MAJOR   "5"
#define	LUA_VERSION_MINOR   "2"
#define	LUA_VERSION_NUM   502
#define	LUA_VERSION_RELEASE   "4"
#define	LUA_VERSION   "Lua " LUA_VERSION_MAJOR "." LUA_VERSION_MINOR
#define	LUA_RELEASE   LUA_VERSION "." LUA_VERSION_RELEASE
#define	LUA_COPYRIGHT   LUA_RELEASE " Copyright (C) 1994-2015 Lua.org, PUC-Rio"
#define	LUA_AUTHORS   "R. Ierusalimschy, L. H. de Figueiredo, W. Celes"
#define	LUA_SIGNATURE   "\033Lua"
#define	LUA_MULTRET   (-1)
#define	LUA_REGISTRYINDEX   LUAI_FIRSTPSEUDOIDX
#define	lua_upvalueindex(i)   (LUA_REGISTRYINDEX - (i))
#define	LUA_OK   0
#define	LUA_YIELD   1
#define	LUA_ERRRUN   2
#define	LUA_ERRSYNTAX   3
#define	LUA_ERRMEM   4
#define	LUA_ERRGCMM   5
#define	LUA_ERRERR   6
#define	LUA_TNONE   (-1)
#define	LUA_TNIL   0
#define	LUA_TBOOLEAN   1
#define	LUA_TLIGHTUSERDATA   2
#define	LUA_TNUMBER   3
#define	LUA_TSTRING   4
#define	LUA_TTABLE   5
#define	LUA_TFUNCTION   6
#define	LUA_TUSERDATA   7
#define	LUA_TTHREAD   8
#define	LUA_NUMTAGS   9
#define	LUA_MINSTACK   20
#define	LUA_RIDX_MAINTHREAD   1
#define	LUA_RIDX_GLOBALS   2
#define	LUA_RIDX_LAST   LUA_RIDX_GLOBALS
#define	LUA_OPADD   0 /* ORDER TM */
#define	LUA_OPSUB   1
#define	LUA_OPMUL   2
#define	LUA_OPDIV   3
#define	LUA_OPMOD   4
#define	LUA_OPPOW   5
#define	LUA_OPUNM   6
#define	LUA_OPEQ   0
#define	LUA_OPLT   1
#define	LUA_OPLE   2
#define	lua_call(L, n, r)   lua_callk(L, (n), (r), 0, NULL)
#define	lua_pcall(L, n, r, f)   lua_pcallk(L, (n), (r), (f), 0, NULL)
#define	lua_yield(L, n)   lua_yieldk(L, (n), 0, NULL)
#define	LUA_GCSTOP   0
#define	LUA_GCRESTART   1
#define	LUA_GCCOLLECT   2
#define	LUA_GCCOUNT   3
#define	LUA_GCCOUNTB   4
#define	LUA_GCSTEP   5
#define	LUA_GCSETPAUSE   6
#define	LUA_GCSETSTEPMUL   7
#define	LUA_GCSETMAJORINC   8
#define	LUA_GCISRUNNING   9
#define	LUA_GCGEN   10
#define	LUA_GCINC   11
#define	lua_tonumber(L, i)   lua_tonumberx(L,i,NULL)
#define	lua_tointeger(L, i)   lua_tointegerx(L,i,NULL)
#define	lua_tounsigned(L, i)   lua_tounsignedx(L,i,NULL)
#define	lua_pop(L, n)   lua_settop(L, -(n)-1)
#define	lua_newtable(L)   lua_createtable(L, 0, 0)
#define	lua_register(L, n, f)   (lua_pushcfunction(L, (f)), lua_setglobal(L, (n)))
#define	lua_pushcfunction(L, f)   lua_pushcclosure(L, (f), 0)
#define	lua_isfunction(L, n)   (lua_type(L, (n)) == LUA_TFUNCTION)
#define	lua_istable(L, n)   (lua_type(L, (n)) == LUA_TTABLE)
#define	lua_islightuserdata(L, n)   (lua_type(L, (n)) == LUA_TLIGHTUSERDATA)
#define	lua_isnil(L, n)   (lua_type(L, (n)) == LUA_TNIL)
#define	lua_isboolean(L, n)   (lua_type(L, (n)) == LUA_TBOOLEAN)
#define	lua_isthread(L, n)   (lua_type(L, (n)) == LUA_TTHREAD)
#define	lua_isnone(L, n)   (lua_type(L, (n)) == LUA_TNONE)
#define	lua_isnoneornil(L, n)   (lua_type(L, (n)) <= 0)
#define	lua_pushliteral(L, s)    lua_pushlstring(L, "" s, (sizeof(s)/sizeof(char))-1)
#define	lua_pushglobaltable(L)    lua_rawgeti(L, LUA_REGISTRYINDEX, LUA_RIDX_GLOBALS)
#define	lua_tostring(L, i)   lua_tolstring(L, (i), NULL)
#define	LUA_HOOKCALL   0
#define	LUA_HOOKRET   1
#define	LUA_HOOKLINE   2
#define	LUA_HOOKCOUNT   3
#define	LUA_HOOKTAILCALL   4
#define	LUA_MASKCALL   (1 << LUA_HOOKCALL)
#define	LUA_MASKRET   (1 << LUA_HOOKRET)
#define	LUA_MASKLINE   (1 << LUA_HOOKLINE)
#define	LUA_MASKCOUNT   (1 << LUA_HOOKCOUNT)

Typedefs
typedef struct lua_State	lua_State
typedef int(*	lua_CFunction) (lua_State *L)
typedef const char *(*	lua_Reader) (lua_State *L, void *ud, size_t *sz)
typedef int(*	lua_Writer) (lua_State *L, const void *p, size_t sz, void *ud)
typedef void *(*	lua_Alloc) (void *ud, void *ptr, size_t osize, size_t nsize)
typedef LUA_NUMBER	lua_Number
typedef LUA_INTEGER	lua_Integer
typedef LUA_UNSIGNED	lua_Unsigned
typedef struct lua_Debug	lua_Debug
typedef void(*	lua_Hook) (lua_State *L, lua_Debug *ar)

Functions
LUA_API lua_State *	lua_newstate (lua_Alloc f, void *ud)
LUA_API void	lua_close (lua_State *L)
LUA_API lua_State *	lua_newthread (lua_State *L)
LUA_API lua_CFunction	lua_atpanic (lua_State *L, lua_CFunction panicf)
LUA_API const lua_Number *	lua_version (lua_State *L)
LUA_API int	lua_absindex (lua_State *L, int idx)
LUA_API int	lua_gettop (lua_State *L)
LUA_API void	lua_settop (lua_State *L, int idx)
LUA_API void	lua_pushvalue (lua_State *L, int idx)
LUA_API void	lua_remove (lua_State *L, int idx)
LUA_API void	lua_insert (lua_State *L, int idx)
LUA_API void	lua_replace (lua_State *L, int idx)
LUA_API void	lua_copy (lua_State *L, int fromidx, int toidx)
LUA_API int	lua_checkstack (lua_State *L, int sz)
LUA_API void	lua_xmove (lua_State *from, lua_State *to, int n)
LUA_API int	lua_isnumber (lua_State *L, int idx)
LUA_API int	lua_isstring (lua_State *L, int idx)
LUA_API int	lua_iscfunction (lua_State *L, int idx)
LUA_API int	lua_isuserdata (lua_State *L, int idx)
LUA_API int	lua_type (lua_State *L, int idx)
LUA_API const char *	lua_typename (lua_State *L, int tp)
LUA_API lua_Number	lua_tonumberx (lua_State *L, int idx, int *isnum)
LUA_API lua_Integer	lua_tointegerx (lua_State *L, int idx, int *isnum)
LUA_API lua_Unsigned	lua_tounsignedx (lua_State *L, int idx, int *isnum)
LUA_API int	lua_toboolean (lua_State *L, int idx)
LUA_API const char *	lua_tolstring (lua_State *L, int idx, size_t *len)
LUA_API size_t	lua_rawlen (lua_State *L, int idx)
LUA_API lua_CFunction	lua_tocfunction (lua_State *L, int idx)
LUA_API void *	lua_touserdata (lua_State *L, int idx)
LUA_API lua_State *	lua_tothread (lua_State *L, int idx)
LUA_API const void *	lua_topointer (lua_State *L, int idx)
LUA_API void	lua_arith (lua_State *L, int op)
LUA_API int	lua_rawequal (lua_State *L, int idx1, int idx2)
LUA_API int	lua_compare (lua_State *L, int idx1, int idx2, int op)
LUA_API void	lua_pushnil (lua_State *L)
LUA_API void	lua_pushnumber (lua_State *L, lua_Number n)
LUA_API void	lua_pushinteger (lua_State *L, lua_Integer n)
LUA_API void	lua_pushunsigned (lua_State *L, lua_Unsigned n)
LUA_API const char *	lua_pushlstring (lua_State *L, const char *s, size_t l)
LUA_API const char *	lua_pushstring (lua_State *L, const char *s)
LUA_API const char *	lua_pushvfstring (lua_State *L, const char *fmt, va_list argp)
LUA_API const char *	lua_pushfstring (lua_State *L, const char *fmt,...)
LUA_API void	lua_pushcclosure (lua_State *L, lua_CFunction fn, int n)
LUA_API void	lua_pushboolean (lua_State *L, int b)
LUA_API void	lua_pushlightuserdata (lua_State *L, void *p)
LUA_API int	lua_pushthread (lua_State *L)
LUA_API void	lua_getglobal (lua_State *L, const char *var)
LUA_API void	lua_gettable (lua_State *L, int idx)
LUA_API void	lua_getfield (lua_State *L, int idx, const char *k)
LUA_API void	lua_rawget (lua_State *L, int idx)
LUA_API void	lua_rawgeti (lua_State *L, int idx, int n)
LUA_API void	lua_rawgetp (lua_State *L, int idx, const void *p)
LUA_API void	lua_createtable (lua_State *L, int narr, int nrec)
LUA_API void *	lua_newuserdata (lua_State *L, size_t sz)
LUA_API int	lua_getmetatable (lua_State *L, int objindex)
LUA_API void	lua_getuservalue (lua_State *L, int idx)
LUA_API void	lua_setglobal (lua_State *L, const char *var)
LUA_API void	lua_settable (lua_State *L, int idx)
LUA_API void	lua_setfield (lua_State *L, int idx, const char *k)
LUA_API void	lua_rawset (lua_State *L, int idx)
LUA_API void	lua_rawseti (lua_State *L, int idx, int n)
LUA_API void	lua_rawsetp (lua_State *L, int idx, const void *p)
LUA_API int	lua_setmetatable (lua_State *L, int objindex)
LUA_API void	lua_setuservalue (lua_State *L, int idx)
LUA_API void	lua_callk (lua_State *L, int nargs, int nresults, int ctx, lua_CFunction k)
LUA_API int	lua_getctx (lua_State *L, int *ctx)
LUA_API int	lua_pcallk (lua_State *L, int nargs, int nresults, int errfunc, int ctx, lua_CFunction k)
LUA_API int	lua_load (lua_State *L, lua_Reader reader, void *dt, const char *chunkname, const char *mode)
LUA_API int	lua_dump (lua_State *L, lua_Writer writer, void *data)
LUA_API int	lua_yieldk (lua_State *L, int nresults, int ctx, lua_CFunction k)
LUA_API int	lua_resume (lua_State *L, lua_State *from, int narg)
LUA_API int	lua_status (lua_State *L)
LUA_API int	lua_gc (lua_State *L, int what, int data)
LUA_API int	lua_error (lua_State *L)
LUA_API int	lua_next (lua_State *L, int idx)
LUA_API void	lua_concat (lua_State *L, int n)
LUA_API void	lua_len (lua_State *L, int idx)
LUA_API lua_Alloc	lua_getallocf (lua_State *L, void **ud)
LUA_API void	lua_setallocf (lua_State *L, lua_Alloc f, void *ud)
LUA_API int	lua_getstack (lua_State *L, int level, lua_Debug *ar)
LUA_API int	lua_getinfo (lua_State *L, const char *what, lua_Debug *ar)
LUA_API const char *	lua_getlocal (lua_State *L, const lua_Debug *ar, int n)
LUA_API const char *	lua_setlocal (lua_State *L, const lua_Debug *ar, int n)
LUA_API const char *	lua_getupvalue (lua_State *L, int funcindex, int n)
LUA_API const char *	lua_setupvalue (lua_State *L, int funcindex, int n)
LUA_API void *	lua_upvalueid (lua_State *L, int fidx, int n)
LUA_API void	lua_upvaluejoin (lua_State *L, int fidx1, int n1, int fidx2, int n2)
LUA_API int	lua_sethook (lua_State *L, lua_Hook func, int mask, int count)
LUA_API lua_Hook	lua_gethook (lua_State *L)
LUA_API int	lua_gethookmask (lua_State *L)
LUA_API int	lua_gethookcount (lua_State *L)

Variables
const char	lua_ident []

Macro Definition Documentation

LUA_AUTHORS

#define LUA_AUTHORS   "R. Ierusalimschy, L. H. de Figueiredo, W. Celes"

Definition at line 27 of file lua-5.2.4/src/lua.h.

lua_call

#define lua_call	(		L,
			n,
			r )   lua_callk(L, (n), (r), 0, NULL)

Definition at line 253 of file lua-5.2.4/src/lua.h.

Referenced by add_value(), add_value(), add_value(), add_value(), dooptions(), findloader(), findloader(), findloader(), foreach(), foreachi(), generic_reader(), generic_reader(), generic_reader(), generic_reader(), hookf(), hookf(), hookf(), hookf(), ll_require(), ll_require(), ll_require(), ll_require(), luaB_dofile(), luaB_pairs(), luaB_print(), luaB_print(), luaB_print(), luaL_callmeta(), luaL_openlibs(), luaL_requiref(), pairsmeta(), pairsmeta(), sort_comp(), sort_comp(), sort_comp(), sort_comp(), traceback(), trymt(), Xml_append(), Xml_find(), Xml_iterate(), Xml_new(), Xml_pushDecode(), Xml_pushEncode(), and Xml_str().

LUA_COPYRIGHT

#define LUA_COPYRIGHT   LUA_RELEASE " Copyright (C) 1994-2015 Lua.org, PUC-Rio"

Definition at line 26 of file lua-5.2.4/src/lua.h.

LUA_ERRERR

#define LUA_ERRERR   6

Definition at line 51 of file lua-5.2.4/src/lua.h.

LUA_ERRGCMM

#define LUA_ERRGCMM   5

Definition at line 50 of file lua-5.2.4/src/lua.h.

Referenced by GCTM(), and GCTM().

LUA_ERRMEM

#define LUA_ERRMEM   4

Definition at line 49 of file lua-5.2.4/src/lua.h.

LUA_ERRRUN

#define LUA_ERRRUN   2

Definition at line 47 of file lua-5.2.4/src/lua.h.

LUA_ERRSYNTAX

#define LUA_ERRSYNTAX   3

Definition at line 48 of file lua-5.2.4/src/lua.h.

LUA_GCCOLLECT

#define LUA_GCCOLLECT   2

Definition at line 283 of file lua-5.2.4/src/lua.h.

LUA_GCCOUNT

#define LUA_GCCOUNT   3

Definition at line 284 of file lua-5.2.4/src/lua.h.

LUA_GCCOUNTB

#define LUA_GCCOUNTB   4

Definition at line 285 of file lua-5.2.4/src/lua.h.

LUA_GCGEN

#define LUA_GCGEN   10

Definition at line 291 of file lua-5.2.4/src/lua.h.

Referenced by lua_gc(), lua_gc(), luaB_collectgarbage(), luaB_collectgarbage(), and pmain().

LUA_GCINC

#define LUA_GCINC   11

Definition at line 292 of file lua-5.2.4/src/lua.h.

Referenced by lua_gc(), lua_gc(), luaB_collectgarbage(), luaB_collectgarbage(), and pushmode().

LUA_GCISRUNNING

#define LUA_GCISRUNNING   9

Definition at line 290 of file lua-5.2.4/src/lua.h.

Referenced by lua_gc(), lua_gc(), luaB_collectgarbage(), luaB_collectgarbage(), and luaB_collectgarbage().

LUA_GCRESTART

#define LUA_GCRESTART   1

Definition at line 282 of file lua-5.2.4/src/lua.h.

LUA_GCSETMAJORINC

#define LUA_GCSETMAJORINC   8

Definition at line 289 of file lua-5.2.4/src/lua.h.

Referenced by lua_gc(), and luaB_collectgarbage().

LUA_GCSETPAUSE

#define LUA_GCSETPAUSE   6

Definition at line 287 of file lua-5.2.4/src/lua.h.

LUA_GCSETSTEPMUL

#define LUA_GCSETSTEPMUL   7

Definition at line 288 of file lua-5.2.4/src/lua.h.

LUA_GCSTEP

#define LUA_GCSTEP   5

Definition at line 286 of file lua-5.2.4/src/lua.h.

LUA_GCSTOP

#define LUA_GCSTOP   0

Definition at line 281 of file lua-5.2.4/src/lua.h.

LUA_HOOKCALL

#define LUA_HOOKCALL   0

Definition at line 360 of file lua-5.2.4/src/lua.h.

LUA_HOOKCOUNT

#define LUA_HOOKCOUNT   3

Definition at line 363 of file lua-5.2.4/src/lua.h.

LUA_HOOKLINE

#define LUA_HOOKLINE   2

Definition at line 362 of file lua-5.2.4/src/lua.h.

LUA_HOOKRET

#define LUA_HOOKRET   1

Definition at line 361 of file lua-5.2.4/src/lua.h.

LUA_HOOKTAILCALL

#define LUA_HOOKTAILCALL   4

Definition at line 364 of file lua-5.2.4/src/lua.h.

Referenced by callhook(), callhook(), and luaD_hookcall().

lua_isboolean

#define lua_isboolean	(		L,
			n )   (lua_type(L, (n)) == LUA_TBOOLEAN)

Definition at line 335 of file lua-5.2.4/src/lua.h.

lua_isfunction

#define lua_isfunction	(		L,
			n )   (lua_type(L, (n)) == LUA_TFUNCTION)

Definition at line 331 of file lua-5.2.4/src/lua.h.

lua_islightuserdata

#define lua_islightuserdata	(		L,
			n )   (lua_type(L, (n)) == LUA_TLIGHTUSERDATA)

Definition at line 333 of file lua-5.2.4/src/lua.h.

lua_isnil

#define lua_isnil	(		L,
			n )   (lua_type(L, (n)) == LUA_TNIL)

Definition at line 334 of file lua-5.2.4/src/lua.h.

lua_isnone

#define lua_isnone	(		L,
			n )   (lua_type(L, (n)) == LUA_TNONE)

Definition at line 337 of file lua-5.2.4/src/lua.h.

lua_isnoneornil

#define lua_isnoneornil	(		L,
			n )   (lua_type(L, (n)) <= 0)

Definition at line 338 of file lua-5.2.4/src/lua.h.

lua_istable

#define lua_istable	(		L,
			n )   (lua_type(L, (n)) == LUA_TTABLE)

Definition at line 332 of file lua-5.2.4/src/lua.h.

lua_isthread

#define lua_isthread	(		L,
			n )   (lua_type(L, (n)) == LUA_TTHREAD)

Definition at line 336 of file lua-5.2.4/src/lua.h.

LUA_MASKCALL

#define LUA_MASKCALL   (1 << LUA_HOOKCALL)

Definition at line 370 of file lua-5.2.4/src/lua.h.

LUA_MASKCOUNT

#define LUA_MASKCOUNT   (1 << LUA_HOOKCOUNT)

Definition at line 373 of file lua-5.2.4/src/lua.h.

LUA_MASKLINE

#define LUA_MASKLINE   (1 << LUA_HOOKLINE)

Definition at line 372 of file lua-5.2.4/src/lua.h.

LUA_MASKRET

#define LUA_MASKRET   (1 << LUA_HOOKRET)

Definition at line 371 of file lua-5.2.4/src/lua.h.

LUA_MINSTACK

#define LUA_MINSTACK   20

Definition at line 93 of file lua-5.2.4/src/lua.h.

LUA_MULTRET

#define LUA_MULTRET   (-1)

Definition at line 34 of file lua-5.2.4/src/lua.h.

lua_newtable

#define lua_newtable

(

L

)

lua_createtable(L, 0, 0)

Definition at line 325 of file lua-5.2.4/src/lua.h.

LUA_NUMTAGS

#define LUA_NUMTAGS   9

Definition at line 88 of file lua-5.2.4/src/lua.h.

Referenced by lua_newstate(), lua_typename(), markmt(), markmt(), and markmt().

LUA_OK

#define LUA_OK   0

Definition at line 45 of file lua-5.2.4/src/lua.h.

Referenced by addreturn(), addreturn(), auxresume(), auxresume(), auxresume(), auxstatus(), close_state(), combine(), combine(), combine(), dochunk(), dochunk(), dofile(), dolibrary(), dolibrary(), dolibrary(), doREPL(), doREPL(), dostring(), dotty(), finalreport(), finishCcall(), finishpcall(), finishpcall(), finishpcallk(), GCTM(), GCTM(), GCTM(), handle_luainit(), handle_luainit(), handle_luainit(), handle_script(), handle_script(), handle_script(), l_print(), l_print(), load_aux(), load_aux(), load_aux(), loadline(), loadline(), lua_callk(), lua_callk(), lua_checkstack(), lua_checkstack(), lua_getctx(), lua_load(), lua_newstate(), lua_pcallk(), lua_pcallk(), lua_resume(), lua_resume(), luaB_auxwrap(), luaB_close(), luaB_costatus(), luaB_costatus(), luaB_dofile(), luaB_dofile(), luaB_dofile(), luaB_pcall(), luaB_xpcall(), luaD_closeprotected(), luaD_pcall(), luaD_rawrunprotected(), luaD_seterrorobj(), luaE_resetthread(), luaH_resize(), luaV_execute(), main(), main(), pmain(), pmain(), pmain(), pmain(), pmain(), pmain(), preinit_state(), preinit_thread(), preinit_thread(), report(), report(), report(), resume(), resume(), resume(), runargs(), runargs(), runargs(), searcher_Lua(), searcher_Lua(), and searcher_Lua().

LUA_OPADD

#define LUA_OPADD   0 /* ORDER TM */

Definition at line 184 of file lua-5.2.4/src/lua.h.

Referenced by arith_add(), constfolding(), intarith(), intarith(), lua_arith(), luaK_posfix(), luaK_posfix(), luaO_arith(), luaO_arith(), luaO_arith(), luaV_arith(), numarith(), and numarith().

LUA_OPDIV

#define LUA_OPDIV   3

Definition at line 187 of file lua-5.2.4/src/lua.h.

Referenced by arith_div(), luaO_arith(), luaO_arith(), luaO_rawarith(), numarith(), numarith(), validop(), and validop().

LUA_OPEQ

#define LUA_OPEQ   0

Definition at line 194 of file lua-5.2.4/src/lua.h.

Referenced by lua_compare(), tmove(), and tmove().

LUA_OPLE

#define LUA_OPLE   2

Definition at line 196 of file lua-5.2.4/src/lua.h.

Referenced by lua_compare().

LUA_OPLT

#define LUA_OPLT   1

Definition at line 195 of file lua-5.2.4/src/lua.h.

Referenced by lua_compare(), math_max(), math_max(), math_min(), math_min(), sort_comp(), sort_comp(), and sort_comp().

LUA_OPMOD

#define LUA_OPMOD   4

Definition at line 188 of file lua-5.2.4/src/lua.h.

Referenced by arith_mod(), intarith(), intarith(), luaO_arith(), numarith(), numarith(), validop(), and validop().

LUA_OPMUL

#define LUA_OPMUL   2

Definition at line 186 of file lua-5.2.4/src/lua.h.

Referenced by arith_mul(), intarith(), intarith(), luaO_arith(), numarith(), and numarith().

LUA_OPPOW

#define LUA_OPPOW   5

Definition at line 189 of file lua-5.2.4/src/lua.h.

Referenced by arith_pow(), luaO_arith(), luaO_arith(), luaO_rawarith(), numarith(), and numarith().

LUA_OPSUB

#define LUA_OPSUB   1

Definition at line 185 of file lua-5.2.4/src/lua.h.

Referenced by arith_sub(), intarith(), intarith(), luaO_arith(), numarith(), and numarith().

LUA_OPUNM

#define LUA_OPUNM   6

Definition at line 190 of file lua-5.2.4/src/lua.h.

Referenced by arith_unm(), intarith(), intarith(), lua_arith(), luaK_prefix(), luaO_arith(), numarith(), and numarith().

lua_pcall

#define lua_pcall	(		L,
			n,
			r,
			f )   lua_pcallk(L, (n), (r), (f), 0, NULL)

Definition at line 259 of file lua-5.2.4/src/lua.h.

Referenced by collwrapper(), db_busy_callback(), db_commit_hook_callback(), db_debug(), db_debug(), db_debug(), db_debug(), db_exec_callback(), db_progress_callback(), db_rollback_hook_callback(), db_sql_finalize_function(), db_sql_normal_function(), db_trace_callback(), db_update_hook_callback(), docall(), docall(), docall(), docall(), dotty(), dotty(), l_print(), l_print(), log_access(), luaB_pcall(), luaB_xpcall(), main(), main(), and master_thread_run().

lua_pop

#define lua_pop	(		L,
			n )   lua_settop(L, -(n)-1)

Definition at line 323 of file lua-5.2.4/src/lua.h.

lua_pushcfunction

#define lua_pushcfunction	(		L,
			f )   lua_pushcclosure(L, (f), 0)

Definition at line 329 of file lua-5.2.4/src/lua.h.

lua_pushglobaltable

#define lua_pushglobaltable

(

L

)

lua_rawgeti(L, LUA_REGISTRYINDEX, LUA_RIDX_GLOBALS)

Definition at line 343 of file lua-5.2.4/src/lua.h.

#define lua_pushglobaltable(L)  \
    lua_rawgeti(L, LUA_REGISTRYINDEX, LUA_RIDX_GLOBALS)

Referenced by luaopen_base(), luaopen_package(), and pushglobalfuncname().

lua_pushliteral

#define lua_pushliteral	(		L,
			s )    lua_pushlstring(L, "" s, (sizeof(s)/sizeof(char))-1)

Definition at line 340 of file lua-5.2.4/src/lua.h.

#define lua_pushliteral(L, s)   \
    lua_pushlstring(L, "" s, (sizeof(s)/sizeof(char))-1)

lua_register

#define lua_register	(		L,
			n,
			f )   (lua_pushcfunction(L, (f)), lua_setglobal(L, (n)))

Definition at line 327 of file lua-5.2.4/src/lua.h.

LUA_REGISTRYINDEX

#define LUA_REGISTRYINDEX   LUAI_FIRSTPSEUDOIDX

Definition at line 40 of file lua-5.2.4/src/lua.h.

LUA_RELEASE

#define LUA_RELEASE   LUA_VERSION "." LUA_VERSION_RELEASE

Definition at line 25 of file lua-5.2.4/src/lua.h.

LUA_RIDX_GLOBALS

#define LUA_RIDX_GLOBALS   2

Definition at line 98 of file lua-5.2.4/src/lua.h.

Referenced by init_registry(), init_registry(), init_registry(), lua_getglobal(), lua_getglobal(), lua_load(), lua_setglobal(), and lua_setglobal().

LUA_RIDX_LAST

#define LUA_RIDX_LAST   LUA_RIDX_GLOBALS

Definition at line 99 of file lua-5.2.4/src/lua.h.

Referenced by init_registry(), init_registry(), and init_registry().

LUA_RIDX_MAINTHREAD

#define LUA_RIDX_MAINTHREAD   1

Definition at line 97 of file lua-5.2.4/src/lua.h.

Referenced by init_registry(), init_registry(), and init_registry().

LUA_SIGNATURE

#define LUA_SIGNATURE   "\033Lua"

Definition at line 31 of file lua-5.2.4/src/lua.h.

LUA_TBOOLEAN

#define LUA_TBOOLEAN   1

Definition at line 79 of file lua-5.2.4/src/lua.h.

LUA_TFUNCTION

#define LUA_TFUNCTION   6

Definition at line 84 of file lua-5.2.4/src/lua.h.

LUA_TLIGHTUSERDATA

#define LUA_TLIGHTUSERDATA   2

Definition at line 80 of file lua-5.2.4/src/lua.h.

LUA_TNIL

#define LUA_TNIL   0

Definition at line 78 of file lua-5.2.4/src/lua.h.

LUA_TNONE

#define LUA_TNONE   (-1)

Definition at line 76 of file lua-5.2.4/src/lua.h.

LUA_TNUMBER

#define LUA_TNUMBER   3

Definition at line 81 of file lua-5.2.4/src/lua.h.

lua_tointeger

#define lua_tointeger	(		L,
			i )   lua_tointegerx(L,i,NULL)

Definition at line 320 of file lua-5.2.4/src/lua.h.

Referenced by addliteral(), addliteral(), db_errorfb(), db_exec_callback(), db_getinfo(), db_getinfo(), dbvm_bind_index(), g_read(), g_read(), g_write(), g_write(), getfield(), gmatch_aux(), gmatch_aux(), io_readline(), io_readline(), io_readline(), iter_aux(), iter_aux(), luaL_checkinteger(), luaL_checkversion_(), luaL_ref(), luaL_tolstring(), math_abs(), math_abs(), math_fmod(), math_fmod(), pmain(), pmain(), pmain(), pmain(), pmain(), pmain(), Xml_iterate(), and Xml_str().

lua_tonumber

#define lua_tonumber	(		L,
			i )   lua_tonumberx(L,i,NULL)

Definition at line 319 of file lua-5.2.4/src/lua.h.

Referenced by addliteral(), addliteral(), b_unpack(), collwrapper(), db_exec_callback(), dbvm_bind_index(), g_write(), g_write(), g_write(), g_write(), luaB_setfenv(), luaB_tonumber(), luaL_checknumber(), luaL_tolstring(), and maxn().

lua_tostring

#define lua_tostring	(		L,
			i )   lua_tolstring(L, (i), NULL)

Definition at line 346 of file lua-5.2.4/src/lua.h.

lua_tounsigned

#define lua_tounsigned	(		L,
			i )   lua_tounsignedx(L,i,NULL)

Definition at line 321 of file lua-5.2.4/src/lua.h.

Referenced by luaL_checkversion_().

LUA_TSTRING

#define LUA_TSTRING   4

Definition at line 82 of file lua-5.2.4/src/lua.h.

LUA_TTABLE

#define LUA_TTABLE   5

Definition at line 83 of file lua-5.2.4/src/lua.h.

LUA_TTHREAD

#define LUA_TTHREAD   8

Definition at line 86 of file lua-5.2.4/src/lua.h.

LUA_TUSERDATA

#define LUA_TUSERDATA   7

Definition at line 85 of file lua-5.2.4/src/lua.h.

lua_upvalueindex

#define lua_upvalueindex

(

i

)

(LUA_REGISTRYINDEX - (i))

Definition at line 41 of file lua-5.2.4/src/lua.h.

LUA_VERSION

#define LUA_VERSION   "Lua " LUA_VERSION_MAJOR "." LUA_VERSION_MINOR

Definition at line 24 of file lua-5.2.4/src/lua.h.

LUA_VERSION_MAJOR

#define LUA_VERSION_MAJOR   "5"

Definition at line 19 of file lua-5.2.4/src/lua.h.

LUA_VERSION_MINOR

#define LUA_VERSION_MINOR   "2"

Definition at line 20 of file lua-5.2.4/src/lua.h.

LUA_VERSION_NUM

#define LUA_VERSION_NUM   502

Definition at line 21 of file lua-5.2.4/src/lua.h.

LUA_VERSION_RELEASE

#define LUA_VERSION_RELEASE   "4"

Definition at line 22 of file lua-5.2.4/src/lua.h.

LUA_YIELD

#define LUA_YIELD   1

Definition at line 46 of file lua-5.2.4/src/lua.h.

lua_yield

#define lua_yield	(		L,
			n )   lua_yieldk(L, (n), 0, NULL)

Definition at line 273 of file lua-5.2.4/src/lua.h.

Referenced by luaB_yield(), luaB_yield(), luaB_yield(), and luaB_yield().

Typedef Documentation

lua_Alloc

typedef void *(* lua_Alloc) (void *ud, void *ptr, size_t osize, size_t nsize)

Definition at line 70 of file lua-5.2.4/src/lua.h.

lua_CFunction

typedef int(* lua_CFunction) (lua_State *L)

Definition at line 56 of file lua-5.2.4/src/lua.h.

lua_Debug

typedef struct lua_Debug lua_Debug

Definition at line 375 of file lua-5.2.4/src/lua.h.

lua_Hook

typedef void(* lua_Hook) (lua_State *L, lua_Debug *ar)

Definition at line 379 of file lua-5.2.4/src/lua.h.

lua_Integer

typedef LUA_INTEGER lua_Integer

Definition at line 107 of file lua-5.2.4/src/lua.h.

lua_Number

typedef LUA_NUMBER lua_Number

Definition at line 103 of file lua-5.2.4/src/lua.h.

lua_Reader

typedef const char *(* lua_Reader) (lua_State *L, void *ud, size_t *sz)

Definition at line 62 of file lua-5.2.4/src/lua.h.

lua_State

typedef struct lua_State lua_State

Definition at line 54 of file lua-5.2.4/src/lua.h.

lua_Unsigned

typedef LUA_UNSIGNED lua_Unsigned

Definition at line 110 of file lua-5.2.4/src/lua.h.

lua_Writer

typedef int(* lua_Writer) (lua_State *L, const void *p, size_t sz, void *ud)

Definition at line 64 of file lua-5.2.4/src/lua.h.

Function Documentation

lua_absindex()

LUA_API int lua_absindex	(	lua_State *	L,
		int	idx )

Definition at line 153 of file lua-5.2.4/src/lapi.c.

                                                 {
  return (idx > 0 || ispseudo(idx))
         ? idx
         : cast_int(L->top - L->ci->func + idx);
}

lua_arith()

LUA_API void lua_arith	(	lua_State *	L,
		int	op )

Definition at line 293 of file lua-5.2.4/src/lapi.c.

                                              {
  StkId o1;  /* 1st operand */
  StkId o2;  /* 2nd operand */
  lua_lock(L);
  if (op != LUA_OPUNM) /* all other operations expect two operands */
    api_checknelems(L, 2);
  else {  /* for unary minus, add fake 2nd operand */
    api_checknelems(L, 1);
    setobjs2s(L, L->top, L->top - 1);
    L->top++;
  }
  o1 = L->top - 2;
  o2 = L->top - 1;
  if (ttisnumber(o1) && ttisnumber(o2)) {
    setnvalue(o1, luaO_arith(op, nvalue(o1), nvalue(o2)));
  }
  else
    luaV_arith(L, o1, o1, o2, cast(TMS, op - LUA_OPADD + TM_ADD));
  L->top--;
  lua_unlock(L);
}

lua_atpanic()

LUA_API lua_CFunction lua_atpanic	(	lua_State *	L,
		lua_CFunction	panicf )

Definition at line 130 of file lua-5.1.5/src/lapi.c.

                                                                       {
  lua_CFunction old;
  lua_lock(L);
  old = G(L)->panic;
  G(L)->panic = panicf;
  lua_unlock(L);
  return old;
}

lua_callk()

LUA_API void lua_callk	(	lua_State *	L,
		int	nargs,
		int	nresults,
		int	ctx,
		lua_CFunction	k )

Definition at line 889 of file lua-5.2.4/src/lapi.c.

                                         {
  StkId func;
  lua_lock(L);
  api_check(L, k == NULL || !isLua(L->ci),
    "cannot use continuations inside hooks");
  api_checknelems(L, nargs+1);
  api_check(L, L->status == LUA_OK, "cannot do calls on non-normal thread");
  checkresults(L, nargs, nresults);
  func = L->top - (nargs+1);
  if (k != NULL && L->nny == 0) {  /* need to prepare continuation? */
    L->ci->u.c.k = k;  /* save continuation */
    L->ci->u.c.ctx = ctx;  /* save context */
    luaD_call(L, func, nresults, 1);  /* do the call */
  }
  else  /* no continuation or no yieldable */
    luaD_call(L, func, nresults, 0);  /* just do the call */
  adjustresults(L, nresults);
  lua_unlock(L);
}

References adjustresults, api_check, api_checknelems, CallInfo::c, checkresults, lua_State::ci, CallInfo::ctx, isLua, CallInfo::k, lua_lock, LUA_OK, lua_unlock, luaD_call(), lua_State::nny, NULL, lua_State::status, lua_State::top, and CallInfo::u.

Referenced by luaB_dofile(), luaB_dofile(), and luaB_dofile().

lua_checkstack()

LUA_API int lua_checkstack	(	lua_State *	L,
		int	sz )

Definition at line 95 of file lua-5.1.5/src/lapi.c.

                                                    {
  int res = 1;
  lua_lock(L);
  if (size > LUAI_MAXCSTACK || (L->top - L->base + size) > LUAI_MAXCSTACK)
    res = 0;  /* stack overflow */
  else if (size > 0) {
    luaD_checkstack(L, size);
    if (L->ci->top < L->top + size)
      L->ci->top = L->top + size;
  }
  lua_unlock(L);
  return res;
}

lua_close()

LUA_API void lua_close

(

lua_State *

L

)

Definition at line 199 of file lua-5.1.5/src/lstate.c.

                                      {
  L = G(L)->mainthread;  /* only the main thread can be closed */
  lua_lock(L);
  luaF_close(L, L->stack);  /* close all upvalues for this thread */
  luaC_separateudata(L, 1);  /* separate udata that have GC metamethods */
  L->errfunc = 0;  /* no error function during GC metamethods */
  do {  /* repeat until no more errors */
    L->ci = L->base_ci;
    L->base = L->top = L->ci->base;
    L->nCcalls = L->baseCcalls = 0;
  } while (luaD_rawrunprotected(L, callallgcTM, NULL) != 0);
  lua_assert(G(L)->tmudata == NULL);
  luai_userstateclose(L);
  close_state(L);
}

lua_compare()

LUA_API int lua_compare	(	lua_State *	L,
		int	idx1,
		int	idx2,
		int	op )

Definition at line 316 of file lua-5.2.4/src/lapi.c.

                                                                       {
  StkId o1, o2;
  int i = 0;
  lua_lock(L);  /* may call tag method */
  o1 = index2addr(L, index1);
  o2 = index2addr(L, index2);
  if (isvalid(o1) && isvalid(o2)) {
    switch (op) {
      case LUA_OPEQ: i = equalobj(L, o1, o2); break;
      case LUA_OPLT: i = luaV_lessthan(L, o1, o2); break;
      case LUA_OPLE: i = luaV_lessequal(L, o1, o2); break;
      default: api_check(L, 0, "invalid option");
    }
  }
  lua_unlock(L);
  return i;
}

lua_concat()

LUA_API void lua_concat	(	lua_State *	L,
		int	n )

Definition at line 990 of file lua-5.1.5/src/lapi.c.

                                              {
  lua_lock(L);
  api_checknelems(L, n);
  if (n >= 2) {
    luaC_checkGC(L);
    luaV_concat(L, n, cast_int(L->top - L->base) - 1);
    L->top -= (n-1);
  }
  else if (n == 0) {  /* push empty string */
    setsvalue2s(L, L->top, luaS_newlstr(L, "", 0));
    api_incr_top(L);
  }
  /* else n == 1; nothing to do */
  lua_unlock(L);
}

lua_copy()

LUA_API void lua_copy	(	lua_State *	L,
		int	fromidx,
		int	toidx )

Definition at line 226 of file lua-5.2.4/src/lapi.c.

                                                             {
  TValue *fr;
  lua_lock(L);
  fr = index2addr(L, fromidx);
  moveto(L, fr, toidx);
  lua_unlock(L);
}

lua_createtable()

LUA_API void lua_createtable	(	lua_State *	L,
		int	narr,
		int	nrec )

Definition at line 578 of file lua-5.1.5/src/lapi.c.

                                                                  {
  lua_lock(L);
  luaC_checkGC(L);
  sethvalue(L, L->top, luaH_new(L, narray, nrec));
  api_incr_top(L);
  lua_unlock(L);
}

lua_dump()

LUA_API int lua_dump	(	lua_State *	L,
		lua_Writer	writer,
		void *	data )

Definition at line 875 of file lua-5.1.5/src/lapi.c.

                                                                   {
  int status;
  TValue *o;
  lua_lock(L);
  api_checknelems(L, 1);
  o = L->top - 1;
  if (isLfunction(o))
    status = luaU_dump(L, clvalue(o)->l.p, writer, data, 0);
  else
    status = 1;
  lua_unlock(L);
  return status;
}

References api_checknelems, clvalue, getproto, isLfunction, lua_lock, lua_unlock, luaU_dump(), lua_State::top, and writer().

Referenced by str_dump(), str_dump(), str_dump(), and str_dump().

lua_error()

LUA_API int lua_error

(

lua_State *

L

)

Definition at line 964 of file lua-5.1.5/src/lapi.c.

                                     {
  lua_lock(L);
  api_checknelems(L, 1);
  luaG_errormsg(L);
  lua_unlock(L);
  return 0;  /* to avoid warnings */
}

lua_gc()

LUA_API int lua_gc	(	lua_State *	L,
		int	what,
		int	data )

Definition at line 899 of file lua-5.1.5/src/lapi.c.

                                                      {
  int res = 0;
  global_State *g;
  lua_lock(L);
  g = G(L);
  switch (what) {
    case LUA_GCSTOP: {
      g->GCthreshold = MAX_LUMEM;
      break;
    }
    case LUA_GCRESTART: {
      g->GCthreshold = g->totalbytes;
      break;
    }
    case LUA_GCCOLLECT: {
      luaC_fullgc(L);
      break;
    }
    case LUA_GCCOUNT: {
      /* GC values are expressed in Kbytes: #bytes/2^10 */
      res = cast_int(g->totalbytes >> 10);
      break;
    }
    case LUA_GCCOUNTB: {
      res = cast_int(g->totalbytes & 0x3ff);
      break;
    }
    case LUA_GCSTEP: {
      lu_mem a = (cast(lu_mem, data) << 10);
      if (a <= g->totalbytes)
        g->GCthreshold = g->totalbytes - a;
      else
        g->GCthreshold = 0;
      while (g->GCthreshold <= g->totalbytes) {
        luaC_step(L);
        if (g->gcstate == GCSpause) {  /* end of cycle? */
          res = 1;  /* signal it */
          break;
        }
      }
      break;
    }
    case LUA_GCSETPAUSE: {
      res = g->gcpause;
      g->gcpause = data;
      break;
    }
    case LUA_GCSETSTEPMUL: {
      res = g->gcstepmul;
      g->gcstepmul = data;
      break;
    }
    default: res = -1;  /* invalid option */
  }
  lua_unlock(L);
  return res;
}

lua_getallocf()

LUA_API lua_Alloc lua_getallocf	(	lua_State *	L,
		void **	ud )

Definition at line 1007 of file lua-5.1.5/src/lapi.c.

                                                          {
  lua_Alloc f;
  lua_lock(L);
  if (ud) *ud = G(L)->ud;
  f = G(L)->frealloc;
  lua_unlock(L);
  return f;
}

lua_getctx()

LUA_API int lua_getctx	(	lua_State *	L,
		int *	ctx )

Definition at line 880 of file lua-5.2.4/src/lapi.c.

                                                {
  if (L->ci->callstatus & CIST_YIELDED) {
    if (ctx) *ctx = L->ci->u.c.ctx;
    return L->ci->u.c.status;
  }
  else return LUA_OK;
}

References CallInfo::c, CallInfo::callstatus, lua_State::ci, CIST_YIELDED, CallInfo::ctx, LUA_OK, CallInfo::status, and CallInfo::u.

Referenced by pcallcont().

lua_getfield()

LUA_API void lua_getfield	(	lua_State *	L,
		int	idx,
		const char *	k )

Definition at line 544 of file lua-5.1.5/src/lapi.c.

                                                                 {
  StkId t;
  TValue key;
  lua_lock(L);
  t = index2adr(L, idx);
  api_checkvalidindex(L, t);
  setsvalue(L, &key, luaS_new(L, k));
  luaV_gettable(L, t, &key, L->top);
  api_incr_top(L);
  lua_unlock(L);
}

lua_getglobal()

LUA_API void lua_getglobal	(	lua_State *	L,
		const char *	var )

Definition at line 608 of file lua-5.2.4/src/lapi.c.

                                                           {
  Table *reg = hvalue(&G(L)->l_registry);
  const TValue *gt;  /* global table */
  lua_lock(L);
  gt = luaH_getint(reg, LUA_RIDX_GLOBALS);
  setsvalue2s(L, L->top++, luaS_new(L, var));
  luaV_gettable(L, gt, L->top - 1, L->top - 1);
  lua_unlock(L);
}

lua_gethook()

LUA_API lua_Hook lua_gethook

(

lua_State *

L

)

Definition at line 69 of file lua-5.1.5/src/ldebug.c.

                                            {
  return L->hook;
}

lua_gethookcount()

LUA_API int lua_gethookcount

(

lua_State *

L

)

Definition at line 79 of file lua-5.1.5/src/ldebug.c.

                                            {
  return L->basehookcount;
}

lua_gethookmask()

LUA_API int lua_gethookmask

(

lua_State *

L

)

Definition at line 74 of file lua-5.1.5/src/ldebug.c.

                                           {
  return L->hookmask;
}

lua_getinfo()

LUA_API int lua_getinfo	(	lua_State *	L,
		const char *	what,
		lua_Debug *	ar )

Definition at line 232 of file lua-5.1.5/src/ldebug.c.

                                                                        {
  int status;
  Closure *f = NULL;
  CallInfo *ci = NULL;
  lua_lock(L);
  if (*what == '>') {
    StkId func = L->top - 1;
    luai_apicheck(L, ttisfunction(func));
    what++;  /* skip the '>' */
    f = clvalue(func);
    L->top--;  /* pop function */
  }
  else if (ar->i_ci != 0) {  /* no tail call? */
    ci = L->base_ci + ar->i_ci;
    lua_assert(ttisfunction(ci->func));
    f = clvalue(ci->func);
  }
  status = auxgetinfo(L, what, ar, f, ci);
  if (strchr(what, 'f')) {
    if (f == NULL) setnilvalue(L->top);
    else setclvalue(L, L->top, f);
    incr_top(L);
  }
  if (strchr(what, 'L'))
    collectvalidlines(L, f);
  lua_unlock(L);
  return status;
}

lua_getlocal()

LUA_API const char * lua_getlocal	(	lua_State *	L,
		const lua_Debug *	ar,
		int	n )

Definition at line 127 of file lua-5.1.5/src/ldebug.c.

                                                                            {
  CallInfo *ci = L->base_ci + ar->i_ci;
  const char *name = findlocal(L, ci, n);
  lua_lock(L);
  if (name)
      luaA_pushobject(L, ci->base + (n - 1));
  lua_unlock(L);
  return name;
}

lua_getmetatable()

LUA_API int lua_getmetatable	(	lua_State *	L,
		int	objindex )

Definition at line 587 of file lua-5.1.5/src/lapi.c.

                                                          {
  const TValue *obj;
  Table *mt = NULL;
  int res;
  lua_lock(L);
  obj = index2adr(L, objindex);
  switch (ttype(obj)) {
    case LUA_TTABLE:
      mt = hvalue(obj)->metatable;
      break;
    case LUA_TUSERDATA:
      mt = uvalue(obj)->metatable;
      break;
    default:
      mt = G(L)->mt[ttype(obj)];
      break;
  }
  if (mt == NULL)
    res = 0;
  else {
    sethvalue(L, L->top, mt);
    api_incr_top(L);
    res = 1;
  }
  lua_unlock(L);
  return res;
}

lua_getstack()

LUA_API int lua_getstack	(	lua_State *	L,
		int	level,
		lua_Debug *	ar )

Definition at line 84 of file lua-5.1.5/src/ldebug.c.

                                                                  {
  int status;
  CallInfo *ci;
  lua_lock(L);
  for (ci = L->ci; level > 0 && ci > L->base_ci; ci--) {
    level--;
    if (f_isLua(ci))  /* Lua function? */
      level -= ci->tailcalls;  /* skip lost tail calls */
  }
  if (level == 0 && ci > L->base_ci) {  /* level found? */
    status = 1;
    ar->i_ci = cast_int(ci - L->base_ci);
  }
  else if (level < 0) {  /* level is of a lost tail call? */
    status = 1;
    ar->i_ci = 0;
  }
  else status = 0;  /* no such level */
  lua_unlock(L);
  return status;
}

lua_gettable()

LUA_API void lua_gettable	(	lua_State *	L,
		int	idx )

Definition at line 534 of file lua-5.1.5/src/lapi.c.

                                                  {
  StkId t;
  lua_lock(L);
  t = index2adr(L, idx);
  api_checkvalidindex(L, t);
  luaV_gettable(L, t, L->top - 1, L->top - 1);
  lua_unlock(L);
}

lua_gettop()

LUA_API int lua_gettop

(

lua_State *

L

)

Definition at line 159 of file lua-5.1.5/src/lapi.c.

                                      {
  return cast_int(L->top - L->base);
}

lua_getupvalue()

LUA_API const char * lua_getupvalue	(	lua_State *	L,
		int	funcindex,
		int	n )

Definition at line 1057 of file lua-5.1.5/src/lapi.c.

                                                                        {
  const char *name;
  TValue *val;
  lua_lock(L);
  name = aux_upvalue(index2adr(L, funcindex), n, &val);
  if (name) {
    setobj2s(L, L->top, val);
    api_incr_top(L);
  }
  lua_unlock(L);
  return name;
}

lua_getuservalue()

LUA_API void lua_getuservalue	(	lua_State *	L,
		int	idx )

Definition at line 715 of file lua-5.2.4/src/lapi.c.

                                                      {
  StkId o;
  lua_lock(L);
  o = index2addr(L, idx);
  api_check(L, ttisuserdata(o), "userdata expected");
  if (uvalue(o)->env) {
    sethvalue(L, L->top, uvalue(o)->env);
  } else
    setnilvalue(L->top);
  api_incr_top(L);
  lua_unlock(L);
}

lua_insert()

LUA_API void lua_insert	(	lua_State *	L,
		int	idx )

Definition at line 191 of file lua-5.1.5/src/lapi.c.

                                                {
  StkId p;
  StkId q;
  lua_lock(L);
  p = index2adr(L, idx);
  api_checkvalidindex(L, p);
  for (q = L->top; q>p; q--) setobjs2s(L, q, q-1);
  setobjs2s(L, p, L->top);
  lua_unlock(L);
}

References api_checkstackindex, api_checkvalidindex, index2addr(), index2adr(), lua_lock, lua_unlock, setobjs2s, and lua_State::top.

lua_iscfunction()

LUA_API int lua_iscfunction	(	lua_State *	L,
		int	idx )

Definition at line 254 of file lua-5.1.5/src/lapi.c.

                                                    {
  StkId o = index2adr(L, idx);
  return iscfunction(o);
}

lua_isnumber()

LUA_API int lua_isnumber	(	lua_State *	L,
		int	idx )

Definition at line 260 of file lua-5.1.5/src/lapi.c.

                                                 {
  TValue n;
  const TValue *o = index2adr(L, idx);
  return tonumber(o, &n);
}

lua_isstring()

LUA_API int lua_isstring	(	lua_State *	L,
		int	idx )

Definition at line 267 of file lua-5.1.5/src/lapi.c.

                                                 {
  int t = lua_type(L, idx);
  return (t == LUA_TSTRING || t == LUA_TNUMBER);
}

lua_isuserdata()

LUA_API int lua_isuserdata	(	lua_State *	L,
		int	idx )

Definition at line 273 of file lua-5.1.5/src/lapi.c.

                                                   {
  const TValue *o = index2adr(L, idx);
  return (ttisuserdata(o) || ttislightuserdata(o));
}

lua_len()

LUA_API void lua_len	(	lua_State *	L,
		int	idx )

Definition at line 1147 of file lua-5.2.4/src/lapi.c.

                                             {
  StkId t;
  lua_lock(L);
  t = index2addr(L, idx);
  luaV_objlen(L, L->top, t);
  api_incr_top(L);
  lua_unlock(L);
}

lua_load()

LUA_API int lua_load	(	lua_State *	L,
		lua_Reader	reader,
		void *	dt,
		const char *	chunkname,
		const char *	mode )

Definition at line 973 of file lua-5.2.4/src/lapi.c.

                                                               {
  ZIO z;
  int status;
  lua_lock(L);
  if (!chunkname) chunkname = "?";
  luaZ_init(L, &z, reader, data);
  status = luaD_protectedparser(L, &z, chunkname, mode);
  if (status == LUA_OK) {  /* no errors? */
    LClosure *f = clLvalue(L->top - 1);  /* get newly created function */
    if (f->nupvalues == 1) {  /* does it have one upvalue? */
      /* get global table from registry */
      Table *reg = hvalue(&G(L)->l_registry);
      const TValue *gt = luaH_getint(reg, LUA_RIDX_GLOBALS);
      /* set global table as 1st upvalue of 'f' (may be LUA_ENV) */
      setobj(L, f->upvals[0]->v, gt);
      luaC_barrier(L, f->upvals[0], gt);
    }
  }
  lua_unlock(L);
  return status;
}

lua_newstate()

LUA_API lua_State * lua_newstate	(	lua_Alloc	f,
		void *	ud )

Definition at line 143 of file lua-5.1.5/src/lstate.c.

                                                        {
  int i;
  lua_State *L;
  global_State *g;
  void *l = (*f)(ud, NULL, 0, state_size(LG));
  if (l == NULL) return NULL;
  L = tostate(l);
  g = &((LG *)L)->g;
  L->next = NULL;
  L->tt = LUA_TTHREAD;
  g->currentwhite = bit2mask(WHITE0BIT, FIXEDBIT);
  L->marked = luaC_white(g);
  set2bits(L->marked, FIXEDBIT, SFIXEDBIT);
  preinit_state(L, g);
  g->frealloc = f;
  g->ud = ud;
  g->mainthread = L;
  g->uvhead.u.l.prev = &g->uvhead;
  g->uvhead.u.l.next = &g->uvhead;
  g->GCthreshold = 0;  /* mark it as unfinished state */
  g->strt.size = 0;
  g->strt.nuse = 0;
  g->strt.hash = NULL;
  setnilvalue(registry(L));
  luaZ_initbuffer(L, &g->buff);
  g->panic = NULL;
  g->gcstate = GCSpause;
  g->rootgc = obj2gco(L);
  g->sweepstrgc = 0;
  g->sweepgc = &g->rootgc;
  g->gray = NULL;
  g->grayagain = NULL;
  g->weak = NULL;
  g->tmudata = NULL;
  g->totalbytes = sizeof(LG);
  g->gcpause = LUAI_GCPAUSE;
  g->gcstepmul = LUAI_GCMUL;
  g->gcdept = 0;
  for (i=0; i<NUM_TAGS; i++) g->mt[i] = NULL;
  if (luaD_rawrunprotected(L, f_luaopen, NULL) != 0) {
    /* memory allocation error: free partial state */
    close_state(L);
    L = NULL;
  }
  else
    luai_userstateopen(L);
  return L;
}

lua_newthread()

LUA_API lua_State * lua_newthread

(

lua_State *

L

)

Definition at line 140 of file lua-5.1.5/src/lapi.c.

                                                {
  lua_State *L1;
  lua_lock(L);
  luaC_checkGC(L);
  L1 = luaE_newthread(L);
  setthvalue(L, L->top, L1);
  api_incr_top(L);
  lua_unlock(L);
  luai_userstatethread(L, L1);
  return L1;
}

lua_newuserdata()

LUA_API void * lua_newuserdata	(	lua_State *	L,
		size_t	sz )

Definition at line 1025 of file lua-5.1.5/src/lapi.c.

                                                          {
  Udata *u;
  lua_lock(L);
  luaC_checkGC(L);
  u = luaS_newudata(L, size, getcurrenv(L));
  setuvalue(L, L->top, u);
  api_incr_top(L);
  lua_unlock(L);
  return u + 1;
}

lua_next()

LUA_API int lua_next	(	lua_State *	L,
		int	idx )

Definition at line 973 of file lua-5.1.5/src/lapi.c.

                                             {
  StkId t;
  int more;
  lua_lock(L);
  t = index2adr(L, idx);
  api_check(L, ttistable(t));
  more = luaH_next(L, hvalue(t), L->top - 1);
  if (more) {
    api_incr_top(L);
  }
  else  /* no more elements */
    L->top -= 1;  /* remove key */
  lua_unlock(L);
  return more;
}

lua_pcallk()

LUA_API int lua_pcallk	(	lua_State *	L,
		int	nargs,
		int	nresults,
		int	errfunc,
		int	ctx,
		lua_CFunction	k )

Definition at line 928 of file lua-5.2.4/src/lapi.c.

                                                  {
  struct CallS c;
  int status;
  ptrdiff_t func;
  lua_lock(L);
  api_check(L, k == NULL || !isLua(L->ci),
    "cannot use continuations inside hooks");
  api_checknelems(L, nargs+1);
  api_check(L, L->status == LUA_OK, "cannot do calls on non-normal thread");
  checkresults(L, nargs, nresults);
  if (errfunc == 0)
    func = 0;
  else {
    StkId o = index2addr(L, errfunc);
    api_checkstackindex(L, errfunc, o);
    func = savestack(L, o);
  }
  c.func = L->top - (nargs+1);  /* function to be called */
  if (k == NULL || L->nny > 0) {  /* no continuation or no yieldable? */
    c.nresults = nresults;  /* do a 'conventional' protected call */
    status = luaD_pcall(L, f_call, &c, savestack(L, c.func), func);
  }
  else {  /* prepare continuation (call is already protected by 'resume') */
    CallInfo *ci = L->ci;
    ci->u.c.k = k;  /* save continuation */
    ci->u.c.ctx = ctx;  /* save context */
    /* save information for error recovery */
    ci->extra = savestack(L, c.func);
    ci->u.c.old_allowhook = L->allowhook;
    ci->u.c.old_errfunc = L->errfunc;
    L->errfunc = func;
    /* mark that function may do error recovery */
    ci->callstatus |= CIST_YPCALL;
    luaD_call(L, c.func, nresults, 1);  /* do the call */
    ci->callstatus &= ~CIST_YPCALL;
    L->errfunc = ci->u.c.old_errfunc;
    status = LUA_OK;  /* if it is here, there were no errors */
  }
  adjustresults(L, nresults);
  lua_unlock(L);
  return status;
}

References adjustresults, lua_State::allowhook, api_check, api_checknelems, api_checkstackindex, CallInfo::c, CallInfo::callstatus, checkresults, lua_State::ci, CIST_YPCALL, CallInfo::ctx, lua_State::errfunc, CallInfo::extra, f_call(), CallS::func, index2addr(), isLua, CallInfo::k, lua_lock, LUA_OK, lua_unlock, luaD_call(), luaD_pcall(), lua_State::nny, CallS::nresults, NULL, CallInfo::old_allowhook, CallInfo::old_errfunc, savestack, lua_State::status, lua_State::top, and CallInfo::u.

Referenced by luaB_pcall(), luaB_pcall(), luaB_pcall(), luaB_xpcall(), luaB_xpcall(), and luaB_xpcall().

lua_pushboolean()

LUA_API void lua_pushboolean	(	lua_State *	L,
		int	b )

Definition at line 503 of file lua-5.1.5/src/lapi.c.

                                                   {
  lua_lock(L);
  setbvalue(L->top, (b != 0));  /* ensure that true is 1 */
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushcclosure()

LUA_API void lua_pushcclosure	(	lua_State *	L,
		lua_CFunction	fn,
		int	n )

Definition at line 486 of file lua-5.1.5/src/lapi.c.

                                                                      {
  Closure *cl;
  lua_lock(L);
  luaC_checkGC(L);
  api_checknelems(L, n);
  cl = luaF_newCclosure(L, n, getcurrenv(L));
  cl->c.f = fn;
  L->top -= n;
  while (n--)
    setobj2n(L, &cl->c.upvalue[n], L->top+n);
  setclvalue(L, L->top, cl);
  lua_assert(iswhite(obj2gco(cl)));
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushfstring()

LUA_API const char * lua_pushfstring	(	lua_State *	L,
		const char *	fmt,
			... )

Definition at line 473 of file lua-5.1.5/src/lapi.c.

                                                                         {
  const char *ret;
  va_list argp;
  lua_lock(L);
  luaC_checkGC(L);
  va_start(argp, fmt);
  ret = luaO_pushvfstring(L, fmt, argp);
  va_end(argp);
  lua_unlock(L);
  return ret;
}

lua_pushinteger()

LUA_API void lua_pushinteger	(	lua_State *	L,
		lua_Integer	n )

Definition at line 437 of file lua-5.1.5/src/lapi.c.

                                                           {
  lua_lock(L);
  setnvalue(L->top, cast_num(n));
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushlightuserdata()

LUA_API void lua_pushlightuserdata	(	lua_State *	L,
		void *	p )

Definition at line 511 of file lua-5.1.5/src/lapi.c.

                                                           {
  lua_lock(L);
  setpvalue(L->top, p);
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushlstring()

LUA_API const char * lua_pushlstring	(	lua_State *	L,
		const char *	s,
		size_t	l )

Definition at line 445 of file lua-5.1.5/src/lapi.c.

                                                                       {
  lua_lock(L);
  luaC_checkGC(L);
  setsvalue2s(L, L->top, luaS_newlstr(L, s, len));
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushnil()

LUA_API void lua_pushnil

(

lua_State *

L

)

Definition at line 421 of file lua-5.1.5/src/lapi.c.

                                        {
  lua_lock(L);
  setnilvalue(L->top);
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushnumber()

LUA_API void lua_pushnumber	(	lua_State *	L,
		lua_Number	n )

Definition at line 429 of file lua-5.1.5/src/lapi.c.

                                                         {
  lua_lock(L);
  setnvalue(L->top, n);
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushstring()

LUA_API const char * lua_pushstring	(	lua_State *	L,
		const char *	s )

Definition at line 454 of file lua-5.1.5/src/lapi.c.

                                                          {
  if (s == NULL)
    lua_pushnil(L);
  else
    lua_pushlstring(L, s, strlen(s));
}

lua_pushthread()

LUA_API int lua_pushthread

(

lua_State *

L

)

Definition at line 519 of file lua-5.1.5/src/lapi.c.

                                          {
  lua_lock(L);
  setthvalue(L, L->top, L);
  api_incr_top(L);
  lua_unlock(L);
  return (G(L)->mainthread == L);
}

lua_pushunsigned()

LUA_API void lua_pushunsigned	(	lua_State *	L,
		lua_Unsigned	n )

Definition at line 491 of file lua-5.2.4/src/lapi.c.

                                                             {
  lua_Number n;
  lua_lock(L);
  n = lua_unsigned2number(u);
  setnvalue(L->top, n);
  api_incr_top(L);
  lua_unlock(L);
}

References api_incr_top, lua_lock, lua_unlock, lua_unsigned2number, setnvalue, and lua_State::top.

Referenced by b_and(), b_arshift(), b_extract(), b_not(), b_or(), b_replace(), b_rot(), b_shift(), and b_xor().

lua_pushvalue()

LUA_API void lua_pushvalue	(	lua_State *	L,
		int	idx )

Definition at line 228 of file lua-5.1.5/src/lapi.c.

                                                   {
  lua_lock(L);
  setobj2s(L, L->top, index2adr(L, idx));
  api_incr_top(L);
  lua_unlock(L);
}

lua_pushvfstring()

LUA_API const char * lua_pushvfstring	(	lua_State *	L,
		const char *	fmt,
		va_list	argp )

Definition at line 462 of file lua-5.1.5/src/lapi.c.

                                                    {
  const char *ret;
  lua_lock(L);
  luaC_checkGC(L);
  ret = luaO_pushvfstring(L, fmt, argp);
  lua_unlock(L);
  return ret;
}

lua_rawequal()

LUA_API int lua_rawequal	(	lua_State *	L,
		int	idx1,
		int	idx2 )

Definition at line 279 of file lua-5.1.5/src/lapi.c.

                                                                {
  StkId o1 = index2adr(L, index1);
  StkId o2 = index2adr(L, index2);
  return (o1 == luaO_nilobject || o2 == luaO_nilobject) ? 0
         : luaO_rawequalObj(o1, o2);
}

lua_rawget()

LUA_API void lua_rawget	(	lua_State *	L,
		int	idx )

Definition at line 557 of file lua-5.1.5/src/lapi.c.

                                                {
  StkId t;
  lua_lock(L);
  t = index2adr(L, idx);
  api_check(L, ttistable(t));
  setobj2s(L, L->top - 1, luaH_get(hvalue(t), L->top - 1));
  lua_unlock(L);
}

lua_rawgeti()

LUA_API void lua_rawgeti	(	lua_State *	L,
		int	idx,
		int	n )

Definition at line 567 of file lua-5.1.5/src/lapi.c.

                                                        {
  StkId o;
  lua_lock(L);
  o = index2adr(L, idx);
  api_check(L, ttistable(o));
  setobj2s(L, L->top, luaH_getnum(hvalue(o), n));
  api_incr_top(L);
  lua_unlock(L);
}

References api_check, api_incr_top, hvalue, index2addr(), index2adr(), lua_lock, lua_unlock, luaH_getint(), luaH_getnum(), setobj2s, lua_State::top, and ttistable.

Referenced by addfield(), addfield(), auxsort(), auxsort(), collwrapper(), db_busy_callback(), db_commit_hook_callback(), db_progress_callback(), db_rollback_hook_callback(), db_sql_finalize_function(), db_sql_normal_function(), db_trace_callback(), db_update_hook_callback(), findloader(), findloader(), findloader(), foreachi(), g_iofile(), gctm(), gctm(), gctm(), getiofile(), io_close(), io_lines(), ipairsaux(), ipairsaux(), lcontext_get_aggregate_context(), lcontext_user_data(), ll_require(), lsqlite_make_context(), luaB_unpack(), luaL_ref(), luaL_unref(), pushargs(), pushargs(), tinsert(), tinsert(), tremove(), tremove(), unpack(), Xml_find(), Xml_iterate(), Xml_pushDecode(), Xml_pushEncode(), Xml_registerCode(), and Xml_str().

lua_rawgetp()

LUA_API void lua_rawgetp	(	lua_State *	L,
		int	idx,
		const void *	p )

Definition at line 660 of file lua-5.2.4/src/lapi.c.

                                                                {
  StkId t;
  TValue k;
  lua_lock(L);
  t = index2addr(L, idx);
  api_check(L, ttistable(t), "table expected");
  setpvalue(&k, cast(void *, p));
  setobj2s(L, L->top, luaH_get(hvalue(t), &k));
  api_incr_top(L);
  lua_unlock(L);
}

lua_rawlen()

LUA_API size_t lua_rawlen	(	lua_State *	L,
		int	idx )

Definition at line 407 of file lua-5.2.4/src/lapi.c.

                                                  {
  StkId o = index2addr(L, idx);
  switch (ttypenv(o)) {
    case LUA_TSTRING: return tsvalue(o)->len;
    case LUA_TUSERDATA: return uvalue(o)->len;
    case LUA_TTABLE: return luaH_getn(hvalue(o));
    default: return 0;
  }
}

lua_rawset()

LUA_API void lua_rawset	(	lua_State *	L,
		int	idx )

Definition at line 671 of file lua-5.1.5/src/lapi.c.

                                                {
  StkId t;
  lua_lock(L);
  api_checknelems(L, 2);
  t = index2adr(L, idx);
  api_check(L, ttistable(t));
  setobj2t(L, luaH_set(L, hvalue(t), L->top-2), L->top-1);
  luaC_barriert(L, hvalue(t), L->top-1);
  L->top -= 2;
  lua_unlock(L);
}

lua_rawseti()

LUA_API void lua_rawseti	(	lua_State *	L,
		int	idx,
		int	n )

Definition at line 684 of file lua-5.1.5/src/lapi.c.

                                                        {
  StkId o;
  lua_lock(L);
  api_checknelems(L, 1);
  o = index2adr(L, idx);
  api_check(L, ttistable(o));
  setobj2t(L, luaH_setnum(L, hvalue(o), n), L->top-1);
  luaC_barriert(L, hvalue(o), L->top-1);
  L->top--;
  lua_unlock(L);
}

References api_check, api_checknelems, gcvalue, hvalue, index2addr(), index2adr(), lua_lock, lua_unlock, luaC_barrierback, luaC_barriert, luaH_setint(), luaH_setnum(), setobj2t, lua_State::top, and ttistable.

Referenced by addtoclib(), addtoclib(), createargtable(), createargtable(), createsearcherstable(), createsearcherstable(), createsearcherstable(), createstdfile(), db_do_next_row(), db_exec_callback(), dbvm_get_names(), dbvm_get_types(), dbvm_get_values(), find_on_match(), g_iofile(), getargs(), getargs(), ll_addtoclib(), lsqlite_backup_init(), luaL_ref(), luaL_unref(), luaopen_package(), pack(), set2(), set2(), tinsert(), tinsert(), tremove(), tremove(), Xml_append(), Xml_eval(), and Xml_str().

lua_rawsetp()

LUA_API void lua_rawsetp	(	lua_State *	L,
		int	idx,
		const void *	p )

Definition at line 797 of file lua-5.2.4/src/lapi.c.

                                                                {
  StkId t;
  TValue k;
  lua_lock(L);
  api_checknelems(L, 1);
  t = index2addr(L, idx);
  api_check(L, ttistable(t), "table expected");
  setpvalue(&k, cast(void *, p));
  setobj2t(L, luaH_set(L, hvalue(t), &k), L->top - 1);
  luaC_barrierback(L, gcvalue(t), L->top - 1);
  L->top--;
  lua_unlock(L);
}

lua_remove()

LUA_API void lua_remove	(	lua_State *	L,
		int	idx )

Definition at line 180 of file lua-5.1.5/src/lapi.c.

                                                {
  StkId p;
  lua_lock(L);
  p = index2adr(L, idx);
  api_checkvalidindex(L, p);
  while (++p < L->top) setobjs2s(L, p-1, p);
  L->top--;
  lua_unlock(L);
}

References api_checkstackindex, api_checkvalidindex, index2addr(), index2adr(), lua_lock, lua_unlock, setobjs2s, and lua_State::top.

lua_replace()

LUA_API void lua_replace	(	lua_State *	L,
		int	idx )

Definition at line 203 of file lua-5.1.5/src/lapi.c.

                                                 {
  StkId o;
  lua_lock(L);
  /* explicit test for incompatible code */
  if (idx == LUA_ENVIRONINDEX && L->ci == L->base_ci)
    luaG_runerror(L, "no calling environment");
  api_checknelems(L, 1);
  o = index2adr(L, idx);
  api_checkvalidindex(L, o);
  if (idx == LUA_ENVIRONINDEX) {
    Closure *func = curr_func(L);
    api_check(L, ttistable(L->top - 1)); 
    func->c.env = hvalue(L->top - 1);
    luaC_barrier(L, func, L->top - 1);
  }
  else {
    setobj(L, o, L->top - 1);
    if (idx < LUA_GLOBALSINDEX)  /* function upvalue? */
      luaC_barrier(L, curr_func(L), L->top - 1);
  }
  L->top--;
  lua_unlock(L);
}

References api_check, api_checknelems, api_checkvalidindex, lua_State::base_ci, Closure::c, lua_State::ci, curr_func, hvalue, index2adr(), LUA_ENVIRONINDEX, LUA_GLOBALSINDEX, lua_lock, lua_unlock, luaC_barrier, luaG_runerror(), moveto(), setobj, lua_State::top, and ttistable.

lua_resume()

LUA_API int lua_resume	(	lua_State *	L,
		lua_State *	from,
		int	narg )

Definition at line 535 of file lua-5.2.4/src/ldo.c.

                                                                  {
  int status;
  int oldnny = L->nny;  /* save 'nny' */
  lua_lock(L);
  luai_userstateresume(L, nargs);
  L->nCcalls = (from) ? from->nCcalls + 1 : 1;
  L->nny = 0;  /* allow yields */
  api_checknelems(L, (L->status == LUA_OK) ? nargs + 1 : nargs);
  status = luaD_rawrunprotected(L, resume, L->top - nargs);
  if (status == -1)  /* error calling 'lua_resume'? */
    status = LUA_ERRRUN;
  else {  /* yield or regular error */
    while (status != LUA_OK && status != LUA_YIELD) {  /* error? */
      if (recover(L, status))  /* recover point? */
        status = luaD_rawrunprotected(L, unroll, NULL);  /* run continuation */
      else {  /* unrecoverable error */
        L->status = cast_byte(status);  /* mark thread as `dead' */
        seterrorobj(L, status, L->top);
        L->ci->top = L->top;
        break;
      }
    }
    lua_assert(status == L->status);
  }
  L->nny = oldnny;  /* restore 'nny' */
  L->nCcalls--;
  lua_assert(L->nCcalls == ((from) ? from->nCcalls : 0));
  lua_unlock(L);
  return status;
}

lua_setallocf()

LUA_API void lua_setallocf	(	lua_State *	L,
		lua_Alloc	f,
		void *	ud )

Definition at line 1017 of file lua-5.1.5/src/lapi.c.

                                                                 {
  lua_lock(L);
  G(L)->ud = ud;
  G(L)->frealloc = f;
  lua_unlock(L);
}

lua_setfield()

LUA_API void lua_setfield	(	lua_State *	L,
		int	idx,
		const char *	k )

Definition at line 657 of file lua-5.1.5/src/lapi.c.

                                                                 {
  StkId t;
  TValue key;
  lua_lock(L);
  api_checknelems(L, 1);
  t = index2adr(L, idx);
  api_checkvalidindex(L, t);
  setsvalue(L, &key, luaS_new(L, k));
  luaV_settable(L, t, &key, L->top - 1);
  L->top--;  /* pop value */
  lua_unlock(L);
}

lua_setglobal()

LUA_API void lua_setglobal	(	lua_State *	L,
		const char *	var )

Definition at line 734 of file lua-5.2.4/src/lapi.c.

                                                           {
  Table *reg = hvalue(&G(L)->l_registry);
  const TValue *gt;  /* global table */
  lua_lock(L);
  api_checknelems(L, 1);
  gt = luaH_getint(reg, LUA_RIDX_GLOBALS);
  setsvalue2s(L, L->top++, luaS_new(L, var));
  luaV_settable(L, gt, L->top - 1, L->top - 2);
  L->top -= 2;  /* pop value and key */
  lua_unlock(L);
}

lua_sethook()

LUA_API int lua_sethook	(	lua_State *	L,
		lua_Hook	func,
		int	mask,
		int	count )

Definition at line 56 of file lua-5.1.5/src/ldebug.c.

                                                                           {
  if (func == NULL || mask == 0) {  /* turn off hooks? */
    mask = 0;
    func = NULL;
  }
  L->hook = func;
  L->basehookcount = count;
  resethookcount(L);
  L->hookmask = cast_byte(mask);
  return 1;
}

lua_setlocal()

LUA_API const char * lua_setlocal	(	lua_State *	L,
		const lua_Debug *	ar,
		int	n )

Definition at line 138 of file lua-5.1.5/src/ldebug.c.

                                                                            {
  CallInfo *ci = L->base_ci + ar->i_ci;
  const char *name = findlocal(L, ci, n);
  lua_lock(L);
  if (name)
      setobjs2s(L, ci->base + (n - 1), L->top - 1);
  L->top--;  /* pop value */
  lua_unlock(L);
  return name;
}

lua_setmetatable()

LUA_API int lua_setmetatable	(	lua_State *	L,
		int	objindex )

Definition at line 697 of file lua-5.1.5/src/lapi.c.

                                                          {
  TValue *obj;
  Table *mt;
  lua_lock(L);
  api_checknelems(L, 1);
  obj = index2adr(L, objindex);
  api_checkvalidindex(L, obj);
  if (ttisnil(L->top - 1))
    mt = NULL;
  else {
    api_check(L, ttistable(L->top - 1));
    mt = hvalue(L->top - 1);
  }
  switch (ttype(obj)) {
    case LUA_TTABLE: {
      hvalue(obj)->metatable = mt;
      if (mt)
        luaC_objbarriert(L, hvalue(obj), mt);
      break;
    }
    case LUA_TUSERDATA: {
      uvalue(obj)->metatable = mt;
      if (mt)
        luaC_objbarrier(L, rawuvalue(obj), mt);
      break;
    }
    default: {
      G(L)->mt[ttype(obj)] = mt;
      break;
    }
  }
  L->top--;
  lua_unlock(L);
  return 1;
}

lua_settable()

LUA_API void lua_settable	(	lua_State *	L,
		int	idx )

Definition at line 645 of file lua-5.1.5/src/lapi.c.

                                                  {
  StkId t;
  lua_lock(L);
  api_checknelems(L, 2);
  t = index2adr(L, idx);
  api_checkvalidindex(L, t);
  luaV_settable(L, t, L->top - 2, L->top - 1);
  L->top -= 2;  /* pop index and value */
  lua_unlock(L);
}

lua_settop()

LUA_API void lua_settop	(	lua_State *	L,
		int	idx )

Definition at line 164 of file lua-5.1.5/src/lapi.c.

                                                {
  lua_lock(L);
  if (idx >= 0) {
    api_check(L, idx <= L->stack_last - L->base);
    while (L->top < L->base + idx)
      setnilvalue(L->top++);
    L->top = L->base + idx;
  }
  else {
    api_check(L, -(idx+1) <= (L->top - L->base));
    L->top += idx+1;  /* `subtract' index (index is negative) */
  }
  lua_unlock(L);
}

lua_setupvalue()

LUA_API const char * lua_setupvalue	(	lua_State *	L,
		int	funcindex,
		int	n )

Definition at line 1071 of file lua-5.1.5/src/lapi.c.

                                                                        {
  const char *name;
  TValue *val;
  StkId fi;
  lua_lock(L);
  fi = index2adr(L, funcindex);
  api_checknelems(L, 1);
  name = aux_upvalue(fi, n, &val);
  if (name) {
    L->top--;
    setobj(L, val, L->top);
    luaC_barrier(L, clvalue(fi), L->top);
  }
  lua_unlock(L);
  return name;
}

lua_setuservalue()

LUA_API void lua_setuservalue	(	lua_State *	L,
		int	idx )

Definition at line 852 of file lua-5.2.4/src/lapi.c.

                                                      {
  StkId o;
  lua_lock(L);
  api_checknelems(L, 1);
  o = index2addr(L, idx);
  api_check(L, ttisuserdata(o), "userdata expected");
  if (ttisnil(L->top - 1))
    uvalue(o)->env = NULL;
  else {
    api_check(L, ttistable(L->top - 1), "table expected");
    uvalue(o)->env = hvalue(L->top - 1);
    luaC_objbarrier(L, gcvalue(o), hvalue(L->top - 1));
  }
  L->top--;
  lua_unlock(L);
}

lua_status()

LUA_API int lua_status

(

lua_State *

L

)

Definition at line 890 of file lua-5.1.5/src/lapi.c.

                                       {
  return L->status;
}

lua_toboolean()

LUA_API int lua_toboolean	(	lua_State *	L,
		int	idx )

Definition at line 337 of file lua-5.1.5/src/lapi.c.

                                                  {
  const TValue *o = index2adr(L, idx);
  return !l_isfalse(o);
}

lua_tocfunction()

LUA_API lua_CFunction lua_tocfunction	(	lua_State *	L,
		int	idx )

Definition at line 379 of file lua-5.1.5/src/lapi.c.

                                                              {
  StkId o = index2adr(L, idx);
  return (!iscfunction(o)) ? NULL : clvalue(o)->c.f;
}

lua_tointegerx()

LUA_API lua_Integer lua_tointegerx	(	lua_State *	L,
		int	idx,
		int *	isnum )

Definition at line 349 of file lua-5.2.4/src/lapi.c.

                                                                       {
  TValue n;
  const TValue *o = index2addr(L, idx);
  if (tonumber(o, &n)) {
    lua_Integer res;
    lua_Number num = nvalue(o);
    lua_number2integer(res, num);
    if (isnum) *isnum = 1;
    return res;
  }
  else {
    if (isnum) *isnum = 0;
    return 0;
  }
}

lua_tolstring()

LUA_API const char * lua_tolstring	(	lua_State *	L,
		int	idx,
		size_t *	len )

Definition at line 343 of file lua-5.1.5/src/lapi.c.

                                                                       {
  StkId o = index2adr(L, idx);
  if (!ttisstring(o)) {
    lua_lock(L);  /* `luaV_tostring' may create a new string */
    if (!luaV_tostring(L, o)) {  /* conversion failed? */
      if (len != NULL) *len = 0;
      lua_unlock(L);
      return NULL;
    }
    luaC_checkGC(L);
    o = index2adr(L, idx);  /* previous call may reallocate the stack */
    lua_unlock(L);
  }
  if (len != NULL) *len = tsvalue(o)->len;
  return svalue(o);
}

lua_tonumberx()

LUA_API lua_Number lua_tonumberx	(	lua_State *	L,
		int	idx,
		int *	isnum )

Definition at line 335 of file lua-5.2.4/src/lapi.c.

                                                                     {
  TValue n;
  const TValue *o = index2addr(L, idx);
  if (tonumber(o, &n)) {
    if (isnum) *isnum = 1;
    return nvalue(o);
  }
  else {
    if (isnum) *isnum = 0;
    return 0;
  }
}

lua_topointer()

LUA_API const void * lua_topointer	(	lua_State *	L,
		int	idx )

Definition at line 401 of file lua-5.1.5/src/lapi.c.

                                                          {
  StkId o = index2adr(L, idx);
  switch (ttype(o)) {
    case LUA_TTABLE: return hvalue(o);
    case LUA_TFUNCTION: return clvalue(o);
    case LUA_TTHREAD: return thvalue(o);
    case LUA_TUSERDATA:
    case LUA_TLIGHTUSERDATA:
      return lua_touserdata(L, idx);
    default: return NULL;
  }
}

lua_tothread()

LUA_API lua_State * lua_tothread	(	lua_State *	L,
		int	idx )

Definition at line 395 of file lua-5.1.5/src/lapi.c.

                                                        {
  StkId o = index2adr(L, idx);
  return (!ttisthread(o)) ? NULL : thvalue(o);
}

lua_tounsignedx()

LUA_API lua_Unsigned lua_tounsignedx	(	lua_State *	L,
		int	idx,
		int *	isnum )

Definition at line 366 of file lua-5.2.4/src/lapi.c.

                                                                         {
  TValue n;
  const TValue *o = index2addr(L, idx);
  if (tonumber(o, &n)) {
    lua_Unsigned res;
    lua_Number num = nvalue(o);
    lua_number2unsigned(res, num);
    if (isnum) *isnum = 1;
    return res;
  }
  else {
    if (isnum) *isnum = 0;
    return 0;
  }
}

References index2addr(), lua_number2unsigned, nvalue, and tonumber.

Referenced by luaL_checkunsigned().

lua_touserdata()

LUA_API void * lua_touserdata	(	lua_State *	L,
		int	idx )

Definition at line 385 of file lua-5.1.5/src/lapi.c.

                                                     {
  StkId o = index2adr(L, idx);
  switch (ttype(o)) {
    case LUA_TUSERDATA: return (rawuvalue(o) + 1);
    case LUA_TLIGHTUSERDATA: return pvalue(o);
    default: return NULL;
  }
}

lua_type()

LUA_API int lua_type	(	lua_State *	L,
		int	idx )

Definition at line 242 of file lua-5.1.5/src/lapi.c.

                                             {
  StkId o = index2adr(L, idx);
  return (o == luaO_nilobject) ? LUA_TNONE : ttype(o);
}

lua_typename()

LUA_API const char * lua_typename	(	lua_State *	L,
		int	tp )

Definition at line 248 of file lua-5.1.5/src/lapi.c.

                                                       {
  UNUSED(L);
  return (t == LUA_TNONE) ? "no value" : luaT_typenames[t];
}

lua_upvalueid()

LUA_API void * lua_upvalueid	(	lua_State *	L,
		int	fidx,
		int	n )

Definition at line 1257 of file lua-5.2.4/src/lapi.c.

                                                            {
  StkId fi = index2addr(L, fidx);
  switch (ttype(fi)) {
    case LUA_TLCL: {  /* lua closure */
      return *getupvalref(L, fidx, n, NULL);
    }
    case LUA_TCCL: {  /* C closure */
      CClosure *f = clCvalue(fi);
      api_check(L, 1 <= n && n <= f->nupvalues, "invalid upvalue index");
      return &f->upvalue[n - 1];
    }
    default: {
      api_check(L, 0, "closure expected");
      return NULL;
    }
  }
}

lua_upvaluejoin()

LUA_API void lua_upvaluejoin	(	lua_State *	L,
		int	fidx1,
		int	n1,
		int	fidx2,
		int	n2 )

Definition at line 1276 of file lua-5.2.4/src/lapi.c.

                                                               {
  LClosure *f1;
  UpVal **up1 = getupvalref(L, fidx1, n1, &f1);
  UpVal **up2 = getupvalref(L, fidx2, n2, NULL);
  *up1 = *up2;
  luaC_objbarrier(L, f1, *up2);
}

lua_version()

LUA_API const lua_Number * lua_version

(

lua_State *

L

)

Definition at line 137 of file lua-5.2.4/src/lapi.c.

                                                     {
  static const lua_Number version = LUA_VERSION_NUM;
  if (L == NULL) return &version;
  else return G(L)->version;
}

lua_xmove()

LUA_API void lua_xmove	(	lua_State *	from,
		lua_State *	to,
		int	n )

Definition at line 110 of file lua-5.1.5/src/lapi.c.

                                                               {
  int i;
  if (from == to) return;
  lua_lock(to);
  api_checknelems(from, n);
  api_check(from, G(from) == G(to));
  api_check(from, to->ci->top - to->top >= n);
  from->top -= n;
  for (i = 0; i < n; i++) {
    setobj2s(to, to->top++, from->top + i);
  }
  lua_unlock(to);
}

lua_yieldk()

LUA_API int lua_yieldk	(	lua_State *	L,
		int	nresults,
		int	ctx,
		lua_CFunction	k )

Definition at line 567 of file lua-5.2.4/src/ldo.c.

                                                                              {
  CallInfo *ci = L->ci;
  luai_userstateyield(L, nresults);
  lua_lock(L);
  api_checknelems(L, nresults);
  if (L->nny > 0) {
    if (L != G(L)->mainthread)
      luaG_runerror(L, "attempt to yield across a C-call boundary");
    else
      luaG_runerror(L, "attempt to yield from outside a coroutine");
  }
  L->status = LUA_YIELD;
  ci->extra = savestack(L, ci->func);  /* save current 'func' */
  if (isLua(ci)) {  /* inside a hook? */
    api_check(L, k == NULL, "hooks cannot continue after yielding");
  }
  else {
    if ((ci->u.c.k = k) != NULL)  /* is there a continuation? */
      ci->u.c.ctx = ctx;  /* save context */
    ci->func = L->top - nresults - 1;  /* protect stack below results */
    luaD_throw(L, LUA_YIELD);
  }
  lua_assert(ci->callstatus & CIST_HOOKED);  /* must be inside a hook */
  lua_unlock(L);
  return 0;  /* return to 'luaD_hook' */
}

References api_check, api_checknelems, CallInfo::c, CallInfo::callstatus, lua_State::ci, CIST_HOOKED, CallInfo::ctx, CallInfo::extra, CallInfo::func, G, isLua, CallInfo::k, lua_assert, lua_lock, lua_unlock, LUA_YIELD, luaD_throw(), luaG_runerror(), luai_userstateyield, lua_State::nny, NULL, savestack, lua_State::status, lua_State::top, and CallInfo::u.

Variable Documentation

lua_ident

const char lua_ident[]

extern

Definition at line 34 of file lua-5.1.5/src/lapi.c.