leaking_addresses: remove dead/unused code
debug_arrays is not called. Also, %seen hash is not used. We should remove unused code. Remove dead code. Signed-off-by: Tobin C. Harding <me@tobin.cc>
This commit is contained in:
parent
7e5758f7f7
commit
fa31a58202
|
@ -133,14 +133,6 @@ walk(@DIRS);
|
||||||
|
|
||||||
exit 0;
|
exit 0;
|
||||||
|
|
||||||
sub debug_arrays
|
|
||||||
{
|
|
||||||
print 'dirs_any: ' . join(", ", @skip_walk_dirs_any) . "\n";
|
|
||||||
print 'dirs_abs: ' . join(", ", @skip_walk_dirs_abs) . "\n";
|
|
||||||
print 'parse_any: ' . join(", ", @skip_parse_files_any) . "\n";
|
|
||||||
print 'parse_abs: ' . join(", ", @skip_parse_files_abs) . "\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
sub dprint
|
sub dprint
|
||||||
{
|
{
|
||||||
printf(STDERR @_) if $debug;
|
printf(STDERR @_) if $debug;
|
||||||
|
@ -281,7 +273,6 @@ sub skip_walk
|
||||||
sub walk
|
sub walk
|
||||||
{
|
{
|
||||||
my @dirs = @_;
|
my @dirs = @_;
|
||||||
my %seen;
|
|
||||||
|
|
||||||
while (my $pwd = shift @dirs) {
|
while (my $pwd = shift @dirs) {
|
||||||
next if (skip_walk($pwd));
|
next if (skip_walk($pwd));
|
||||||
|
|
Loading…
Reference in New Issue