make update
[openssl.git] / crypto / bn / asm / ppc-mont.pl
index f9b6992ccc82bd28333ab8ae87e5d120ee07c791..6930a3acebd2e4bf02c3c7f9bd5d4d6da8644949 100644 (file)
@@ -191,7 +191,7 @@ L1st:
 
        addi    $j,$j,$BNSZ     ; j++
        addi    $tp,$tp,$BNSZ   ; tp++
-       bdnz-   L1st
+       bdnz    L1st
 ;L1st
        addc    $lo0,$alo,$hi0
        addze   $hi0,$ahi
@@ -253,7 +253,7 @@ Linner:
        addze   $hi1,$hi1
        $ST     $lo1,0($tp)     ; tp[j-1]
        addi    $tp,$tp,$BNSZ   ; tp++
-       bdnz-   Linner
+       bdnz    Linner
 ;Linner
        $LD     $tj,$BNSZ($tp)  ; tp[j]
        addc    $lo0,$alo,$hi0
@@ -276,7 +276,7 @@ Linner:
        slwi    $tj,$num,`log($BNSZ)/log(2)`
        $UCMP   $i,$tj
        addi    $i,$i,$BNSZ
-       ble-    Louter
+       ble     Louter
 \f
        addi    $num,$num,2     ; restore $num
        subfc   $j,$j,$j        ; j=0 and "clear" XER[CA]
@@ -289,7 +289,7 @@ Lsub:       $LDX    $tj,$tp,$j
        subfe   $aj,$nj,$tj     ; tp[j]-np[j]
        $STX    $aj,$rp,$j
        addi    $j,$j,$BNSZ
-       bdnz-   Lsub
+       bdnz    Lsub
 
        li      $j,0
        mtctr   $num
@@ -304,7 +304,7 @@ Lcopy:                              ; copy or in-place refresh
        $STX    $tj,$rp,$j
        $STX    $j,$tp,$j       ; zap at once
        addi    $j,$j,$BNSZ
-       bdnz-   Lcopy
+       bdnz    Lcopy
 
        $POP    $tj,0($sp)
        li      r3,1
@@ -325,6 +325,7 @@ Lcopy:                              ; copy or in-place refresh
        .long   0
        .byte   0,12,4,0,0x80,12,6,0
        .long   0
+.size  .bn_mul_mont_int,.-.bn_mul_mont_int
 
 .asciz  "Montgomery Multiplication for PPC, CRYPTOGAMS by <appro\@openssl.org>"
 ___