| 513 | */ |
| 514 | |
| 515 | void out_body (outf, root,s_calls,s_time) |
| 516 | FILE *outf; |
| 517 | register unsigned int root; |
| 518 | register unsigned long int *s_calls, *s_time; |
| 519 | { |
| 520 | unsigned long int calls, local_time; |
| 521 | |
| 522 | DBUG_ENTER ("out_body"); |
| 523 | DBUG_PRINT ("out_body", ("%lu,%lu",*s_calls,*s_time)); |
| 524 | if (root == MAXPROCS) { |
| 525 | DBUG_PRINT ("out_body", ("%lu,%lu",*s_calls,*s_time)); |
| 526 | } else { |
| 527 | while (root != MAXPROCS) { |
| 528 | out_body (outf, s_table[root].lchild,s_calls,s_time); |
| 529 | out_item (outf, &modules[s_table[root].pos],&calls,&local_time); |
| 530 | DBUG_PRINT ("out_body", ("-- %lu -- %lu --", calls, local_time)); |
| 531 | *s_calls += calls; |
| 532 | *s_time += local_time; |
| 533 | root = s_table[root].rchild; |
| 534 | } |
| 535 | DBUG_PRINT ("out_body", ("%lu,%lu", *s_calls, *s_time)); |
| 536 | } |
| 537 | DBUG_VOID_RETURN; |
| 538 | } |
| 539 | |
| 540 | /* |
| 541 | * output () - print out a nice sorted output report on outf. |