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