Make armv4t-mont module backward binary compatible with armv4 and rename it

[openssl.git] / crypto / bn / asm / armv4-mont.pl

diff --git a/crypto/bn/asm/armv4t-mont.pl b/crypto/bn/asm/armv4-mont.pl
similarity index 97%
rename from crypto/bn/asm/armv4t-mont.pl
rename to crypto/bn/asm/armv4-mont.pl
index ba585e7dafa056d190a4c5b15b0b4c696d1aab38..26eca61e7eded4c128a5d3f988fb0f80191e5fdd 100644 (file)
--- a/crypto/bn/asm/armv4t-mont.pl
+++ b/crypto/bn/asm/armv4-mont.pl
@@ -61,7 +61,7 @@ bn_mul_mont:
        cmp     $num,#2
        movlt   r0,#0
        addlt   sp,sp,#2*4
-       bxlt    lr                      @ interoperate with Thumb ISA
+       blt     .Labort
 
        stmdb   sp!,{r4-r12,lr}         @ save 10 registers
 
@@ -177,7 +177,9 @@ bn_mul_mont:
        ldmia   sp!,{r4-r12,lr}         @ restore registers
        add     sp,sp,#2*4              @ skip over {r0,r2}
        mov     r0,#1
-       bx      lr                      @ interoperate with Thumb ISA
+.Labort:tst    lr,#1
+       moveq   pc,lr                   @ be binary compatible with V4, yet
+       bx      lr                      @ interoperable with Thumb ISA:-)
 
 .Lsub: ldr     $tj,[$tp],#4
        ldr     $nj,[$np],#4