generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

More accurate comments.

Browse Source
This commit is contained in:
Richard Levitte 2002-12-20 16:38:36 +00:00
parent 3c801fa460
commit 9b58214e4a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
crypto/bn/asm/vms.mar
View File

@ -277,7 +277,7 @@ d=12 ;(AP) d by value (input)
3$: 3$:
tstl r7 tstl r7
blss 4$ blss 4$
ashl #1,r2,r2 ; q = q << 1 ashl #1,r2,r2 ; if d' >= 0, q = q << 1
4$: 4$:
ashl #1,r2,r2 ; q = q << 1 ashl #1,r2,r2 ; q = q << 1
rotl #2,r3,r3 ; r = r << 2 rotl #2,r3,r3 ; r = r << 2
@ -288,7 +288,7 @@ d=12 ;(AP) d by value (input)
tstl r7 tstl r7
bgeq 5$ bgeq 5$
bitl #1,r7 bitl #1,r7
beql 5$ ; if d < 0 && d & 1 beql 5$ ; if d' < 0 && d' & 1
subl r2,r3 ; [r',r] = [r',r] - q subl r2,r3 ; [r',r] = [r',r] - q
sbwc #0,r6 sbwc #0,r6
45$: 45$: