diff --git a/crypto/bn/asm/ppc-mont.pl b/crypto/bn/asm/ppc-mont.pl
index fdc049ae0e3b70a8c24ff0939aa4014878f25d4b..b747f70132feb984c65f69434305c1c2752e35f0 100644
--- a/crypto/bn/asm/ppc-mont.pl
+++ b/crypto/bn/asm/ppc-mont.pl
@@ -135,6 +135,7 @@ $code=<<___;
 .align	5
 .bn_mul_mont_int:
 	mr	$rp,r3		; $rp is reassigned
+	li	r3,0
 ___
 $code.=<<___ if ($BNSZ==4);
 	cmpwi	$num,32		; longer key performance is not better