projects
/
u
/
mdw
/
catacomb
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
76f32ed
)
Remove stray debugging code.
author
mdw
<mdw>
Sat, 13 Nov 1999 01:57:31 +0000
(
01:57
+0000)
committer
mdw
<mdw>
Sat, 13 Nov 1999 01:57:31 +0000
(
01:57
+0000)
mpx.c
patch
|
blob
|
blame
|
history
diff --git
a/mpx.c
b/mpx.c
index
b8bc8bf
..
b6d765d
100644
(file)
--- a/
mpx.c
+++ b/
mpx.c
@@
-1,6
+1,6
@@
/* -*-c-*-
*
/* -*-c-*-
*
- * $Id: mpx.c,v 1.
2 1999/11/13 01:50:59
mdw Exp $
+ * $Id: mpx.c,v 1.
3 1999/11/13 01:57:31
mdw Exp $
*
* Low-level multiprecision arithmetic
*
*
* Low-level multiprecision arithmetic
*
@@
-30,6
+30,9
@@
/*----- Revision history --------------------------------------------------*
*
* $Log: mpx.c,v $
/*----- Revision history --------------------------------------------------*
*
* $Log: mpx.c,v $
+ * Revision 1.3 1999/11/13 01:57:31 mdw
+ * Remove stray debugging code.
+ *
* Revision 1.2 1999/11/13 01:50:59 mdw
* Multiprecision routines finished and tested.
*
* Revision 1.2 1999/11/13 01:50:59 mdw
* Multiprecision routines finished and tested.
*
@@
-572,7
+575,6
@@
void mpx_usqr(mpw *dv, mpw *dvl, const mpw *av, const mpw *avl)
/* --- Work out the square at this point in the proceedings --- */
{
/* --- Work out the square at this point in the proceedings --- */
{
- mpw d = *dvv;
mpd x = (mpd)a * (mpd)a + *dvv;
*dvv++ = MPW(x);
c = MPW(x >> MPW_BITS);
mpd x = (mpd)a * (mpd)a + *dvv;
*dvv++ = MPW(x);
c = MPW(x >> MPW_BITS);
@@
-582,7
+584,6
@@
void mpx_usqr(mpw *dv, mpw *dvl, const mpw *av, const mpw *avl)
avv++;
while (dvv < dvl && avv < avl) {
avv++;
while (dvv < dvl && avv < avl) {
- mpw aa = *avv;
mpd x = (mpd)a * (mpd)*avv++;
mpd y = ((x << 1) & MPW_MAX) + c + *dvv;
c = (x >> (MPW_BITS - 1)) + (y >> MPW_BITS);
mpd x = (mpd)a * (mpd)*avv++;
mpd y = ((x << 1) & MPW_MAX) + c + *dvv;
c = (x >> (MPW_BITS - 1)) + (y >> MPW_BITS);