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