diff options
| author | Andy Polyakov <appro@openssl.org> | 2005-11-03 15:23:11 +0000 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2005-11-03 15:23:11 +0000 |
| commit | 7a6f825f0f7a7a4c6fe63c766bf6a16bd6be05db (patch) | |
| tree | 25d0e78e2a30ac39a35e2989d08abf75cac62b16 /crypto/perlasm | |
| parent | 29afd31dd19d1986dfc27e48a8bb0904827d9c77 (diff) | |
| download | openssl-7a6f825f0f7a7a4c6fe63c766bf6a16bd6be05db.zip openssl-7a6f825f0f7a7a4c6fe63c766bf6a16bd6be05db.tar.gz openssl-7a6f825f0f7a7a4c6fe63c766bf6a16bd6be05db.tar.bz2 | |
Make pshufw optional and update performance table in sha512-sse2.pl
[as per http://cvs.openssl.org/chngview?cn=14551].
Diffstat (limited to 'crypto/perlasm')
| -rw-r--r-- | crypto/perlasm/x86unix.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/crypto/perlasm/x86unix.pl b/crypto/perlasm/x86unix.pl index 38c7a6d..8b6e502 100644 --- a/crypto/perlasm/x86unix.pl +++ b/crypto/perlasm/x86unix.pl @@ -227,9 +227,9 @@ sub main'pxor { &out2("pxor",@_); } sub main'por { &out2("por",@_); } sub main'pand { &out2("pand",@_); } sub main'movq { - local($p1,$p2)=@_; - if ($p1=~/^mm[0-7]$/ && $p2=~/^mm[0-7]$/) - # movq between mmx registers sinks Intel CPUs + local($p1,$p2,$optimize)=@_; + if ($optimize && $p1=~/^mm[0-7]$/ && $p2=~/^mm[0-7]$/) + # movq between mmx registers can sink Intel CPUs { push(@out,"\tpshufw\t\$0xe4,%$p2,%$p1\n"); } else { &out2("movq",@_); } } |