summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Polyakov <appro@openssl.org>2009-02-10 08:46:48 +0000
committerAndy Polyakov <appro@openssl.org>2009-02-10 08:46:48 +0000
commit0f529cbdc354570dc872dbc72a37a9f85bebc9e8 (patch)
tree2397a05ef412430da2ed4bec2dfcc6c5513d0d05
parenteb55b9fc19963b126c268ddec32dcce886c97d64 (diff)
downloadopenssl-new-0f529cbdc354570dc872dbc72a37a9f85bebc9e8.tar.gz
s390x-mont.pl: optimize prologue.
-rw-r--r--crypto/bn/asm/s390x-mont.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/crypto/bn/asm/s390x-mont.pl b/crypto/bn/asm/s390x-mont.pl
index b575eb70d1..d23251033b 100644
--- a/crypto/bn/asm/s390x-mont.pl
+++ b/crypto/bn/asm/s390x-mont.pl
@@ -64,7 +64,7 @@ bn_mul_mont:
sla $num,3 # $num to enumerate bytes
la $bp,0($num,$bp)
- stmg %r2,%r15,16($sp)
+ stg %r2,16($sp)
cghi $num,16 #
lghi %r2,0 #
@@ -72,6 +72,8 @@ bn_mul_mont:
cghi $num,128 #
bhr %r14 # if($num>128) return 0;
+ stmg %r3,%r15,24($sp)
+
lghi $rp,-160-8 # leave room for carry bit
lcgr $j,$num # -$num
lgr %r0,$sp