s390x assembly pack: fix formal interface bug in chacha module

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

diff --git a/crypto/chacha/asm/chacha-s390x.pl b/crypto/chacha/asm/chacha-s390x.pl
index 005c810e20bd964102fb6ce24ec7d4fdb97b7c11..abf7283dd81034fd2027d3bd3957c1de1f546a48 100755 (executable)
--- a/crypto/chacha/asm/chacha-s390x.pl
+++ b/crypto/chacha/asm/chacha-s390x.pl
@@ -225,7 +225,7 @@ LABEL       ("ChaCha20_ctr32");
        larl    ("%r1","OPENSSL_s390xcap_P");
 
        lghi    ("%r0",64);
-&{$z?  \&cgr:\&cr}     ($len,"%r0");
+&{$z?  \&clgr:\&clr}   ($len,"%r0");
        jle     ("_s390x_chacha_novx");
 
        lg      ("%r0","S390X_STFLE+16(%r1)");