wbrawner/openssl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

VMS: have mkdef.pl parse lettered versions properly

Browse source 
Fixes #6449

Reviewed-by: Matt Caswell <matt@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/6450)
This commit is contained in:
Richard Levitte 2018-06-11 10:33:09 +02:00
parent e13d8f7ba4
commit 9a236d5a71
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
util/mkdef.pl
View file

@ -1336,7 +1336,7 @@ EOF
} elsif ($VMS) { } elsif ($VMS) {
print OUT ")\n"; print OUT ")\n";
(my $libvmaj, my $libvmin, my $libvedit) = (my $libvmaj, my $libvmin, my $libvedit) =
$currversion =~ /^(\d+)_(\d+)_(\d+)$/; $currversion =~ /^(\d+)_(\d+)_(\d+)[a-z]{0,2}$/;
# The reason to multiply the edit number with 100 is to make space # The reason to multiply the edit number with 100 is to make space
# for the possibility that we want to encode the patch letters # for the possibility that we want to encode the patch letters
print OUT "GSMATCH=LEQUAL,",($libvmaj * 100 + $libvmin),",",($libvedit * 100),"\n"; print OUT "GSMATCH=LEQUAL,",($libvmaj * 100 + $libvmin),",",($libvedit * 100),"\n";