** Traverse a prototype. (While a prototype is being build, its ** arrays can be larger than needed; the extra slots are filled with ** NULL, so the use of 'markobjectN') */
| 521 | ** NULL, so the use of 'markobjectN') |
| 522 | */ |
| 523 | static int traverseproto (global_State *g, Proto *f) { |
| 524 | int i; |
| 525 | markobjectN(g, f->source); |
| 526 | for (i = 0; i < f->sizek; i++) /* mark literals */ |
| 527 | markvalue(g, &f->k[i]); |
| 528 | for (i = 0; i < f->sizeupvalues; i++) /* mark upvalue names */ |
| 529 | markobjectN(g, f->upvalues[i].name); |
| 530 | for (i = 0; i < f->sizep; i++) /* mark nested protos */ |
| 531 | markobjectN(g, f->p[i]); |
| 532 | for (i = 0; i < f->sizelocvars; i++) /* mark local-variable names */ |
| 533 | markobjectN(g, f->locvars[i].varname); |
| 534 | return 1 + f->sizek + f->sizeupvalues + f->sizep + f->sizelocvars; |
| 535 | } |
| 536 | |
| 537 | |
| 538 | static int traverseCclosure (global_State *g, CClosure *cl) { |