summaryrefslogtreecommitdiff
path: root/scripts/deps.pl
Side-by-side diff
Diffstat (limited to 'scripts/deps.pl') (more/less context) (ignore whitespace changes)
-rwxr-xr-xscripts/deps.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/deps.pl b/scripts/deps.pl
index feced6e..a219e36 100755
--- a/scripts/deps.pl
+++ b/scripts/deps.pl
@@ -32,46 +32,46 @@ sub getdepends ($$)
return;
}
sub makedepends ($$)
{
my ($depends, $tokenpath, $token, $depword, $mustbesep, $state);
$depends = shift || return;
$tokenpath = shift || return;
$mustbesep = 0;
for $token (keys %$depends){
print ${$tokenpath}{$token} . " : ";
for (split(/\s+/, ${$depends}{$token})){
/^\s+$/ && next;
/\&\&/ && next;
/\|\|/ && next;
/^$/ && next;
/^\($/ && next;
/^\)$/ && next;
/^on$/ && next;
/^!$/ && next;
if(defined(${$tokenpath}{"CONFIG_" . $_})){
print '$(if $(CONFIG_' . $_ . '),' . ${$tokenpath}{"CONFIG_" . $_} . ') ';
} else {
- print STDERR "Warning: unable to locate path for token CONFIG_$_\n";
+# print STDERR "Warning: unable to locate path for token CONFIG_$_\n";
}
}
print "\n";
}
}
while( <> ) {
my $dep;
my ($token, $path, $pro);
chomp;
s/^\s*//g;
s/\s*$//g;
($token, $path, $pro) = split(/\s+/,$_);
$tokenpath{$token} = $path;
$dep = getdepends($token, $path);
if( $dep ) {
$depends{$token} = $dep;
}
}
makedepends(\%depends, \%tokenpath);