#include "lua.h"
#include "lobject.h"
#include "ltm.h"
#include "lzio.h"

Data Structures
struct	stringtable

struct	CallInfo

struct	global_State

struct	lua_State

struct	GCObject

Macros
#define	EXTRA_STACK 5

#define	BASIC_STACK_SIZE (2*LUA_MINSTACK)

#define	KGC_NORMAL 0

#define	KGC_EMERGENCY 1 /* gc was forced by an allocation failure */

#define	KGC_GEN 2 /* generational collection */

#define	CIST_LUA (1<<0) /* call is running a Lua function */

#define	CIST_HOOKED (1<<1) /* call is running a debug hook */

#define	CIST_REENTRY

#define	CIST_YIELDED (1<<3) /* call reentered after suspension */

#define	CIST_YPCALL (1<<4) /* call is a yieldable protected call */

#define	CIST_STAT (1<<5) /* call has an error status (pcall) */

#define	CIST_TAIL (1<<6) /* call was tail called */

#define	CIST_HOOKYIELD (1<<7) /* last hook called yielded */

#define	isLua(ci) ((ci)->callstatus & CIST_LUA)

#define	G(L) (L->l_G)

#define	gch(o) (&(o)->gch)

#define	rawgco2ts(o) check_exp(novariant((o)->gch.tt) == LUA_TSTRING, &((o)->ts))

#define	gco2ts(o) (&rawgco2ts(o)->tsv)

#define	rawgco2u(o) check_exp((o)->gch.tt == LUA_TUSERDATA, &((o)->u))

#define	gco2u(o) (&rawgco2u(o)->uv)

#define	gco2lcl(o) check_exp((o)->gch.tt == LUA_TLCL, &((o)->cl.l))

#define	gco2ccl(o) check_exp((o)->gch.tt == LUA_TCCL, &((o)->cl.c))

#define	gco2cl(o) check_exp(novariant((o)->gch.tt) == LUA_TFUNCTION, &((o)->cl))

#define	gco2t(o) check_exp((o)->gch.tt == LUA_TTABLE, &((o)->h))

#define	gco2p(o) check_exp((o)->gch.tt == LUA_TPROTO, &((o)->p))

#define	gco2uv(o) check_exp((o)->gch.tt == LUA_TUPVAL, &((o)->uv))

#define	gco2th(o) check_exp((o)->gch.tt == LUA_TTHREAD, &((o)->th))

#define	obj2gco(v) (cast(GCObject *, (v)))

#define	gettotalbytes(g) ((g)->totalbytes + (g)->GCdebt)

Typedefs
typedef struct stringtable	stringtable

typedef struct CallInfo	CallInfo

typedef struct global_State	global_State

Functions
LUAI_FUNC void	luaE_setdebt (global_State *g, l_mem debt)

LUAI_FUNC void	luaE_freethread (lua_State L, lua_State L1)

LUAI_FUNC CallInfo *	luaE_extendCI (lua_State *L)

LUAI_FUNC void	luaE_freeCI (lua_State *L)

Macro Definition Documentation

◆ BASIC_STACK_SIZE

#define BASIC_STACK_SIZE (2*LUA_MINSTACK)

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

◆ CIST_HOOKED

#define CIST_HOOKED (1<<1) /* call is running a debug hook */

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

Referenced by funcnamefromcode(), funcnamefromcode(), lua_yieldk(), lua_yieldk(), luaD_hook(), luaD_hook(), and luaD_poscall().

◆ CIST_HOOKYIELD

#define CIST_HOOKYIELD (1<<7) /* last hook called yielded */

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

Referenced by luaG_traceexec(), luaG_traceexec(), and traceexec().

◆ CIST_LUA

#define CIST_LUA (1<<0) /* call is running a Lua function */

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

Referenced by luaD_precall().

◆ CIST_REENTRY

#define CIST_REENTRY

Value:

(1<<2) /* call is running on same invocation of

luaV_execute of previous call */

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

Referenced by luaV_execute().

◆ CIST_STAT

#define CIST_STAT (1<<5) /* call has an error status (pcall) */

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

Referenced by finishCcall(), and recover().

◆ CIST_TAIL

#define CIST_TAIL (1<<6) /* call was tail called */

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

Referenced by auxgetinfo(), auxgetinfo(), auxgetinfo(), callhook(), callhook(), getfuncname(), getfuncname(), luaD_hookcall(), luaD_pretailcall(), and luaV_execute().

◆ CIST_YIELDED

#define CIST_YIELDED (1<<3) /* call reentered after suspension */

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

Referenced by finishCcall(), lua_getctx(), and resume().

◆ CIST_YPCALL

#define CIST_YPCALL (1<<4) /* call is a yieldable protected call */

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

Referenced by findpcall(), findpcall(), findpcall(), finishCcall(), finishCcall(), finishCcall(), lua_pcallk(), lua_pcallk(), and luaD_poscall().

◆ EXTRA_STACK

#define EXTRA_STACK 5

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

◆ G

#define G ( L ) (L->l_G)

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

◆ gch

#define gch ( o ) (&(o)->gch)

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

Referenced by freeobj(), internshrstr(), luaC_barrier_(), luaC_barrierback_(), luaC_checkfinalizer(), luaC_newobj(), luaF_close(), luaS_resize(), markbeingfnz(), propagatemark(), reallymarkobject(), separatetobefnz(), sweeplist(), and udata2finalize().

◆ gco2ccl

#define gco2ccl ( o ) check_exp((o)->gch.tt == LUA_TCCL, &((o)->cl.c))

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

