~mdw
/
catacomb
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
progs/perftest.c: Use from Glibc syscall numbers.
[catacomb]
/
math
/
mpmont-mexp.c
diff --git
a/math/mpmont-mexp.c
b/math/mpmont-mexp.c
index
e0f37b5
..
9b0506b
100644
(file)
--- a/
math/mpmont-mexp.c
+++ b/
math/mpmont-mexp.c
@@
-37,7
+37,7
@@
/* --- @mpmont_mexpr@ --- *
*
/* --- @mpmont_mexpr@ --- *
*
- * Arguments: @mpmont *mm@ = pointer to Montgomery reduction context
+ * Arguments: @
const
mpmont *mm@ = pointer to Montgomery reduction context
* @mp *d@ = fake destination
* @const mp_expfactor *f@ = pointer to array of factors
* @size_t n@ = number of factors supplied
* @mp *d@ = fake destination
* @const mp_expfactor *f@ = pointer to array of factors
* @size_t n@ = number of factors supplied
@@
-51,7
+51,7
@@
* except that the %$g_i$% and result are in Montgomery form.
*/
* except that the %$g_i$% and result are in Montgomery form.
*/
-static mp *mexpr(mpmont *mm, mp *d, mp_expfactor *f, size_t n)
+static mp *mexpr(
const
mpmont *mm, mp *d, mp_expfactor *f, size_t n)
{
mp *a = MP_COPY(mm->r);
mp *spare = MP_NEW;
{
mp *a = MP_COPY(mm->r);
mp *spare = MP_NEW;
@@
-76,7
+76,7
@@
static mp *mexpr(mpmont *mm, mp *d, mp_expfactor *f, size_t n)
return (a);
}
return (a);
}
-mp *mpmont_mexpr(mpmont *mm, mp *d, const mp_expfactor *f, size_t n)
+mp *mpmont_mexpr(
const
mpmont *mm, mp *d, const mp_expfactor *f, size_t n)
{
mp_expfactor *ff = xmalloc(n * sizeof(mp_expfactor));
size_t i;
{
mp_expfactor *ff = xmalloc(n * sizeof(mp_expfactor));
size_t i;
@@
-90,7
+90,7
@@
mp *mpmont_mexpr(mpmont *mm, mp *d, const mp_expfactor *f, size_t n)
/* --- @mpmont_mexp@ --- *
*
/* --- @mpmont_mexp@ --- *
*
- * Arguments: @mpmont *mm@ = pointer to Montgomery reduction context
+ * Arguments: @
const
mpmont *mm@ = pointer to Montgomery reduction context
* @mp *d@ = fake destination
* @const mp_expfactor *f@ = pointer to array of factors
* @size_t n@ = number of factors supplied
* @mp *d@ = fake destination
* @const mp_expfactor *f@ = pointer to array of factors
* @size_t n@ = number of factors supplied
@@
-100,7
+100,7
@@
mp *mpmont_mexpr(mpmont *mm, mp *d, const mp_expfactor *f, size_t n)
* Use: Convenient interface over @mpmont_mexpr@.
*/
* Use: Convenient interface over @mpmont_mexpr@.
*/
-mp *mpmont_mexp(mpmont *mm, mp *d, const mp_expfactor *f, size_t n)
+mp *mpmont_mexp(
const
mpmont *mm, mp *d, const mp_expfactor *f, size_t n)
{
mp_expfactor *ff = xmalloc(n * sizeof(mp_expfactor));
size_t i;
{
mp_expfactor *ff = xmalloc(n * sizeof(mp_expfactor));
size_t i;
@@
-141,9
+141,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++) {
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);
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);
mp_writefile(f[i].exp, stderr, 10);
}
fputs("\nr = ", stderr); mp_writefile(r, stderr, 10);