From: Dr. Stephen Henson <steve@openssl.org>
Date: Sun, 14 Oct 2012 12:30:12 +0000 (+0000)
Subject: sha1-armv4-large.pl: comply with ABI.
X-Git-Tag: OpenSSL-fips-2_0-pl1~5
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=aaf8b56fc8be572739104d79324e95adb30049f3;p=oweals%2Fopenssl.git

sha1-armv4-large.pl: comply with ABI.
(backport from HEAD)
---

diff --git a/crypto/sha/asm/sha1-armv4-large.pl b/crypto/sha/asm/sha1-armv4-large.pl
index fe8207f77f..33da3e0e3c 100644
--- a/crypto/sha/asm/sha1-armv4-large.pl
+++ b/crypto/sha/asm/sha1-armv4-large.pl
@@ -177,6 +177,7 @@ for($i=0;$i<5;$i++) {
 $code.=<<___;
 	teq	$Xi,sp
 	bne	.L_00_15		@ [((11+4)*5+2)*3]
+	sub	sp,sp,#25*4
 ___
 	&BODY_00_15(@V);	unshift(@V,pop(@V));
 	&BODY_16_19(@V);	unshift(@V,pop(@V));
@@ -186,7 +187,6 @@ ___
 $code.=<<___;
 
 	ldr	$K,.LK_20_39		@ [+15+16*4]
-	sub	sp,sp,#25*4
 	cmn	sp,#0			@ [+3], clear carry to denote 20_39
 .L_20_39_or_60_79:
 ___