branch on equal is beql, not beq...
diff --git a/crypto/bn/asm/vms.mar b/crypto/bn/asm/vms.mar index 5eab242..465f277 100644 --- a/crypto/bn/asm/vms.mar +++ b/crypto/bn/asm/vms.mar
@@ -279,7 +279,7 @@ 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