From 016cadfb542569dc72a7523fd12a03b21d075336 Mon Sep 17 00:00:00 2001 From: "Dr. Stephen Henson" Date: Thu, 10 May 2001 00:07:45 +0000 Subject: [PATCH] Fix to allow multiple NONE libraries in mkerr.pl . --- util/mkerr.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/util/mkerr.pl b/util/mkerr.pl index 7dbe246297..e812b9fc00 100644 --- a/util/mkerr.pl +++ b/util/mkerr.pl @@ -53,6 +53,7 @@ while() { if(/^L\s+(\S+)\s+(\S+)\s+(\S+)/) { $hinc{$1} = $2; + $libinc{$2} = $1; $cskip{$3} = $1; if($3 ne "NONE") { $csrc{$1} = $3; @@ -74,7 +75,7 @@ close IN; # Scan each header file in turn and make a list of error codes # and function names -while (($lib, $hdr) = each %hinc) +while (($hdr, $lib) = each %libinc) { next if($hdr eq "NONE"); print STDERR "Scanning header file $hdr\n" if $debug; -- 2.25.1