From eb617df2d87f8476e722ade7319998d7912a6edf Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Fri, 26 Sep 1997 13:46:20 -0300
Subject: better way to traverse GCnode lists.

---
 lobject.c | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

(limited to 'lobject.c')

diff --git a/lobject.c b/lobject.c
index b9cabb0b..e06e89e5 100644
--- a/lobject.c
+++ b/lobject.c
@@ -1,5 +1,5 @@
 /*
-** $Id: $
+** $Id: lobject.c,v 1.1 1997/09/16 19:25:59 roberto Exp roberto $
 ** Some generic functions over Lua objects
 ** See Copyright Notice in lua.h
 */
@@ -66,3 +66,12 @@ int luaO_findstring (char *name, char *list[])
   return -1;  /* name not found */
 }
 
+
+void luaO_insertlist (GCnode *root, GCnode *node)
+{
+  ++luaO_nentities;
+  node->next = root->next;
+  root->next = node;
+  node->marked = 0;
+}
+
-- 
cgit v1.2.3-55-g6feb