diff options
| author | Reid Spencer <rspencer@reidspencer.com> | 2006-05-13 02:48:45 +0000 | 
|---|---|---|
| committer | Reid Spencer <rspencer@reidspencer.com> | 2006-05-13 02:48:45 +0000 | 
| commit | 11b002365f38af5c54df999c56f0e157ef646dc4 (patch) | |
| tree | 403008d68ec4d8c5199e2605936c8ec3a786b9b5 /llvm | |
| parent | 70de606bb94b42359f6c682fb81eeec107a45d91 (diff) | |
| download | bcm5719-llvm-11b002365f38af5c54df999c56f0e157ef646dc4.tar.gz bcm5719-llvm-11b002365f38af5c54df999c56f0e157ef646dc4.zip  | |
Don't try to reference uninitialized data. Make sure we can find "nm".
llvm-svn: 28277
Diffstat (limited to 'llvm')
| -rwxr-xr-x | llvm/utils/GenLibDeps.pl | 12 | 
1 files changed, 8 insertions, 4 deletions
diff --git a/llvm/utils/GenLibDeps.pl b/llvm/utils/GenLibDeps.pl index 6f0b82fd67d..ee8cc7aa2ab 100755 --- a/llvm/utils/GenLibDeps.pl +++ b/llvm/utils/GenLibDeps.pl @@ -23,11 +23,15 @@ while (scalar(@ARGV) and ($_ = $ARGV[0], /^[-+]/)) {  my $Directory = $ARGV[0];  # Find the "dot" program +my $DotPath="";  if (!$FLAT) { -  chomp(my $DotPath = `which dot`); +  chomp($DotPath = `which dot`);    die "Can't find 'dot'" if (! -x "$DotPath");  } +chomp(my $nmPath=`which nm`); +die "Can't find 'nm'" if (! -x "$nmPath"); +  # Open the directory and read its contents, sorting by name and differentiating  # by whether its a library (.a) or an object file (.o)  opendir DIR,$Directory; @@ -44,7 +48,7 @@ my %objdefs;  # Gather definitions from the libraries  foreach $lib (@libs ) {    open DEFS,  -    "nm -g $Directory/$lib | grep ' [ABCDGRST] ' | sed -e 's/^[0-9A-Fa-f]* [ABCDGRST] //' | sort | uniq |"; +    "$nmPath -g $Directory/$lib | grep ' [ABCDGRST] ' | sed -e 's/^[0-9A-Fa-f]* [ABCDGRST] //' | sort | uniq |";    while (<DEFS>) {      chomp($_);      $libdefs{$_} = $lib; @@ -55,7 +59,7 @@ foreach $lib (@libs ) {  # Gather definitions from the object files.  foreach $obj (@objs ) {    open DEFS,  -    "nm -g $Directory/$obj | grep ' [ABCDGRST] ' | sed -e 's/^[0-9A-Fa-f]* [ABCDGRST] //' | sort | uniq |"; +    "$nmPath -g $Directory/$obj | grep ' [ABCDGRST] ' | sed -e 's/^[0-9A-Fa-f]* [ABCDGRST] //' | sort | uniq |";    while (<DEFS>) {      chomp($_);      $objdefs{$_} = $obj; @@ -76,7 +80,7 @@ sub gen_one_entry {      print "  <dt><b>$lib</b</dt><dd><ul>\n";    }    open UNDEFS,  -    "nm -g -u $Directory/$lib | sed -e 's/^  *U //' | sort | uniq |"; +    "$nmPath -g -u $Directory/$lib | sed -e 's/^  *U //' | sort | uniq |";    open DEPENDS,      "| sort | uniq > GenLibDeps.out";    while (<UNDEFS>) {  | 

