summaryrefslogtreecommitdiffstats
path: root/generic/tclTomMath.h
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-17 11:38:13 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-17 11:38:13 (GMT)
commitcbb0665d7d54dbcecf538a4c5564c6f233294a11 (patch)
treea1f61c9de56c4a7809d5e015d43d517db3066100 /generic/tclTomMath.h
parent0804f008f2a4ae9667481215fae5a901a6466b94 (diff)
downloadtcl-cbb0665d7d54dbcecf538a4c5564c6f233294a11.zip
tcl-cbb0665d7d54dbcecf538a4c5564c6f233294a11.tar.gz
tcl-cbb0665d7d54dbcecf538a4c5564c6f233294a11.tar.bz2
Add test-case for mp_iseven(). If mp_iseven(0) ever returns 0, we will be warned that we are using the wrong mp_iseven() function.
Diffstat (limited to 'generic/tclTomMath.h')
-rw-r--r--generic/tclTomMath.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTomMath.h b/generic/tclTomMath.h
index 6b96d2c..9b899fe 100644
--- a/generic/tclTomMath.h
+++ b/generic/tclTomMath.h
@@ -243,7 +243,7 @@ int mp_init_size(mp_int *a, int size);
/* ---> Basic Manipulations <--- */
#define mp_iszero(a) (((a)->used == 0) ? MP_YES : MP_NO)
-#define mp_iseven(a) ((((a)->used > 0) && (((a)->dp[0] & 1u) == 0u)) ? MP_YES : MP_NO)
+#define mp_iseven(a) ((((a)->used == 0) || (((a)->dp[0] & 1u) == 0u)) ? MP_YES : MP_NO)
#define mp_isodd(a) ((((a)->used > 0) && (((a)->dp[0] & 1u) == 1u)) ? MP_YES : MP_NO)
#define mp_isneg(a) (((a)->sign != MP_ZPOS) ? MP_YES : MP_NO)