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