projects
/
u
/
mdw
/
catacomb
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix bit operations. Test them (a bit) better.
[u/mdw/catacomb]
/
mpx.c
diff --git
a/mpx.c
b/mpx.c
index
4097b3e
..
b88bd49
100644
(file)
--- a/
mpx.c
+++ b/
mpx.c
@@
-1,6
+1,6
@@
/* -*-c-*-
*
/* -*-c-*-
*
- * $Id: mpx.c,v 1.1
2 2002/10/06 22:52
:50 mdw Exp $
+ * $Id: mpx.c,v 1.1
3 2002/10/19 17:56
:50 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.13 2002/10/19 17:56:50 mdw
+ * Fix bit operations. Test them (a bit) better.
+ *
* Revision 1.12 2002/10/06 22:52:50 mdw
* Pile of changes for supporting two's complement properly.
*
* Revision 1.12 2002/10/06 22:52:50 mdw
* Pile of changes for supporting two's complement properly.
*
@@
-81,6
+84,7
@@
#include "mptypes.h"
#include "mpx.h"
#include "mptypes.h"
#include "mpx.h"
+#include "bitops.h"
/*----- Loading and storing -----------------------------------------------*/
/*----- Loading and storing -----------------------------------------------*/
@@
-611,7
+615,7
@@
void mpx_bit##string(mpw *dv, mpw *dvl, const mpw *av, const mpw *avl, \
mpw a, b; \
a = (av < avl) ? *av++ : 0; \
b = (bv < bvl) ? *bv++ : 0; \
mpw a, b; \
a = (av < avl) ? *av++ : 0; \
b = (bv < bvl) ? *bv++ : 0; \
- *dv++ =
MPX_B##string(a, b);
\
+ *dv++ =
B##string(a, b);
\
} \
}
} \
}