diff options
| author | Andy Polyakov <appro@openssl.org> | 2008-11-03 08:46:07 +0000 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2008-11-03 08:46:07 +0000 |
| commit | 8fe8bae15a159730928a6f031a4e9af5744eac19 (patch) | |
| tree | cf07e3d3432fc28a0cbb6e6061ad587cdb350c3f /crypto/perlasm/x86gas.pl | |
| parent | f2c0230518551f49d3f9afe12ff5ec92c0845cc6 (diff) | |
Minor perlasm updates.
Diffstat (limited to 'crypto/perlasm/x86gas.pl')
| -rw-r--r-- | crypto/perlasm/x86gas.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/crypto/perlasm/x86gas.pl b/crypto/perlasm/x86gas.pl index 9969d382cf..e3fbb940f0 100644 --- a/crypto/perlasm/x86gas.pl +++ b/crypto/perlasm/x86gas.pl @@ -77,11 +77,11 @@ sub ::jmp_ptr { &::generic("jmp","*$_[0]"); } }; *::shld = sub { my($dst,$src,$bits)=@_; - &::emit("shldl",$bit eq "cl"?"%cl":"\$$bits","%$src","%$dst"); + &::emit("shldl",$bits eq "cl"?"%cl":"\$$bits","%$src","%$dst"); }; *::shrd = sub { my($dst,$src,$bits)=@_; - &::emit("shrdl",$bit eq "cl"?"%cl":"\$$bits","%$src","%$dst"); + &::emit("shrdl",$bits eq "cl"?"%cl":"\$$bits","%$src","%$dst"); }; sub ::DWP |