| 243 | |
| 244 | |
| 245 | Proto *luaF_newproto (lua_State *L) { |
| 246 | GCObject *o = luaC_newobj(L, LUA_VPROTO, sizeof(Proto)); |
| 247 | Proto *f = gco2p(o); |
| 248 | f->k = NULL; |
| 249 | f->sizek = 0; |
| 250 | f->p = NULL; |
| 251 | f->sizep = 0; |
| 252 | f->code = NULL; |
| 253 | f->sizecode = 0; |
| 254 | f->lineinfo = NULL; |
| 255 | f->sizelineinfo = 0; |
| 256 | f->abslineinfo = NULL; |
| 257 | f->sizeabslineinfo = 0; |
| 258 | f->upvalues = NULL; |
| 259 | f->sizeupvalues = 0; |
| 260 | f->numparams = 0; |
| 261 | f->is_vararg = 0; |
| 262 | f->maxstacksize = 0; |
| 263 | f->locvars = NULL; |
| 264 | f->sizelocvars = 0; |
| 265 | f->linedefined = 0; |
| 266 | f->lastlinedefined = 0; |
| 267 | f->source = NULL; |
| 268 | return f; |
| 269 | } |
| 270 | |
| 271 | |
| 272 | void luaF_freeproto (lua_State *L, Proto *f) { |
no test coverage detected