| 3314 | } |
| 3315 | |
| 3316 | void |
| 3317 | dumpitem(item_p item, char *file, int line) |
| 3318 | { |
| 3319 | printf(" ACTIVE item, last used at %s, line %d", |
| 3320 | item->lastfile, item->lastline); |
| 3321 | switch(item->el_flags & NGQF_TYPE) { |
| 3322 | case NGQF_DATA: |
| 3323 | printf(" - [data]\n"); |
| 3324 | break; |
| 3325 | case NGQF_MESG: |
| 3326 | printf(" - retaddr[%d]:\n", _NGI_RETADDR(item)); |
| 3327 | break; |
| 3328 | case NGQF_FN: |
| 3329 | printf(" - fn@%p (%p, %p, %p, %d (%x))\n", |
| 3330 | _NGI_FN(item), |
| 3331 | _NGI_NODE(item), |
| 3332 | _NGI_HOOK(item), |
| 3333 | item->body.fn.fn_arg1, |
| 3334 | item->body.fn.fn_arg2, |
| 3335 | item->body.fn.fn_arg2); |
| 3336 | break; |
| 3337 | case NGQF_FN2: |
| 3338 | printf(" - fn2@%p (%p, %p, %p, %d (%x))\n", |
| 3339 | _NGI_FN2(item), |
| 3340 | _NGI_NODE(item), |
| 3341 | _NGI_HOOK(item), |
| 3342 | item->body.fn.fn_arg1, |
| 3343 | item->body.fn.fn_arg2, |
| 3344 | item->body.fn.fn_arg2); |
| 3345 | break; |
| 3346 | } |
| 3347 | if (line) { |
| 3348 | printf(" problem discovered at file %s, line %d\n", file, line); |
| 3349 | if (_NGI_NODE(item)) { |
| 3350 | printf("node %p ([%x])\n", |
| 3351 | _NGI_NODE(item), ng_node2ID(_NGI_NODE(item))); |
| 3352 | } |
| 3353 | } |
| 3354 | } |
| 3355 | |
| 3356 | static void |
| 3357 | ng_dumpitems(void) |
no test coverage detected