From: Richard Levitte <levitte@openssl.org>
Date: Mon, 14 May 2001 22:10:09 +0000 (+0000)
Subject: branch on equal is beql, not beq...
X-Git-Tag: OpenSSL_0_9_6c~182^2~160
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=81b5eeed6acda357d449dbbba83310881852874d;p=oweals%2Fopenssl.git

branch on equal is beql, not beq...
---

diff --git a/crypto/bn/asm/vms.mar b/crypto/bn/asm/vms.mar
index 5eab242706..465f2774b6 100644
--- a/crypto/bn/asm/vms.mar
+++ b/crypto/bn/asm/vms.mar
@@ -279,7 +279,7 @@ d=12 ;(AP)	d	by value (input)
 	xorl2	#^X80000000,r7	; fixup a21 so highest bit is 1
 2$:
 	tstl	r9
-	beq	666$		; Uh-oh, the divisor is 0...
+	beql	666$		; Uh-oh, the divisor is 0...
 	bgtr	3$
 	xorl2	#^X80000000,r9	; fixup b2 so highest bit is 0
 	incl	r8		; b' = 1