|
@@ -142,15 +142,11 @@ $total_size = 0;
|
|
while (my $line = <STDIN>) {
|
|
while (my $line = <STDIN>) {
|
|
if ($line =~ m/$funcre/) {
|
|
if ($line =~ m/$funcre/) {
|
|
$func = $1;
|
|
$func = $1;
|
|
- next if $line !~ m/^($xs*)/;
|
|
|
|
|
|
+ next if $line !~ m/^($x*)/;
|
|
if ($total_size > $min_stack) {
|
|
if ($total_size > $min_stack) {
|
|
push @stack, "$intro$total_size\n";
|
|
push @stack, "$intro$total_size\n";
|
|
}
|
|
}
|
|
-
|
|
|
|
- $addr = $1;
|
|
|
|
- $addr =~ s/ /0/g;
|
|
|
|
- $addr = "0x$addr";
|
|
|
|
-
|
|
|
|
|
|
+ $addr = "0x$1";
|
|
$intro = "$addr $func [$file]:";
|
|
$intro = "$addr $func [$file]:";
|
|
my $padlen = 56 - length($intro);
|
|
my $padlen = 56 - length($intro);
|
|
while ($padlen > 0) {
|
|
while ($padlen > 0) {
|