In export-check.pl, display a better error if there are duplicate
authorGreg Hudson <ghudson@mit.edu>
Wed, 2 Mar 2011 00:08:14 +0000 (00:08 +0000)
committerGreg Hudson <ghudson@mit.edu>
Wed, 2 Mar 2011 00:08:14 +0000 (00:08 +0000)
symbols in the export list.

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@24675 dc483132-0cff-0310-8789-dd5450dbe970

src/util/export-check.pl

index ff2c6e0375b1df117ca4f71134a48fee7e71b14b..eaec7d61111903f85743a62fc45fa25f66726e6f 100755 (executable)
@@ -59,6 +59,10 @@ while (<NM>) {
 }
 @found = sort @found;
 while ($#export >= 0 && $#found >= 0) {
+    if ($#export >= 1 && $export[0] eq $export[1]) {
+       print STDERR "Duplicate symbol in export list: $export[0]\n";
+       exit(1);
+    }
     if ($export[0] eq $found[0]) {
 #      print "ok $export[0]\n";
        shift @export;