More accurate comments.

diff --git a/crypto/bn/asm/vms.mar b/crypto/bn/asm/vms.mar
index 2a752489f551b66534a64f8fd72b4c9b9f509f7a..8278adffd36416f248fbba78abfa61270f36975f 100644 (file)
--- a/crypto/bn/asm/vms.mar
+++ b/crypto/bn/asm/vms.mar
@@ -277,7 +277,7 @@ d=12 ;(AP)  d       by value (input)
 3$:     
        tstl    r7
        blss    4$
-       ashl    #1,r2,r2        ; q = q << 1
+       ashl    #1,r2,r2        ; if d' >= 0, q = q << 1
 4$:     
        ashl    #1,r2,r2        ; q = q << 1
        rotl    #2,r3,r3        ; r = r << 2
@@ -288,7 +288,7 @@ d=12 ;(AP)  d       by value (input)
        tstl    r7
        bgeq    5$
        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
        sbwc    #0,r6
 45$: