diff options
author | steve <steve> | 2005-04-19 23:54:44 +0000 |
---|---|---|
committer | steve <steve> | 2005-04-19 23:54:44 +0000 |
commit | fc84749f319790b3316d1e5876d43ab180c386dd (patch) | |
tree | bc24c0c1fd062592e9f69acad082d0414f1a0c71 /util/mkdef.pl | |
parent | 9fc1eb53151fdec1e7429fc676f69631bef76a1b (diff) | |
download | openssl-fc84749f319790b3316d1e5876d43ab180c386dd.tar.gz |
Fix logic in mkdef.pl function is_valid.
Update symbols
Diffstat (limited to 'util/mkdef.pl')
-rwxr-xr-x | util/mkdef.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/util/mkdef.pl b/util/mkdef.pl index 6cbdf7768..357adf462 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -1032,7 +1032,7 @@ sub is_valid { my ($keywords_txt,$platforms) = @_; my (@keywords) = split /,/,$keywords_txt; - my ($falsesum, $truesum) = (0, !grep(/^[^!]/,@keywords)); + my ($falsesum, $truesum) = (0, 1); # Param: one keyword sub recognise @@ -1102,7 +1102,7 @@ sub is_valid if ($k =~ /^!(.*)$/) { $falsesum += &recognise($1,$platforms); } else { - $truesum += &recognise($k,$platforms); + $truesum *= &recognise($k,$platforms); } } print STDERR "DEBUG: [",$#keywords,",",$#keywords < 0,"] is_valid($keywords_txt) => (\!$falsesum) && $truesum = ",(!$falsesum) && $truesum,"\n" if $debug; |