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

sha512-ppc.pl: minimize stack frame.

Browse Source
This commit is contained in:
Andy Polyakov 2013-01-22 21:09:14 +01:00
parent 06b3b640eb
commit 1598af9ac9
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
crypto/sha/asm/sha512-ppc.pl
View File

@ -91,10 +91,6 @@ if ($output =~ /512/) {
$FRAME=32*$SIZE_T+16*$SZ;
$LOCALS=6*$SIZE_T;
if ($SZ==8 && $SIZE_T==4) {
$FRAME+=16*$SZ;
$XOFF=$LOCALS+16*$SZ;
}
$sp ="r1";
$toc="r2";
@ -436,6 +432,8 @@ ___
# (*) ~1/3 of -m64 result [and ~20% better than -m32 code generated
# by xlc-12.1]
my $XOFF=$LOCALS;
my @V=map("r$_",(16..31)); # A..H
my ($s0,$s1,$t0,$t1,$t2,$t3,$a0,$a1,$a2,$a3)=map("r$_",(0,5,6,8..12,14,15));