| 263 | } |
| 264 | |
| 265 | static void PrintType(const Proto* f, int i) |
| 266 | { |
| 267 | const TValue* o=&f->k[i]; |
| 268 | switch (ttypetag(o)) |
| 269 | { |
| 270 | case LUA_VNIL: |
| 271 | printf("N"); |
| 272 | break; |
| 273 | case LUA_VFALSE: |
| 274 | case LUA_VTRUE: |
| 275 | printf("B"); |
| 276 | break; |
| 277 | case LUA_VNUMFLT: |
| 278 | printf("F"); |
| 279 | break; |
| 280 | case LUA_VNUMINT: |
| 281 | printf("I"); |
| 282 | break; |
| 283 | case LUA_VSHRSTR: |
| 284 | case LUA_VLNGSTR: |
| 285 | printf("S"); |
| 286 | break; |
| 287 | default: /* cannot happen */ |
| 288 | printf("?%d",ttypetag(o)); |
| 289 | break; |
| 290 | } |
| 291 | printf("\t"); |
| 292 | } |
| 293 | |
| 294 | static void PrintConstant(const Proto* f, int i) |
| 295 | { |