equal
deleted
inserted
replaced
481 print OBJDUMPLIST @last_objdump; |
481 print OBJDUMPLIST @last_objdump; |
482 close OBJDUMPLIST; |
482 close OBJDUMPLIST; |
483 } |
483 } |
484 $last_elffile = $elffile; |
484 $last_elffile = $elffile; |
485 } |
485 } |
|
486 my $length = length($symbol); |
486 foreach my $line (@last_objdump) |
487 foreach my $line (@last_objdump) |
487 { |
488 { |
488 if (index($line,$symbol) >= 0) |
489 chomp $line; |
|
490 if (substr($line,-$length) eq $symbol) |
489 { |
491 { |
490 push @instances, $line; |
492 push @instances, $line; |
491 } |
493 } |
492 } |
494 } |
493 close OBJDUMP; |
495 close OBJDUMP; |