diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-10-24 15:17:24 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-10-24 15:17:24 -0200 |
| commit | e78cf96c971234ea25e35a9672ef00ea389d843f (patch) | |
| tree | 57dc00fb747c26730acb13a087afb9bc7dcd3216 /lgc.c | |
| parent | 0cb38439560fc2b912d41d3116d2d74c030d13af (diff) | |
| download | lua-e78cf96c971234ea25e35a9672ef00ea389d843f.tar.gz lua-e78cf96c971234ea25e35a9672ef00ea389d843f.tar.bz2 lua-e78cf96c971234ea25e35a9672ef00ea389d843f.zip | |
first version of Cclosures.
Diffstat (limited to '')
| -rw-r--r-- | lgc.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lgc.c,v 1.4 1997/10/16 10:59:34 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 1.5 1997/10/23 16:26:37 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 | */ |
| @@ -97,7 +97,7 @@ static int ismarked (TObject *o) | |||
| 97 | return o->value.tf->head.marked; | 97 | return o->value.tf->head.marked; |
| 98 | case LUA_T_ARRAY: | 98 | case LUA_T_ARRAY: |
| 99 | return o->value.a->head.marked; | 99 | return o->value.a->head.marked; |
| 100 | default: /* nil, number or cfunction */ | 100 | default: /* nil, number or cproto */ |
| 101 | return 1; | 101 | return 1; |
| 102 | } | 102 | } |
| 103 | } | 103 | } |
| @@ -234,7 +234,7 @@ static int markobject (TObject *o) | |||
| 234 | case LUA_T_PROTO: | 234 | case LUA_T_PROTO: |
| 235 | protomark(o->value.tf); | 235 | protomark(o->value.tf); |
| 236 | break; | 236 | break; |
| 237 | default: break; /* numbers, cfunctions, etc */ | 237 | default: break; /* numbers, cprotos, etc */ |
| 238 | } | 238 | } |
| 239 | return 0; | 239 | return 0; |
| 240 | } | 240 | } |