diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-11 20:02:40 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-11 20:02:40 (GMT) |
| commit | f8c365412ab16261db162c4018b225b1dd096aa8 (patch) | |
| tree | 02e91e1577770fb368b1db809c5f12096e38d614 /generic/tclObj.c | |
| parent | 9d94ed0d5461f1677bc5483a618768872457b7dc (diff) | |
| parent | 00268d4ae68741fdbf73a54412cd38648f9d7302 (diff) | |
| download | tcl-f8c365412ab16261db162c4018b225b1dd096aa8.zip tcl-f8c365412ab16261db162c4018b225b1dd096aa8.tar.gz tcl-f8c365412ab16261db162c4018b225b1dd096aa8.tar.bz2 | |
Merge 8.7
In test-cases, don't load Tcltest package if it isn't actually used.
Another round of size_t related improvements. Nothing functional. Also improve some comments.
Diffstat (limited to 'generic/tclObj.c')
| -rw-r--r-- | generic/tclObj.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index 560a1e7..1a7f5ee 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -178,15 +178,15 @@ static Tcl_ThreadDataKey pendingObjDataKey; #define PACK_BIGNUM(bignum, objPtr) \ if ((bignum).used > 0x7fff) { \ - mp_int *temp = (void *) Tcl_Alloc((unsigned) sizeof(mp_int)); \ - *temp = bignum; \ + mp_int *temp = Tcl_Alloc(sizeof(mp_int)); \ + *temp = bignum; \ (objPtr)->internalRep.twoPtrValue.ptr1 = temp; \ (objPtr)->internalRep.twoPtrValue.ptr2 = INT2PTR(-1); \ } else { \ if ((bignum).alloc > 0x7fff) { \ mp_shrink(&(bignum)); \ } \ - (objPtr)->internalRep.twoPtrValue.ptr1 = (void *) (bignum).dp; \ + (objPtr)->internalRep.twoPtrValue.ptr1 = (bignum).dp; \ (objPtr)->internalRep.twoPtrValue.ptr2 = INT2PTR( ((bignum).sign << 30) \ | ((bignum).alloc << 15) | ((bignum).used)); \ } |