| 78 | static void DumpFunction(const Proto* f, DumpState* D); |
| 79 | |
| 80 | static void DumpConstants(const Proto* f, DumpState* D) |
| 81 | { |
| 82 | int i,n=f->sizek; |
| 83 | DumpInt(n,D); |
| 84 | for (i=0; i<n; i++) |
| 85 | { |
| 86 | const TValue* o=&f->k[i]; |
| 87 | DumpChar(ttypenv(o),D); |
| 88 | switch (ttypenv(o)) |
| 89 | { |
| 90 | case LUA_TNIL: |
| 91 | break; |
| 92 | case LUA_TBOOLEAN: |
| 93 | DumpChar(bvalue(o),D); |
| 94 | break; |
| 95 | case LUA_TNUMBER: |
| 96 | DumpNumber(nvalue(o),D); |
| 97 | break; |
| 98 | case LUA_TSTRING: |
| 99 | DumpString(rawtsvalue(o),D); |
| 100 | break; |
| 101 | default: lua_assert(0); |
| 102 | } |
| 103 | } |
| 104 | n=f->sizep; |
| 105 | DumpInt(n,D); |
| 106 | for (i=0; i<n; i++) DumpFunction(f->p[i],D); |
| 107 | } |
| 108 | |
| 109 | static void DumpUpvalues(const Proto* f, DumpState* D) |
| 110 | { |
no test coverage detected