diff options
author | Richard Levitte <levitte@openssl.org> | 2000-09-11 17:31:05 +0000 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2000-09-11 17:31:05 +0000 |
commit | 965c17756a248f512056197f41f248c615be5a0d (patch) | |
tree | 78d412bc13dd66ac4b689c1033bfdc979c98d1aa | |
parent | 0c415ddd6723006765ec7c167742f05e981b2b32 (diff) |
mkdef.pl has erroneous conditions to check if a symbol is excluded
from the given target. Fixed, I hope.
-rwxr-xr-x | util/mkdef.pl | 17 |
1 files 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"; |