mirror/openssl
2
0
Fork 0
mirror of https://github.com/openssl/openssl.git synced 2024-11-21 01:15:20 +08:00
Code Issues Packages Projects Releases Wiki Activity

Minor x86_64 perlasm update.

Browse Source
This commit is contained in:
Andy Polyakov 2011-06-27 09:45:10 +00:00
parent fc30530402
commit 0a9a692e4e
2 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
crypto/aes/asm/aesni-x86_64.pl
View File

@ -3018,15 +3018,13 @@ ___
}
sub rex {
local *opcode=shift;
my ($dst,$src)=@_;
local *opcode=shift;
my ($dst,$src)=@_;
my $rex=0;
if ($dst>=8 || $src>=8) {
$rex=0x40;
$rex|=0x04 if($dst>=8);
$rex|=0x01 if($src>=8);
push @opcode,$rex;
}
$rex|=0x04 if($dst>=8);
$rex|=0x01 if($src>=8);
push @opcode,$rex|0x40 if($rex);
}
sub aesni {

2
crypto/perlasm/x86_64-xlate.pl
View File

@ -123,6 +123,8 @@ my %globals;
$self->{sz} = "";
} elsif ($self->{op} =~ /^p/ && $' !~ /^(ush|op|insrw)/) { # SSEn
$self->{sz} = "";
} elsif ($self->{op} =~ /^v/) { # VEX
$self->{sz} = "";
} elsif ($self->{op} =~ /movq/ && $line =~ /%xmm/) {
$self->{sz} = "";
} elsif ($self->{op} =~ /([a-z]{3,})([qlwb])$/) {