aes-s390x.pl: fix stg offset caused by typo in perlasm

Signed-off-by: Patrick Steuer <patrick.steuer@de.ibm.com>
Reviewed-by: Richard Levitte <levitte@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/11234)

(cherry picked from commit 7b2ce4a6e817e4385ff77fea0c6e349294c7b756)

diff --git a/crypto/aes/asm/aes-s390x.pl b/crypto/aes/asm/aes-s390x.pl
index cf748f102a184690938f72d126fb7e57d278678a..f7406263700bcc3d64f18a0a404752dae7f5b19d 100644 (file)
--- a/crypto/aes/asm/aes-s390x.pl
+++ b/crypto/aes/asm/aes-s390x.pl
@@ -1987,7 +1987,7 @@ $code.=<<___;
 
 .Lxts_enc_done:
        stg     $sp,$tweak+0($sp)       # wipe tweak
-       stg     $sp,$twesk+8($sp)
+       stg     $sp,$tweak+8($sp)
        lm${g}  %r6,$ra,6*$SIZE_T($sp)
        br      $ra
 .size  AES_xts_encrypt,.-AES_xts_encrypt
@@ -2267,7 +2267,7 @@ $code.=<<___;
        stg     $sp,$tweak-16+8($sp)
 .Lxts_dec_done:
        stg     $sp,$tweak+0($sp)       # wipe tweak
-       stg     $sp,$twesk+8($sp)
+       stg     $sp,$tweak+8($sp)
        lm${g}  %r6,$ra,6*$SIZE_T($sp)
        br      $ra
 .size  AES_xts_decrypt,.-AES_xts_decrypt