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

simplified version of `gc' tag method (only for userdata now).

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1999-10-04 15:51:04 -02:00
parent 1f7103e05d
commit 4343420d4d
20 changed files with 384 additions and 443 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
lobject.h
View File

@@ -1,5 +1,5 @@
/*
** $Id: lobject.h,v 1.29 1999/08/16 20:52:00 roberto Exp roberto $
** $Id: lobject.h,v 1.30 1999/09/06 20:34:18 roberto Exp roberto $
** Type definitions for Lua objects
** See Copyright Notice in lua.h
*/
@@ -85,21 +85,13 @@ typedef struct TObject {
/*
** generic header for garbage collector lists
*/
typedef struct GCnode {
struct GCnode *next;
int marked;
} GCnode;
/*
** String headers for string table
*/
typedef struct TaggedString {
GCnode head;
struct TaggedString *next;
int marked;
unsigned long hash;
int constindex; /* hint to reuse constants (= -1 if this is a userdata) */
union {
@@ -122,7 +114,8 @@ typedef struct TaggedString {
** Function Prototypes
*/
typedef struct TProtoFunc {
GCnode head;
struct TProtoFunc *next;
int marked;
struct TObject *consts;
int nconsts;
Byte *code; /* ends with opcode ENDCODE */
@@ -157,7 +150,8 @@ typedef struct LocVar {
** Closures
*/
typedef struct Closure {
GCnode head;
struct Closure *next;
int marked;
int nelems; /* not included the first one (always the prototype) */
TObject consts[1]; /* at least one for prototype */
} Closure;
@@ -170,7 +164,8 @@ typedef struct node {
} Node;
typedef struct Hash {
GCnode head;
struct Hash *next;
int marked;
Node *node;
int nhash;
int nuse;
@@ -189,7 +184,6 @@ extern const TObject luaO_nilobject;
: luaO_equalval(t1,t2))
int luaO_equalval (const TObject *t1, const TObject *t2);
int luaO_redimension (int oldsize);
void luaO_insertlist (GCnode *root, GCnode *node);
int luaO_str2d (const char *s, real *result);
#ifdef OLD_ANSI