aboutsummaryrefslogtreecommitdiff
path: root/lgc.c
diff options
context:
space:
mode:
Diffstat (limited to 'lgc.c')
-rw-r--r--lgc.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/lgc.c b/lgc.c
index c5a99e62..38cc50d3 100644
--- a/lgc.c
+++ b/lgc.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lgc.c,v 1.13 1997/12/15 16:17:20 roberto Exp roberto $ 2** $Id: lgc.c,v 1.14 1997/12/17 20:48:58 roberto Exp roberto $
3** Garbage Collector 3** Garbage Collector
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -87,12 +87,12 @@ static int ismarked (TObject *o)
87 switch (o->ttype) { 87 switch (o->ttype) {
88 case LUA_T_STRING: case LUA_T_USERDATA: 88 case LUA_T_STRING: case LUA_T_USERDATA:
89 return o->value.ts->head.marked; 89 return o->value.ts->head.marked;
90 case LUA_T_ARRAY:
91 return o->value.a->head.marked;
90 case LUA_T_CLOSURE: 92 case LUA_T_CLOSURE:
91 return o->value.cl->head.marked; 93 return o->value.cl->head.marked;
92 case LUA_T_PROTO: 94 case LUA_T_PROTO:
93 return o->value.tf->head.marked; 95 return o->value.tf->head.marked;
94 case LUA_T_ARRAY:
95 return o->value.a->head.marked;
96#ifdef DEBUG 96#ifdef DEBUG
97 case LUA_T_LINE: case LUA_T_CLMARK: 97 case LUA_T_LINE: case LUA_T_CLMARK:
98 case LUA_T_CMARK: case LUA_T_PMARK: 98 case LUA_T_CMARK: case LUA_T_PMARK: