Author: gisle.aas
Date: Sat Oct 25 08:05:11 2008
New Revision: 549
Modified:
trunk/bin/nytprofhtml
Log:
Sort the call locations by the time spent in the funtion as well as call
count
When I have a function that is called once from many different locations
and I do
want the most expensive call to be at the top of the list.
Modified: trunk/bin/nytprofhtml
==============================================================================
--- trunk/bin/nytprofhtml (original)
+++ trunk/bin/nytprofhtml Sat Oct 25 08:05:11 2008
@@ -286,7 +286,7 @@
: " $total_calls times, avg ${avg_per_call}/call:";
# order by most frequent caller first
- @callers = sort { $b->[2] <=> $a->[2] } @callers;
+ @callers = sort { $b->[2] <=> $a->[2] || $b->[3] <=>
$a->[3] } @callers;
for my $caller (@callers) {
my ($fid, $line, $count, $incl_time, $excl_time) =
@$caller;
--~--~---------~--~----~------------~-------~--~----~
You've received this message because you are subscribed to
the Devel::NYTProf Development User group.
Group hosted at: http://groups.google.com/group/develnytprof-dev
Project hosted at: http://perl-devel-nytprof.googlecode.com
CPAN distribution: http://search.cpan.org/dist/Devel-NYTProf
To post, email: [email protected]
To unsubscribe, email: [EMAIL PROTECTED]
-~----------~----~----~----~------~----~------~--~---
