diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-09-25 11:52:10 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-09-25 11:52:10 -0300 |
| commit | c9c6f9747c0bfc77a72214e4e95e26a95ab66bbd (patch) | |
| tree | d952d5f71b42a05860331da80129f5c23da07fe1 /lgc.c | |
| parent | c2aa7bd72d620731b5a54b532523dbd9f8e1bfc3 (diff) | |
| download | lua-c9c6f9747c0bfc77a72214e4e95e26a95ab66bbd.tar.gz lua-c9c6f9747c0bfc77a72214e4e95e26a95ab66bbd.tar.bz2 lua-c9c6f9747c0bfc77a72214e4e95e26a95ab66bbd.zip | |
GC may crash when checking C closures
Diffstat (limited to 'lgc.c')
| -rw-r--r-- | lgc.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lgc.c,v 1.65 2000/09/11 17:38:42 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 1.66 2000/09/19 08:42:35 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 | */ |
| @@ -152,7 +152,7 @@ static int hasmark (const TObject *o) { | |||
| 152 | case TAG_TABLE: | 152 | case TAG_TABLE: |
| 153 | return ismarked(hvalue(o)); | 153 | return ismarked(hvalue(o)); |
| 154 | case TAG_LCLOSURE: case TAG_CCLOSURE: | 154 | case TAG_LCLOSURE: case TAG_CCLOSURE: |
| 155 | return ismarked(clvalue(o)->mark); | 155 | return ismarked(clvalue(o)); |
| 156 | default: /* number */ | 156 | default: /* number */ |
| 157 | return 1; | 157 | return 1; |
| 158 | } | 158 | } |