mirror of
https://github.com/Stichting-MINIX-Research-Foundation/netbsd.git
synced 2025-09-10 07:39:25 -04:00
62 lines
3.4 KiB
Plaintext
62 lines
3.4 KiB
Plaintext
The following are examples of tcl_calltime.d.
|
|
|
|
This script traces the total elapsed time of different Tcl commands and
|
|
procedures and prints a report. Here it traces the example program,
|
|
Code/Tcl/func_abc.tcl
|
|
|
|
# tcl_calltime.d
|
|
Tracing... Hit Ctrl-C to end.
|
|
^C
|
|
|
|
Top 10 counts,
|
|
PID TYPE NAME COUNT
|
|
16028 cmd after 3
|
|
16028 cmd namespace 3
|
|
16028 cmd puts 3
|
|
16028 cmd lappend 4
|
|
16028 cmd lsearch 4
|
|
16028 cmd if 8
|
|
16028 cmd info 11
|
|
16028 cmd file 12
|
|
16028 cmd proc 12
|
|
0 total - 85
|
|
|
|
Top 10 exclusive elapsed times (us),
|
|
PID TYPE NAME TOTAL
|
|
16028 cmd tclInit 253
|
|
16028 cmd namespace 272
|
|
16028 proc func_c 330
|
|
16028 proc func_b 357
|
|
16028 proc func_a 363
|
|
16028 cmd file 416
|
|
16028 cmd if 852
|
|
16028 cmd source 929
|
|
16028 cmd after 3025152
|
|
0 total - 3030001
|
|
|
|
Top 10 inclusive elapsed times (us),
|
|
PID TYPE NAME TOTAL
|
|
16028 cmd uplevel 1849
|
|
16028 proc tclInit 2519
|
|
16028 cmd tclInit 2772
|
|
16028 proc func_c 1010031
|
|
16028 cmd func_c 1010088
|
|
16028 proc func_b 2020059
|
|
16028 cmd func_b 2020106
|
|
16028 cmd after 3025152
|
|
16028 proc func_a 3026545
|
|
16028 cmd func_a 3026572
|
|
|
|
The output is in three sections. The first shows the top ten most executed
|
|
commands while the script is tracing.
|
|
|
|
The second (Top 10 exclusive elapsed times) shows us the top ten slowest
|
|
commands or procedures, this number excludes any subroutines called during
|
|
command execution.
|
|
|
|
The third (Top 10 inclusive elapsed times) shows us the top ten slowest
|
|
commands or procedures including any time spent in subroutines. You can see
|
|
that func_a took the most amount of time all up. This makes sense if you
|
|
compare the code at Code/Tcl/func_abc.tcl with the results.
|
|
|