X-Git-Url: https://git.jankratochvil.net/?p=massrebuild.git;a=blobdiff_plain;f=dwarfredundant;h=a7dd9e0575fae947d10eadee969de35ffd67f09c;hp=c0be997bb25190c2fc360921c878a047f37a7821;hb=4327c3bd694eedb41937e00f3ad45825d3e3f2ad;hpb=fd7c2d2cad3bdea46ea85fde64b6fda21ce6052d

diff --git a/dwarfredundant b/dwarfredundant
index c0be997..a7dd9e0 100755
--- a/dwarfredundant
+++ b/dwarfredundant
@@ -19,7 +19,7 @@ for my $argv (@ARGV) {
     die if !$redundant;
     my $saved=eval($addr)+1-eval($redundant_addr);
     $saved_total+=$saved;
-    print "saved=$saved:\n$redundant_textsaved_total=$saved_total\n\n" if !$quiet;
+    print "saved=$saved:\n${redundant_text}saved_total=$saved_total\n\n" if !$quiet;
     $redundant=0;
   }
   while (<F>) {
@@ -49,7 +49,7 @@ for my $argv (@ARGV) {
       $redundant_text.=$_ if !$quiet;
     }
     my $spacesl=length $spaces or die;
-    if ($rest=~/DW_FORM_addr.*0x0000000000000000/) {
+    if ($rest=~/\bDW_FORM_addr\b.*0x0000000000000000|\bDW_AT_signature\b/) {
       next if $redundant;
       $redundant=$spacesl;
       $redundant_text=$die_text if !$quiet;