| 161 | |
| 162 | |
| 163 | static GCObject **getgclist (GCObject *o) { |
| 164 | switch (o->tt) { |
| 165 | case LUA_VTABLE: return &gco2t(o)->gclist; |
| 166 | case LUA_VLCL: return &gco2lcl(o)->gclist; |
| 167 | case LUA_VCCL: return &gco2ccl(o)->gclist; |
| 168 | case LUA_VTHREAD: return &gco2th(o)->gclist; |
| 169 | case LUA_VPROTO: return &gco2p(o)->gclist; |
| 170 | case LUA_VUSERDATA: { |
| 171 | Udata *u = gco2u(o); |
| 172 | lua_assert(u->nuvalue > 0); |
| 173 | return &u->gclist; |
| 174 | } |
| 175 | default: lua_assert(0); return 0; |
| 176 | } |
| 177 | } |
| 178 | |
| 179 | |
| 180 | /* |
no outgoing calls
no test coverage detected