| 123 | |
| 124 | |
| 125 | static GCObject **getgclist (GCObject *o) { |
| 126 | switch (o->tt) { |
| 127 | case LUA_VTABLE: return &gco2t(o)->gclist; |
| 128 | case LUA_VLCL: return &gco2lcl(o)->gclist; |
| 129 | case LUA_VCCL: return &gco2ccl(o)->gclist; |
| 130 | case LUA_VTHREAD: return &gco2th(o)->gclist; |
| 131 | case LUA_VPROTO: return &gco2p(o)->gclist; |
| 132 | case LUA_VUSERDATA: { |
| 133 | Udata *u = gco2u(o); |
| 134 | lua_assert(u->nuvalue > 0); |
| 135 | return &u->gclist; |
| 136 | } |
| 137 | default: lua_assert(0); return 0; |
| 138 | } |
| 139 | } |
| 140 | |
| 141 | |
| 142 | /* |
no outgoing calls
no test coverage detected