| 1 | %{ |
1 | %{ |
| 2 | /* |
2 | /* |
| 3 | * static char *rcsid_object_c = |
3 | * static char *rcsid_object_c = |
| 4 | * "$Id: loader.l,v 1.3 2006/05/11 19:07:40 root Exp $"; |
4 | * "$Id: loader.l,v 1.4 2006/05/11 20:15:30 root Exp $"; |
| 5 | */ |
5 | */ |
| 6 | |
6 | |
| 7 | /* |
7 | /* |
| 8 | CrossFire, A Multiplayer game for X-windows |
8 | CrossFire, A Multiplayer game for X-windows |
| 9 | |
9 | |
| … | |
… | |
| 333 | static char *op_debug_info_ (object *op, char *info) |
333 | static char *op_debug_info_ (object *op, char *info) |
| 334 | { |
334 | { |
| 335 | char info2[256 * 3]; |
335 | char info2[256 * 3]; |
| 336 | char *p = info; |
336 | char *p = info; |
| 337 | |
337 | |
| 338 | p += snprintf (p, 256, "%s%s%s=%d", |
338 | p += snprintf (p, 256, "%d=\"%s%s%s\"", |
|
|
339 | op->count, |
| 339 | op->name ? op->name : "(anon)", |
340 | op->name ? op->name : "(anon)", |
| 340 | op->title ? " " : "", |
341 | op->title ? " " : "", |
| 341 | op->title ? op->title : "", |
342 | op->title ? op->title : ""); |
| 342 | op->count); |
|
|
| 343 | |
343 | |
| 344 | if (op->env) |
344 | if (op->env) |
| 345 | p += snprintf (p, 256, "(in %s)", op_debug_info_ (op->env, info2)); |
345 | p += snprintf (p, 256, "(in %s)", op_debug_info_ (op->env, info2)); |
| 346 | |
346 | |
| 347 | if (op->map) |
347 | if (op->map) |
| 348 | p += snprintf (p, 256, "(%d+%d@%s)", op->x, op->y, op->map->path); |
348 | p += snprintf (p, 256, "(on %s@%d+%d)", op->map->path, op->x, op->y); |
| 349 | |
349 | |
| 350 | return info; |
350 | return info; |
| 351 | } |
351 | } |
| 352 | |
352 | |
| 353 | static char *op_debug_info (object *op) |
353 | static char *op_debug_info (object *op) |
