~mdw
/
catacomb
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
configure.ac: Replace with a new version.
[catacomb]
/
mpmont-mexp.c
diff --git
a/mpmont-mexp.c
b/mpmont-mexp.c
index
884d660
..
92f40c3
100644
(file)
--- a/
mpmont-mexp.c
+++ b/
mpmont-mexp.c
@@
-1,13
+1,13
@@
/* -*-c-*-
*
/* -*-c-*-
*
- * $Id
: mpmont-mexp.c,v 1.9 2004/04/08 01:36:15 mdw Exp
$
+ * $Id$
*
* Multiple simultaneous exponentiations
*
* (c) 1999 Straylight/Edgeware
*/
*
* Multiple simultaneous exponentiations
*
* (c) 1999 Straylight/Edgeware
*/
-/*----- Licensing notice --------------------------------------------------*
+/*----- Licensing notice --------------------------------------------------*
*
* This file is part of Catacomb.
*
*
* This file is part of Catacomb.
*
@@
-15,12
+15,12
@@
* it under the terms of the GNU Library General Public License as
* published by the Free Software Foundation; either version 2 of the
* License, or (at your option) any later version.
* it under the terms of the GNU Library General Public License as
* published by the Free Software Foundation; either version 2 of the
* License, or (at your option) any later version.
- *
+ *
* Catacomb is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Library General Public License for more details.
* Catacomb is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Library General Public License for more details.
- *
+ *
* You should have received a copy of the GNU Library General Public
* License along with Catacomb; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
* You should have received a copy of the GNU Library General Public
* License along with Catacomb; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
@@
-63,7
+63,7
@@
static mp *mexpr(mpmont *mm, mp *d, mp_expfactor *f, size_t n)
mp *t;
if (f[i].exp->f & MP_BURN)
spare = MP_NEWSEC;
mp *t;
if (f[i].exp->f & MP_BURN)
spare = MP_NEWSEC;
- if (
f[i].exp->f & MP_NEG
) {
+ if (
MP_NEGP(f[i].exp)
) {
t = mpmont_reduce(mm, f[i].base, f[i].base);
t = mp_modinv(t, t, mm->m);
f[i].base = mpmont_mul(mm, t, t, mm->r2);
t = mpmont_reduce(mm, f[i].base, f[i].base);
t = mp_modinv(t, t, mm->m);
f[i].base = mpmont_mul(mm, t, t, mm->r2);
@@
-206,7
+206,7
@@
int main(int argc, char *argv[])
sub_init();
test_run(argc, argv, tests, SRCDIR "/tests/mpmont");
return (0);
sub_init();
test_run(argc, argv, tests, SRCDIR "/tests/mpmont");
return (0);
-}
+}
#endif
#endif