author | kergoth <kergoth> | 2003-01-16 04:39:25 (UTC) |
---|---|---|
committer | kergoth <kergoth> | 2003-01-16 04:39:25 (UTC) |
commit | 21cee2677c4a480f00675cdc9160e5d7e97e7122 (patch) (side-by-side diff) | |
tree | a2e3b3f9675949fae2cf57e0f7b44441e7bfa06c /scripts/deps.pl | |
parent | 7ffd4623880396f07e34faf195f8c131218cf682 (diff) | |
download | opie-21cee2677c4a480f00675cdc9160e5d7e97e7122.zip opie-21cee2677c4a480f00675cdc9160e5d7e97e7122.tar.gz opie-21cee2677c4a480f00675cdc9160e5d7e97e7122.tar.bz2 |
*** empty log message ***
-rwxr-xr-x | scripts/deps.pl | 2 |
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); |