| mips-mont.pl (302408) | mips-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# ==================================================================== --- 363 unchanged lines hidden (view full) --- 372 bnez $at,.Lsub 373 $PTR_ADD $rp,$BNSZ 374 375 $SUBU $hi0,$hi1,$hi0 # handle upmost overflow bit 376 move $tp,$sp 377 $PTR_SUB $rp,$num # restore rp 378 not $hi1,$hi0 379 | 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# ==================================================================== --- 363 unchanged lines hidden (view full) --- 372 bnez $at,.Lsub 373 $PTR_ADD $rp,$BNSZ 374 375 $SUBU $hi0,$hi1,$hi0 # handle upmost overflow bit 376 move $tp,$sp 377 $PTR_SUB $rp,$num # restore rp 378 not $hi1,$hi0 379 |
| 380 and $ap,$hi0,$sp 381 and $bp,$hi1,$rp 382 or $ap,$ap,$bp # ap=borrow?tp:rp 383 384.align 4 385.Lcopy: $LD $aj,($ap) 386 $PTR_ADD $ap,$BNSZ | 380.Lcopy: $LD $nj,($tp) # conditional move 381 $LD $aj,($rp) |
| 387 $ST $zero,($tp) 388 $PTR_ADD $tp,$BNSZ | 382 $ST $zero,($tp) 383 $PTR_ADD $tp,$BNSZ |
| 384 and $nj,$hi0 385 and $aj,$hi1 386 or $aj,$nj |
|
| 389 sltu $at,$tp,$tj 390 $ST $aj,($rp) 391 bnez $at,.Lcopy 392 $PTR_ADD $rp,$BNSZ 393 394 li $a0,1 395 li $t0,1 396 --- 30 unchanged lines hidden --- | 387 sltu $at,$tp,$tj 388 $ST $aj,($rp) 389 bnez $at,.Lcopy 390 $PTR_ADD $rp,$BNSZ 391 392 li $a0,1 393 li $t0,1 394 --- 30 unchanged lines hidden --- |