progs/perftest.c: Use from Glibc syscall numbers.

[catacomb] / math / mpbarrett-mexp.c

diff --git a/math/mpbarrett-mexp.c b/math/mpbarrett-mexp.c
index a221f10..33818c4 100644 (file)
--- a/math/mpbarrett-mexp.c
+++ b/math/mpbarrett-mexp.c
@@ -37,7 +37,7 @@
 
 /* --- @mpbarrett_mexp@ --- *
  *
- * Arguments:  @mpbarrett *mb@ = pointer to Barrett reduction context
+ * Arguments:  @const mpbarrett *mb@ = pointer to Barrett reduction context
  *             @mp *d@ = fake destination
  *             @const mp_expfactor *f@ = pointer to array of factors
  *             @size_t n@ = number of factors supplied
@@ -49,7 +49,8 @@
  *             %$g_0^{e_0} g_1^{e_1} \ldots g_{n-1}^{e_{n-1}} \bmod m$%
  */
 
-mp *mpbarrett_mexp(mpbarrett *mb, mp *d, const mp_expfactor *f, size_t n)
+mp *mpbarrett_mexp(const mpbarrett *mb, mp *d,
+                  const mp_expfactor *f, size_t n)
 {
   mp_expfactor *ff = xmalloc(n * sizeof(mp_expfactor));
   mp *a = MP_ONE;
@@ -105,9 +106,9 @@ static int verify(size_t n, dstr *v)
     fputs("\n*** mexp failed\n", stderr);
     fputs("m = ", stderr); mp_writefile(m, stderr, 10);
     for (i = 0; i < n; i++) {
-      fprintf(stderr, "\ng_%u = ", i);
+      fprintf(stderr, "\ng_%lu = ", (unsigned long)i);
       mp_writefile(f[i].base, stderr, 10);
-      fprintf(stderr, "\ne_%u = ", i);
+      fprintf(stderr, "\ne_%lu = ", (unsigned long)i);
       mp_writefile(f[i].exp, stderr, 10);
     }
     fputs("\nr = ", stderr); mp_writefile(r, stderr, 10);