#include <string.h>
#include "lua.h"
#include "ldebug.h"
#include "ldo.h"
#include "lfunc.h"
#include "lgc.h"
#include "lmem.h"
#include "lobject.h"
#include "lstate.h"
#include "lstring.h"
#include "ltable.h"
#include "ltm.h"

Include dependency graph for lgc.cpp:

Macros
#define	lgc_c

#define	LUA_CORE

#define	GCSWEEPCOST ((sizeof(TString) + 4) / 4)

#define	GCSWEEPMAX (cast_int((GCSTEPSIZE / GCSWEEPCOST) / 4))

#define	GCFINALIZENUM 4

#define	STEPMULADJ 200

#define	PAUSEADJ 100

#define	maskcolors (~(bit2mask(BLACKBIT, OLDBIT) \| WHITEBITS))

#define	makewhite(g, x) (gch(x)->marked = cast_byte((gch(x)->marked & maskcolors) \| luaC_white(g)))

#define	white2gray(x) resetbits(gch(x)->marked, WHITEBITS)

#define	black2gray(x) resetbit(gch(x)->marked, BLACKBIT)

#define	isfinalized(x) testbit(gch(x)->marked, FINALIZEDBIT)

#define	checkdeadkey(n) lua_assert(!ttisdeadkey(gkey(n)) \|\| ttisnil(gval(n)))

#define	checkconsistency(obj) lua_longassert(!iscollectable(obj) \|\| righttt(obj))

#define	markvalue(g, o)

#define	markobject(g, t)

#define	gnodelast(h) gnode(h, cast(size_t, sizenode(h)))

#define	linktable(h, p) ((h)->gclist = (p), (p) = obj2gco(h))

#define	sweepwholelist(L, p) sweeplist(L,p,MAX_LUMEM)

#define	sweepphases (bitmask(GCSsweepstring) \| bitmask(GCSsweepudata) \| bitmask(GCSsweep))

Functions
static void	reallymarkobject (global_State g, GCObject o)

static void	removeentry (Node *n)

static int	iscleared (global_State g, const TValue o)

void	luaC_barrier_ (lua_State L, GCObject o, GCObject *v)

void	luaC_barrierback_ (lua_State L, GCObject o)

LUAI_FUNC void	luaC_barrierproto_ (lua_State L, Proto p, Closure *c)

void	luaC_checkupvalcolor (global_State g, UpVal uv)

GCObject *	luaC_newobj (lua_State L, int tt, size_t sz, GCObject *list, int offset)

static void	markmt (global_State *g)

static void	markbeingfnz (global_State *g)

static void	remarkupvals (global_State *g)

static void	restartcollection (global_State *g)

static void	traverseweakvalue (global_State g, Table h)

static int	traverseephemeron (global_State g, Table h)

static void	traversestrongtable (global_State g, Table h)

static lu_mem	traversetable (global_State g, Table h)

static int	traverseproto (global_State g, Proto f)

static lu_mem	traverseCclosure (global_State g, CClosure cl)

static lu_mem	traverseLclosure (global_State g, LClosure cl)

static lu_mem	traversestack (global_State g, lua_State th)

static void	propagatemark (global_State *g)

static void	propagateall (global_State *g)

static void	propagatelist (global_State g, GCObject l)

static void	retraversegrays (global_State *g)

static void	convergeephemerons (global_State *g)

static void	clearkeys (global_State g, GCObject l, GCObject *f)

static void	clearvalues (global_State g, GCObject l, GCObject *f)

static void	freeobj (lua_State L, GCObject o)

static GCObject **	sweeplist (lua_State L, GCObject *p, lu_mem count)

static void	sweepthread (lua_State L, lua_State L1)

static GCObject **	sweeptolive (lua_State L, GCObject p, int n)

static void	checkSizes (lua_State *L)

static GCObject *	udata2finalize (global_State *g)

static void	dothecall (lua_State L, void ud)

static void	GCTM (lua_State *L, int propagateerrors)

static void	separatetobefnz (lua_State *L, int all)

void	luaC_checkfinalizer (lua_State L, GCObject o, Table *mt)

static void	setpause (global_State *g, l_mem estimate)

static int	entersweep (lua_State *L)

void	luaC_changemode (lua_State *L, int mode)

static void	callallpendingfinalizers (lua_State *L, int propagateerrors)

void	luaC_freeallobjects (lua_State *L)

static l_mem	atomic (lua_State *L)

static lu_mem	singlestep (lua_State *L)

void	luaC_runtilstate (lua_State *L, int statesmask)

static void	generationalcollection (lua_State *L)

static void	incstep (lua_State *L)

void	luaC_forcestep (lua_State *L)

void	luaC_step (lua_State *L)

void	luaC_fullgc (lua_State *L, int isemergency)