X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/0f00dc4c8eb47e67bc0f148c2dd109f73a451e0a..3f19a2c175f432aac4c1721495ed9863e6099818:/math/ec-prime.c

diff --git a/math/ec-prime.c b/math/ec-prime.c
index f6a7f96..c2ec288 100644
--- a/math/ec-prime.c
+++ b/math/ec-prime.c
@@ -267,7 +267,7 @@ static ec *ecprojadd(ec_curve *c, ec *d, const ec *a, const ec *b)
       }
     }
     u = F_ADD(f, u, u, uu);		/* %$t = uu + u$% */
-    s = F_ADD(f, s, s, ss);		/* %$m = ss + r$% */
+    s = F_ADD(f, s, s, ss);		/* %$m = ss + s$% */
 
     uu = F_MUL(f, uu, a->z, w);		/* %$z_0 w$% */
     dz = F_MUL(f, ss, uu, b->z);	/* %$z' = z_0 z_1 w$% */