diff options
| author | Greg Hudson <ghudson@mit.edu> | 2011-03-02 00:08:14 +0000 |
|---|---|---|
| committer | Greg Hudson <ghudson@mit.edu> | 2011-03-02 00:08:14 +0000 |
| commit | 8ad464c968b68f5dbd0243a9b29c34e479bcc1d2 (patch) | |
| tree | 9038c55893f644b6a56378dd88949904cb22672a | |
| parent | 8bca4d095c32c35af8f0972e00a92925f9c1c8cf (diff) | |
| download | krb5-8ad464c968b68f5dbd0243a9b29c34e479bcc1d2.tar.gz krb5-8ad464c968b68f5dbd0243a9b29c34e479bcc1d2.tar.xz krb5-8ad464c968b68f5dbd0243a9b29c34e479bcc1d2.zip | |
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
| -rwxr-xr-x | src/util/export-check.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/util/export-check.pl b/src/util/export-check.pl index ff2c6e0375..eaec7d6111 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; |