generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

sha[1|512]-armv8.pl: get instruction endianness right.

Browse Source 
Submitted by: Ard Biesheuvel.
(cherry picked from commit cd91fd7c32428c0deb503f19b8061e0980476876)
This commit is contained in:
Andy Polyakov 2014-06-06 20:50:43 +02:00
parent 4672acfa7d
commit a00caa0257
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
crypto/sha/asm/sha1-armv8.pl
View File

@ -312,7 +312,7 @@ ___
$arg =~ m/[qv]([0-9]+)[^,]*,\s*[qv]([0-9]+)[^,]*(?:,\s*[qv]([0-9]+))?/o $arg =~ m/[qv]([0-9]+)[^,]*,\s*[qv]([0-9]+)[^,]*(?:,\s*[qv]([0-9]+))?/o
&& &&
sprintf ".long\t0x%08x\t//%s %s", sprintf ".inst\t0x%08x\t//%s %s",
$opcode{$mnemonic}|$1|($2<<5)|($3<<16), $opcode{$mnemonic}|$1|($2<<5)|($3<<16),
$mnemonic,$arg; $mnemonic,$arg;
} }

2
crypto/sha/asm/sha512-armv8.pl
View File

@ -393,7 +393,7 @@ ___
$arg =~ m/[qv]([0-9]+)[^,]*,\s*[qv]([0-9]+)[^,]*(?:,\s*[qv]([0-9]+))?/o $arg =~ m/[qv]([0-9]+)[^,]*,\s*[qv]([0-9]+)[^,]*(?:,\s*[qv]([0-9]+))?/o
&& &&
sprintf ".long\t0x%08x\t//%s %s", sprintf ".inst\t0x%08x\t//%s %s",
$opcode{$mnemonic}|$1|($2<<5)|($3<<16), $opcode{$mnemonic}|$1|($2<<5)|($3<<16),
$mnemonic,$arg; $mnemonic,$arg;
} }