diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-09-26 13:46:20 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-09-26 13:46:20 -0300 |
commit | eb617df2d87f8476e722ade7319998d7912a6edf (patch) | |
tree | 25d2635a076263518cdbb7da1693b674e0a4541e /lobject.c | |
parent | a580480b07cdf7201306b246deeb2fe84f2c25a9 (diff) | |
download | lua-eb617df2d87f8476e722ade7319998d7912a6edf.tar.gz lua-eb617df2d87f8476e722ade7319998d7912a6edf.tar.bz2 lua-eb617df2d87f8476e722ade7319998d7912a6edf.zip |
better way to traverse GCnode lists.
Diffstat (limited to 'lobject.c')
-rw-r--r-- | lobject.c | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: $ | 2 | ** $Id: lobject.c,v 1.1 1997/09/16 19:25:59 roberto Exp roberto $ |
3 | ** Some generic functions over Lua objects | 3 | ** Some generic functions over Lua objects |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -66,3 +66,12 @@ int luaO_findstring (char *name, char *list[]) | |||
66 | return -1; /* name not found */ | 66 | return -1; /* name not found */ |
67 | } | 67 | } |
68 | 68 | ||
69 | |||
70 | void luaO_insertlist (GCnode *root, GCnode *node) | ||
71 | { | ||
72 | ++luaO_nentities; | ||
73 | node->next = root->next; | ||
74 | root->next = node; | ||
75 | node->marked = 0; | ||
76 | } | ||
77 | |||