From 965c17756a248f512056197f41f248c615be5a0d Mon Sep 17 00:00:00 2001 From: Richard Levitte Date: Mon, 11 Sep 2000 17:31:05 +0000 Subject: [PATCH] mkdef.pl has erroneous conditions to check if a symbol is excluded from the given target. Fixed, I hope. --- util/mkdef.pl | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) diff --git a/util/mkdef.pl b/util/mkdef.pl index 1989589424..706073dd74 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -693,14 +693,15 @@ EOF } else { (my $n, my $i) = split /\\/, $nums{$s}; my @p = split(/,/, ($i =~ /^.*?:(.*?):/,$1)); - printf OUT " %s%-40s@%d\n",($W32)?"":"_",$s,$n - # It is very important to check NT before W32 - if ($NT && (!@p || (grep(/^WINNT$/,@p) - && !grep(/^!WINNT$/,@p))) - || $W32 && (!@p || (grep(/^WIN32$/,@p) - && !grep(/^!WIN32$/,@p))) - || $W16 && (!@p || (grep(/^WIN16$/,@p) - && !grep(/^!WIN16$/,@p)))); + # It is very important to check NT before W32 + if (($NT && (!@p || (grep(/^WINNT$/,@p) + || !grep(/^!WINNT$/,@p)))) + || ($W32 && (!@p || (grep(/^WIN32$/,@p) + || !grep(/^!WIN32$/,@p)))) + || ($W16 && (!@p || (grep(/^WIN16$/,@p) + || !grep(/^!WIN16$/,@p))))) { + printf OUT " %s%-40s@%d\n",($W32)?"":"_",$s,$n; + } } } printf OUT "\n"; -- 2.25.1