From: Richard Levitte <levitte@openssl.org> Date: Mon, 11 Jun 2018 08:33:09 +0000 (+0200) Subject: VMS: have mkdef.pl parse lettered versions properly X-Git-Tag: OpenSSL_1_1_0i~88 X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=9a236d5a7158d38b933656cacc31dfd4ff4fcc08;p=oweals%2Fopenssl.git VMS: have mkdef.pl parse lettered versions properly Fixes #6449 Reviewed-by: Matt Caswell <matt@openssl.org> (Merged from https://github.com/openssl/openssl/pull/6450) --- diff --git a/util/mkdef.pl b/util/mkdef.pl index eb303e603b..823cb664d0 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -1336,7 +1336,7 @@ EOF } elsif ($VMS) { print OUT ")\n"; (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 # for the possibility that we want to encode the patch letters print OUT "GSMATCH=LEQUAL,",($libvmaj * 100 + $libvmin),",",($libvedit * 100),"\n";