From: Greg Hudson <ghudson@mit.edu>
Date: Wed, 2 Mar 2011 00:08:14 +0000 (+0000)
Subject: In export-check.pl, display a better error if there are duplicate
X-Git-Tag: krb5-1.10-alpha1~561
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=8ad464c968b68f5dbd0243a9b29c34e479bcc1d2;p=krb5.git

In export-check.pl, display a better error if there are duplicate
symbols in the export list.

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

diff --git a/src/util/export-check.pl b/src/util/export-check.pl
index ff2c6e037..eaec7d611 100755
--- a/src/util/export-check.pl
+++ b/src/util/export-check.pl
@@ -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;