diff -r 4a02a61ca23a -r 76c5e260003e tools/static_dependencies.pl --- a/tools/static_dependencies.pl Mon Oct 11 15:56:10 2010 +0100 +++ b/tools/static_dependencies.pl Mon Oct 11 22:33:08 2010 +0100 @@ -14,6 +14,12 @@ # This script generates a list of static dependencies for files in a ROM use strict; +use Getopt::Long; + +my $inverted_table = 0; +GetOptions( + "i|invert" => \$inverted_table, # add the inverted table + ); my %romfiles; my @contents; @@ -36,6 +42,8 @@ my ($romfile,$hostfile,@dependencies) = @_; print "$romfile\t$hostfile\t", join(":",@dependencies), "\n"; + next unless $inverted_table; + # Create inverted table foreach my $dependent (@dependencies) { @@ -133,8 +141,11 @@ # Assume that the rest don't depend on anything, and leave them out. } -print "\n"; -foreach my $inverted (sort keys %dependents) +if ($inverted_table) { - print "x\t$inverted\t$dependents{$inverted}\n"; + print "\n"; + foreach my $inverted (sort keys %dependents) + { + print "x\t$inverted\t$dependents{$inverted}\n"; + } }