Deleted Added
sdiff udiff text old ( 302408 ) new ( 337982 )
full compact
ppc64-mont.pl (302408) ppc64-mont.pl (337982)
1#!/usr/bin/env perl
2
3# ====================================================================
4# Written by Andy Polyakov <appro@openssl.org> for the OpenSSL
5# project. The module is, however, dual licensed under OpenSSL and
6# CRYPTOGAMS licenses depending on where you obtain it. For further
7# details see http://www.openssl.org/~appro/cryptogams/.
8# ====================================================================

--- 1480 unchanged lines hidden (view full) ---

1489 subfe $t2,$t3,$t2 ; tp[j+1]-np[j+1]
1490 stdx $t0,$rp,$i
1491 stdx $t2,$t6,$i
1492 addi $i,$i,16
1493 bdnz Lsub
1494
1495 li $i,0
1496 subfe $ovf,$i,$ovf ; handle upmost overflow bit
1#!/usr/bin/env perl
2
3# ====================================================================
4# Written by Andy Polyakov <appro@openssl.org> for the OpenSSL
5# project. The module is, however, dual licensed under OpenSSL and
6# CRYPTOGAMS licenses depending on where you obtain it. For further
7# details see http://www.openssl.org/~appro/cryptogams/.
8# ====================================================================

--- 1480 unchanged lines hidden (view full) ---

1489 subfe $t2,$t3,$t2 ; tp[j+1]-np[j+1]
1490 stdx $t0,$rp,$i
1491 stdx $t2,$t6,$i
1492 addi $i,$i,16
1493 bdnz Lsub
1494
1495 li $i,0
1496 subfe $ovf,$i,$ovf ; handle upmost overflow bit
1497 and $ap,$tp,$ovf
1498 andc $np,$rp,$ovf
1499 or $ap,$ap,$np ; ap=borrow?tp:rp
1500 addi $t7,$ap,8
1501 mtctr $j
1502
1503.align 4
1497 mtctr $j
1498
1499.align 4
1504Lcopy: ; copy or in-place refresh
1505 ldx $t0,$ap,$i
1506 ldx $t1,$t7,$i
1500Lcopy: ; conditional copy
1501 ldx $t0,$tp,$i
1502 ldx $t1,$t4,$i
1503 ldx $t2,$rp,$i
1504 ldx $t3,$t6,$i
1507 std $i,8($nap_d) ; zap nap_d
1508 std $i,16($nap_d)
1509 std $i,24($nap_d)
1510 std $i,32($nap_d)
1511 std $i,40($nap_d)
1512 std $i,48($nap_d)
1513 std $i,56($nap_d)
1514 stdu $i,64($nap_d)
1505 std $i,8($nap_d) ; zap nap_d
1506 std $i,16($nap_d)
1507 std $i,24($nap_d)
1508 std $i,32($nap_d)
1509 std $i,40($nap_d)
1510 std $i,48($nap_d)
1511 std $i,56($nap_d)
1512 stdu $i,64($nap_d)
1513 and $t0,$t0,$ovf
1514 and $t1,$t1,$ovf
1515 andc $t2,$t2,$ovf
1516 andc $t3,$t3,$ovf
1517 or $t0,$t0,$t2
1518 or $t1,$t1,$t3
1515 stdx $t0,$rp,$i
1516 stdx $t1,$t6,$i
1517 stdx $i,$tp,$i ; zap tp at once
1518 stdx $i,$t4,$i
1519 addi $i,$i,16
1520 bdnz Lcopy
1521___
1522$code.=<<___ if ($SIZE_T==4);

--- 26 unchanged lines hidden (view full) ---

1549 stw $t4,4($rp)
1550 stw $t5,8($rp)
1551 stw $t6,12($rp)
1552 stwu $t7,16($rp)
1553 bdnz Lsub
1554
1555 li $i,0
1556 subfe $ovf,$i,$ovf ; handle upmost overflow bit
1519 stdx $t0,$rp,$i
1520 stdx $t1,$t6,$i
1521 stdx $i,$tp,$i ; zap tp at once
1522 stdx $i,$t4,$i
1523 addi $i,$i,16
1524 bdnz Lcopy
1525___
1526$code.=<<___ if ($SIZE_T==4);

--- 26 unchanged lines hidden (view full) ---

1553 stw $t4,4($rp)
1554 stw $t5,8($rp)
1555 stw $t6,12($rp)
1556 stwu $t7,16($rp)
1557 bdnz Lsub
1558
1559 li $i,0
1560 subfe $ovf,$i,$ovf ; handle upmost overflow bit
1557 addi $tp,$sp,`$FRAME+$TRANSFER+4`
1561 addi $ap,$sp,`$FRAME+$TRANSFER+4`
1558 subf $rp,$num,$rp ; rewind rp
1562 subf $rp,$num,$rp ; rewind rp
1559 and $ap,$tp,$ovf
1560 andc $np,$rp,$ovf
1561 or $ap,$ap,$np ; ap=borrow?tp:rp
1562 addi $tp,$sp,`$FRAME+$TRANSFER`
1563 mtctr $j
1564
1565.align 4
1563 addi $tp,$sp,`$FRAME+$TRANSFER`
1564 mtctr $j
1565
1566.align 4
1566Lcopy: ; copy or in-place refresh
1567Lcopy: ; conditional copy
1567 lwz $t0,4($ap)
1568 lwz $t1,8($ap)
1569 lwz $t2,12($ap)
1570 lwzu $t3,16($ap)
1568 lwz $t0,4($ap)
1569 lwz $t1,8($ap)
1570 lwz $t2,12($ap)
1571 lwzu $t3,16($ap)
1572 lwz $t4,4($rp)
1573 lwz $t5,8($rp)
1574 lwz $t6,12($rp)
1575 lwz $t7,16($rp)
1571 std $i,8($nap_d) ; zap nap_d
1572 std $i,16($nap_d)
1573 std $i,24($nap_d)
1574 std $i,32($nap_d)
1575 std $i,40($nap_d)
1576 std $i,48($nap_d)
1577 std $i,56($nap_d)
1578 stdu $i,64($nap_d)
1576 std $i,8($nap_d) ; zap nap_d
1577 std $i,16($nap_d)
1578 std $i,24($nap_d)
1579 std $i,32($nap_d)
1580 std $i,40($nap_d)
1581 std $i,48($nap_d)
1582 std $i,56($nap_d)
1583 stdu $i,64($nap_d)
1584 and $t0,$t0,$ovf
1585 and $t1,$t1,$ovf
1586 and $t2,$t2,$ovf
1587 and $t3,$t3,$ovf
1588 andc $t4,$t4,$ovf
1589 andc $t5,$t5,$ovf
1590 andc $t6,$t6,$ovf
1591 andc $t7,$t7,$ovf
1592 or $t0,$t0,$t4
1593 or $t1,$t1,$t5
1594 or $t2,$t2,$t6
1595 or $t3,$t3,$t7
1579 stw $t0,4($rp)
1580 stw $t1,8($rp)
1581 stw $t2,12($rp)
1582 stwu $t3,16($rp)
1583 std $i,8($tp) ; zap tp at once
1584 stdu $i,16($tp)
1585 bdnz Lcopy
1586___

--- 42 unchanged lines hidden --- 		1596 stw $t0,4($rp)
1597 stw $t1,8($rp)
1598 stw $t2,12($rp)
1599 stwu $t3,16($rp)
1600 std $i,8($tp) ; zap tp at once
1601 stdu $i,16($tp)
1602 bdnz Lcopy
1603___

--- 42 unchanged lines hidden ---