Fixed parsing of bloat log when value was nan, or class contained ::.
This commit is contained in:
Родитель
9ddd116d09
Коммит
98fe713c79
|
@ -7,7 +7,8 @@ sub processFile {
|
|||
my ($FILENAME, $map, $prevMap) = @_;
|
||||
open(FH, $FILENAME);
|
||||
while (<FH>) {
|
||||
if (/^\s+(\d+) (\w+)\s+([\-\d]+)\s+([\-\d]+)\s+([\-\d]+)\s+([\-\d]+) \(\s+([\-\d\.]+) \+\/\-\s+([\-\d\.]+)\)\s+([\-\d]+)\s+([\-\d]+) \(\s+([\-\d\.]+) \+\/\-\s+([\-\d\.]+)\)/) {
|
||||
if (/^\s+(\d+) ([\w\:]+)\s+([\-\d]+)\s+([\-\d]+)\s+([\-\d]+)\s+([\-\d]+) \(\s+([\-\d\.]+) \+\/\-\s+([\w\.]+)\)\s+([\-\d]+)\s+([\-\d]+) \(\s+([\-\d\.]+) \+\/\-\s+([\w\.]+)\)/)
|
||||
{
|
||||
my $name = $2;
|
||||
my $size = $3;
|
||||
my $leaked = $4;
|
||||
|
@ -33,6 +34,9 @@ sub processFile {
|
|||
refStdDev => $refStdDev,
|
||||
bloat => $bloat };
|
||||
}
|
||||
else {
|
||||
# print "failed to parse: $_\n";
|
||||
}
|
||||
}
|
||||
close(FH);
|
||||
}
|
||||
|
@ -200,7 +204,7 @@ foreach $key (@keys) {
|
|||
}
|
||||
}
|
||||
if (!$needsHeading) {
|
||||
printf "%-20s %10s\n", ("TOTAL", $total);
|
||||
# printf "%-20s %10s\n", ("TOTAL", $total);
|
||||
}
|
||||
|
||||
# ALL BLOAT
|
||||
|
@ -222,7 +226,7 @@ foreach $key (@keys) {
|
|||
}
|
||||
}
|
||||
if (!$needsHeading) {
|
||||
printf "%-20s %10s\n", ("TOTAL", $total);
|
||||
# printf "%-20s %10s\n", ("TOTAL", $total);
|
||||
}
|
||||
|
||||
# NEW CLASSES
|
||||
|
|
Загрузка…
Ссылка в новой задаче