commit 965c17756a248f512056197f41f248c615be5a0d
author Richard Levitte <levitte@openssl.org> Mon Sep 11 17:31:05 2000 +0000
committer Richard Levitte <levitte@openssl.org> Mon Sep 11 17:31:05 2000 +0000
tree 78d412bc13dd66ac4b689c1033bfdc979c98d1aa
parent 0c415ddd6723006765ec7c167742f05e981b2b32

mkdef.pl has erroneous conditions to check if a symbol is excluded
from the given target.  Fixed, I hope.

util/mkdef.pl

diff --git a/util/mkdef.pl b/util/mkdef.pl
index 1989589..706073d 100755
--- a/util/mkdef.pl
+++ b/util/mkdef.pl
@@ -693,14 +693,15 @@
 		} 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";