diff options
| author | Richard Levitte <levitte@openssl.org> | 2018-06-11 10:33:09 +0200 |
|---|---|---|
| committer | Richard Levitte <levitte@openssl.org> | 2018-06-11 16:45:50 +0200 |
| commit | 2285c0f624b2f5fd16b590511dc35f427053f89f (patch) | |
| tree | 76c07f70cc76503634e6e4cbcda1a7b37b409775 | |
| parent | 387e5ac856454e81d82a4b83388994fecbfc229e (diff) | |
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)
(cherry picked from commit 9a236d5a7158d38b933656cacc31dfd4ff4fcc08)
| -rwxr-xr-x | util/mkdef.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/util/mkdef.pl b/util/mkdef.pl index 669589c801..b7cf9b2852 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -1288,7 +1288,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"; |