Fix to allow multiple NONE libraries in mkerr.pl .
This commit is contained in:
parent
bdee69f718
commit
016cadfb54
@ -53,6 +53,7 @@ while(<IN>)
|
|||||||
{
|
{
|
||||||
if(/^L\s+(\S+)\s+(\S+)\s+(\S+)/) {
|
if(/^L\s+(\S+)\s+(\S+)\s+(\S+)/) {
|
||||||
$hinc{$1} = $2;
|
$hinc{$1} = $2;
|
||||||
|
$libinc{$2} = $1;
|
||||||
$cskip{$3} = $1;
|
$cskip{$3} = $1;
|
||||||
if($3 ne "NONE") {
|
if($3 ne "NONE") {
|
||||||
$csrc{$1} = $3;
|
$csrc{$1} = $3;
|
||||||
@ -74,7 +75,7 @@ close IN;
|
|||||||
# Scan each header file in turn and make a list of error codes
|
# Scan each header file in turn and make a list of error codes
|
||||||
# and function names
|
# and function names
|
||||||
|
|
||||||
while (($lib, $hdr) = each %hinc)
|
while (($hdr, $lib) = each %libinc)
|
||||||
{
|
{
|
||||||
next if($hdr eq "NONE");
|
next if($hdr eq "NONE");
|
||||||
print STDERR "Scanning header file $hdr\n" if $debug;
|
print STDERR "Scanning header file $hdr\n" if $debug;
|
||||||
|
Loading…
Reference in New Issue
Block a user