diff options
author | Michael Meeks <michael.meeks@collabora.com> | 2019-04-17 22:14:16 +0100 |
---|---|---|
committer | Michael Meeks <michael.meeks@collabora.com> | 2019-04-19 23:51:26 +0100 |
commit | 4959b3b21cafd045892104476171646e3de952d3 (patch) | |
tree | 01860c73be810bf4a502f8341960ebe050453145 /scripts | |
parent | Update bundled headers with profiling enum (diff) | |
download | online-4959b3b21cafd045892104476171646e3de952d3.tar.gz online-4959b3b21cafd045892104476171646e3de952d3.zip |
perftrace: fix time parsing issue.
Change-Id: If0987454e3aa747aa476fa4e0ec8070a95e92867
Diffstat (limited to 'scripts')
-rwxr-xr-x | scripts/perftrace.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/perftrace.pl b/scripts/perftrace.pl index 8c8d692917..12f2a409b1 100755 --- a/scripts/perftrace.pl +++ b/scripts/perftrace.pl @@ -168,7 +168,7 @@ sub consume($$$$$$$$$) $time = $time - $dur_us; push @events, "{\"pid\":$pid, \"tid\":$tid, \"ts\":$time, \"dur\":$dur_us, \"ph\":\"X\", \"name\":\"$msg\", \"args\":{ \"ms\":$dur_ms } }"; } else { - die "Unknown prof message: '$message'"; + die "Unknown prof message: '$message' at line $lineno"; } return; } @@ -261,7 +261,7 @@ sub parseProfileFrames($$$$$) # print STDERR "Profile frame '$line'\n"; # FIXME: silly to complicate and then re-parse this I guess ... my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime($secs); - my $time = sprintf("%.2d:%.2d:%02.6f", $hour, $min, "$sec.$fractsecs"); + my $time = sprintf("%.2d:%.2d:%09.6f", $hour, $min, "$sec.$fractsecs"); # print STDERR "time '$time' from '$secs' - " . time() . "\n"; consume($lineno, $proc, $pid, $tid, $time, $emitter, 'PROF', $realmsg, ''); } |