diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-02 15:24:58 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-02 15:24:58 (GMT) |
| commit | f06c1e0ba47e29b13414b57e6c87bae1a4df9fcb (patch) | |
| tree | c6386f8094f11f81f9c052fe3cb65072a78c748a /generic/tclStrToD.c | |
| parent | cac60f04fca58ee06fd50a449b658cf8d6dde44f (diff) | |
| parent | c6135def08ea1be2a47763a2877362b258cc3b90 (diff) | |
| download | tcl-f06c1e0ba47e29b13414b57e6c87bae1a4df9fcb.zip tcl-f06c1e0ba47e29b13414b57e6c87bae1a4df9fcb.tar.gz tcl-f06c1e0ba47e29b13414b57e6c87bae1a4df9fcb.tar.bz2 | |
Fix conflict between (unpatched) tommath.h and tcl.h. See also [https://github.com/libtom/libtommath/pull/473]
Diffstat (limited to 'generic/tclStrToD.c')
| -rw-r--r-- | generic/tclStrToD.c | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 485aba7..3dc2332 100644 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -4688,11 +4688,12 @@ int Tcl_InitBignumFromDouble( Tcl_Interp *interp, /* For error message. */ double d, /* Number to convert. */ - mp_int *b) /* Place to store the result. */ + void *big) /* Place to store the result. */ { double fract; int expt; mp_err err; + mp_int *b = (mp_int *)big; /* * Infinite values can't convert to bignum. @@ -4748,12 +4749,13 @@ Tcl_InitBignumFromDouble( double TclBignumToDouble( - const mp_int *a) /* Integer to convert. */ + const void *big) /* Integer to convert. */ { mp_int b; int bits, shift, i, lsb; double r; mp_err err; + const mp_int *a = (const mp_int *)big; /* @@ -4869,11 +4871,12 @@ TclBignumToDouble( double TclCeil( - const mp_int *a) /* Integer to convert. */ + const void *big) /* Integer to convert. */ { double r = 0.0; mp_int b; mp_err err; + const mp_int *a = (const mp_int *)big; err = mp_init(&b); if ((err == MP_OKAY) && mp_isneg(a)) { @@ -4934,11 +4937,12 @@ TclCeil( double TclFloor( - const mp_int *a) /* Integer to convert. */ + const void *big) /* Integer to convert. */ { double r = 0.0; mp_int b; mp_err err; + const mp_int *a = (const mp_int *)big; err = mp_init(&b); if ((err == MP_OKAY) && mp_isneg(a)) { |