summaryrefslogtreecommitdiffstats
path: root/generic/tclObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-17 16:26:50 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-17 16:26:50 (GMT)
commitd7da846591f5edcc930be33973139f6ef0059580 (patch)
tree8745c9b69988bfd839bd9d090d41713bd840c002 /generic/tclObj.c
parent2edb1dcd838bb41a920ed09688ac6438f8efddc4 (diff)
parent2287394ba1bcf13a8abb6b8097f03e995cd3258a (diff)
downloadtcl-d7da846591f5edcc930be33973139f6ef0059580.zip
tcl-d7da846591f5edcc930be33973139f6ef0059580.tar.gz
tcl-d7da846591f5edcc930be33973139f6ef0059580.tar.bz2
Fix libtommath's mp_radix_size() function such that it returns 2 for single-digit numbers. Add testcases for mp_radix_size() and mp_iseven(). Undo useless change in bn_mp_add_d.c (bring back libtommath's version).
Diffstat (limited to 'generic/tclObj.c')
-rw-r--r--generic/tclObj.c8
1 files changed, 3 insertions, 5 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c
index d3f59ec..6c850af 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -3252,13 +3252,11 @@ UpdateStringOfBignum(
if (status != MP_OKAY) {
Tcl_Panic("radix size failure in UpdateStringOfBignum");
}
- if (size == 3) {
+ if (size < 2) {
/*
- * mp_radix_size() returns 3 when more than INT_MAX bytes would be
+ * mp_radix_size() returns < 2 when more than INT_MAX bytes would be
* needed to hold the string rep (because mp_radix_size ignores
- * integer overflow issues). When we know the string rep will be more
- * than 3, we can conclude the string rep would overflow our string
- * length limits.
+ * integer overflow issues).
*
* Note that so long as we enforce our bignums to the size that fits
* in a packed bignum, this branch will never be taken.