nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

small optimization

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2002-03-04 18:32:34 -03:00
parent 88c7b574cb
commit 1a3f175640
1 changed files with 9 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
lgc.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lgc.c,v 1.1 2001/11/29 22:14:34 rieru Exp rieru $ ** $Id: lgc.c,v 1.127 2002/01/30 17:26:44 roberto Exp roberto $
** Garbage Collector ** Garbage Collector
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -43,7 +43,12 @@ typedef struct GCState {
static void markobject (GCState *st, TObject *o); #define ismarkable(o) (!((1 << ttype(o)) & \
((1 << LUA_TNIL) | (1 << LUA_TNUMBER) | (1 << LUA_TBOOLEAN))))
static void reallymarkobject (GCState *st, TObject *o);
#define markobject(st,o) if (ismarkable(o)) reallymarkobject(st,o)
static void protomark (Proto *f) { static void protomark (Proto *f) {
@@ -96,7 +101,7 @@ static void marktable (GCState *st, Table *h) {
} }
static void markobject (GCState *st, TObject *o) { static void reallymarkobject (GCState *st, TObject *o) {
switch (ttype(o)) { switch (ttype(o)) {
case LUA_TSTRING: case LUA_TSTRING:
strmark(tsvalue(o)); strmark(tsvalue(o));
@@ -112,12 +117,7 @@ static void markobject (GCState *st, TObject *o) {
marktable(st, hvalue(o)); marktable(st, hvalue(o));
break; break;
} }
default: { default: lua_assert(0); /* should not be called with other types */
lua_assert(ttype(o) == LUA_TNIL ||
ttype(o) == LUA_TNUMBER ||
ttype(o) == LUA_TBOOLEAN);
break;
}
} }
} }