| 97 | |
| 98 | |
| 99 | Proto *luaF_newproto (lua_State *L) { |
| 100 | GCObject *o = luaC_newobj(L, LUA_TPROTO, sizeof(Proto)); |
| 101 | Proto *f = gco2p(o); |
| 102 | f->k = NULL; |
| 103 | f->sizek = 0; |
| 104 | f->p = NULL; |
| 105 | f->sizep = 0; |
| 106 | f->code = NULL; |
| 107 | f->cache = NULL; |
| 108 | f->sizecode = 0; |
| 109 | f->lineinfo = NULL; |
| 110 | f->sizelineinfo = 0; |
| 111 | f->upvalues = NULL; |
| 112 | f->sizeupvalues = 0; |
| 113 | f->numparams = 0; |
| 114 | f->is_vararg = 0; |
| 115 | f->maxstacksize = 0; |
| 116 | f->locvars = NULL; |
| 117 | f->sizelocvars = 0; |
| 118 | f->linedefined = 0; |
| 119 | f->lastlinedefined = 0; |
| 120 | f->source = NULL; |
| 121 | return f; |
| 122 | } |
| 123 | |
| 124 | |
| 125 | void luaF_freeproto (lua_State *L, Proto *f) { |
no test coverage detected