Referenced by freeobj(), freeobj(), freeobj(), getgclist(), luaF_newCclosure(), luaF_newCclosure(), propagatemark(), propagatemark(), propagatemark(), reallymarkobject(), and reallymarkobject().

◆ gco2cl

#define gco2cl ( o ) check_exp(novariant((o)->gch.tt) == LUA_TFUNCTION, &((o)->cl))

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

206#define gco2ccl(o) check_exp((o)->gch.tt == LUA_TCCL, &((o)->cl.c))

207#define gco2cl(o) \

◆ gco2lcl

#define gco2lcl ( o ) check_exp((o)->gch.tt == LUA_TLCL, &((o)->cl.l))

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

Referenced by freeobj(), freeobj(), freeobj(), getgclist(), luaF_newLclosure(), luaF_newLclosure(), propagatemark(), propagatemark(), propagatemark(), reallymarkobject(), and reallymarkobject().

◆ gco2p

#define gco2p ( o ) check_exp((o)->gch.tt == LUA_TPROTO, &((o)->p))

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

◆ gco2t

#define gco2t ( o ) check_exp((o)->gch.tt == LUA_TTABLE, &((o)->h))

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

Referenced by clearbykeys(), clearbyvalues(), clearkeys(), clearkeys(), clearvalues(), clearvalues(), convergeephemerons(), convergeephemerons(), convergeephemerons(), freeobj(), freeobj(), freeobj(), getgclist(), luaC_barrierback_(), luaH_new(), propagatemark(), propagatemark(), propagatemark(), reallymarkobject(), and reallymarkobject().

◆ gco2th

#define gco2th ( o ) check_exp((o)->gch.tt == LUA_TTHREAD, &((o)->th))

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

◆ gco2ts

#define gco2ts ( o ) (&rawgco2ts(o)->tsv)

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

◆ gco2u

#define gco2u ( o ) (&rawgco2u(o)->uv)

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

◆ gco2uv

#define gco2uv ( o ) check_exp((o)->gch.tt == LUA_TUPVAL, &((o)->uv))

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

◆ gettotalbytes

#define gettotalbytes ( g ) ((g)->totalbytes + (g)->GCdebt)

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

Referenced by atomic2gen(), close_state(), close_state(), close_state(), fullinc(), generationalcollection(), genstep(), lua_gc(), lua_gc(), luaC_changemode(), luaC_fullgc(), luaE_setdebt(), setminordebt(), setpause(), setpause(), setpause(), singlestep(), singlestep(), and stepgenfull().

◆ isLua

#define isLua ( ci ) ((ci)->callstatus & CIST_LUA)

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

◆ KGC_EMERGENCY

#define KGC_EMERGENCY 1 /* gc was forced by an allocation failure */

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

Referenced by checkSizes(), checkSizes(), luaC_fullgc(), singlestep(), sweepthread(), and traversethread().

◆ KGC_GEN

#define KGC_GEN 2 /* generational collection */

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

Referenced by atomic2gen(), lua_gc(), lua_gc(), luaC_barrierback_(), luaC_changemode(), luaC_changemode(), luaC_fullgc(), and stepgenfull().

◆ KGC_NORMAL

#define KGC_NORMAL 0

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

Referenced by lua_gc(), lua_newstate(), luaC_changemode(), luaC_freeallobjects(), and luaC_fullgc().

◆ obj2gco

#define obj2gco ( v ) (cast(GCObject *, (v)))

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

◆ rawgco2ts

#define rawgco2ts ( o ) check_exp(novariant((o)->gch.tt) == LUA_TSTRING, &((o)->ts))

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

199/* macros to convert a GCObject into a specific value */

200#define rawgco2ts(o) \

◆ rawgco2u

#define rawgco2u ( o ) check_exp((o)->gch.tt == LUA_TUSERDATA, &((o)->u))

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

Typedef Documentation

◆ CallInfo

typedef struct CallInfo CallInfo

◆ global_State

typedef struct global_State global_State

◆ stringtable

typedef struct stringtable stringtable

Function Documentation

◆ luaE_extendCI()

LUAI_FUNC CallInfo * luaE_extendCI ( lua_State * L )

Definition at line 112 of file lua-5.2.4/src/lstate.c.

                                       {
  CallInfo *ci = luaM_new(L, CallInfo);
  lua_assert(L->ci->next == NULL);
  L->ci->next = ci;
  ci->previous = L->ci;
  ci->next = NULL;
  return ci;
}

◆ luaE_freeCI()

LUAI_FUNC void luaE_freeCI ( lua_State * L )

Definition at line 122 of file lua-5.2.4/src/lstate.c.

                                {
  CallInfo *ci = L->ci;
  CallInfo *next = ci->next;
  ci->next = NULL;
  while ((ci = next) != NULL) {
    next = ci->next;
    luaM_free(L, ci);
  }
}

◆ luaE_freethread()

LUAI_FUNC void luaE_freethread	(	lua_State *	L,
		lua_State *	L1 )

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

                                                   {
  luaF_close(L1, L1->stack);  /* close all upvalues for this thread */
  lua_assert(L1->openupval == NULL);
  luai_userstatefree(L1);
  freestack(L, L1);
  luaM_freemem(L, fromstate(L1), state_size(lua_State));
}

◆ luaE_setdebt()

LUAI_FUNC void luaE_setdebt	(	global_State *	g,
		l_mem	debt )

Definition at line 106 of file lua-5.2.4/src/lstate.c.

                                                {
  g->totalbytes -= (debt - g->GCdebt);
  g->GCdebt = debt;
}

Data Structures

Macros

Typedefs

Functions