X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/57e75112e7ce09f9577c63184b2e7cebe2a312ba..6f1b0ef8689a9f9f47c12ea61b6aef187a8b6192:/tools/stack-cleaner/clean-stack-filter diff --git a/tools/stack-cleaner/clean-stack-filter b/tools/stack-cleaner/clean-stack-filter index 64e79903c5..8b15cd7c0f 100755 --- a/tools/stack-cleaner/clean-stack-filter +++ b/tools/stack-cleaner/clean-stack-filter @@ -15,7 +15,6 @@ our $lines = ""; # Size of the stack for this function: our $size = 0; - # Counter for assigning unique ids to labels: our $id=0; @@ -52,14 +51,14 @@ while (<>) { if ($scanproc) { $lines = $lines . $_; if (m/^[ \t]*.cfi_endproc$/) { - emit_code(); + emit_code(); } elsif (m/^[ \t]*pushq/) { - $size += 8; + $size += 8; } elsif (m/^[ \t]*subq[\t *]\$([0-9]*),[ \t]*%rsp$/) { - my $val = $1; - $val = oct($val) if $val =~ /^0/; - $size += $val; - emit_code(); + my $val = $1; + $val = oct($val) if $val =~ /^0/; + $size += $val; + emit_code(); } } elsif (m/^[ \t]*.cfi_startproc$/) { print $_;