| 5742 | static void DumpFunction(const Proto* f, const TString* p, DumpState* D); |
| 5743 | |
| 5744 | static void DumpConstants(const Proto* f, DumpState* D) |
| 5745 | { |
| 5746 | int i,n=f->sizek; |
| 5747 | DumpInt(n,D); |
| 5748 | for (i=0; i<n; i++) |
| 5749 | { |
| 5750 | const TValue* o=&f->k[i]; |
| 5751 | DumpChar(ttype(o),D); |
| 5752 | switch (ttype(o)) |
| 5753 | { |
| 5754 | case LUA_TNIL: |
| 5755 | break; |
| 5756 | case LUA_TBOOLEAN: |
| 5757 | DumpChar(bvalue(o),D); |
| 5758 | break; |
| 5759 | case LUA_TNUMBER: |
| 5760 | DumpNumber(nvalue(o),D); |
| 5761 | break; |
| 5762 | case LUA_TSTRING: |
| 5763 | DumpString(rawtsvalue(o),D); |
| 5764 | break; |
| 5765 | default: |
| 5766 | lua_assert(0); /* cannot happen */ |
| 5767 | break; |
| 5768 | } |
| 5769 | } |
| 5770 | n=f->sizep; |
| 5771 | DumpInt(n,D); |
| 5772 | for (i=0; i<n; i++) DumpFunction(f->p[i],f->source,D); |
| 5773 | } |
| 5774 | |
| 5775 | static void DumpDebug(const Proto* f, DumpState* D) |
| 5776 | { |
no test coverage detected