diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-12-12 18:13:10 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-12-12 18:13:10 (GMT) |
| commit | 3382fb9c2862df997fa60e6f701d386feb6cf99e (patch) | |
| tree | d02bc675d5b8af3491d8eae60fb0ae968b600346 /generic/tclBinary.c | |
| parent | 296a0b3d601c39b60f37bf2d6d22958b77a67213 (diff) | |
| parent | f1752f51c91fe99938a7cc83ea61e37feeea9209 (diff) | |
| download | tcl-3382fb9c2862df997fa60e6f701d386feb6cf99e.zip tcl-3382fb9c2862df997fa60e6f701d386feb6cf99e.tar.gz tcl-3382fb9c2862df997fa60e6f701d386feb6cf99e.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclBinary.c')
| -rw-r--r-- | generic/tclBinary.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c index 2578657..c93494e 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -1818,7 +1818,7 @@ GetFormatSpec( (*formatPtr)++; *countPtr = BINARY_ALL; } else if (isdigit(UCHAR(**formatPtr))) { /* INTL: digit */ - unsigned long int count; + unsigned long count; errno = 0; count = strtoul(*formatPtr, (char **) formatPtr, 10); @@ -2783,7 +2783,8 @@ BinaryEncodeUu( { Tcl_Obj *resultObj; unsigned char *data, *start, *cursor; - int rawLength, n, i, bits, index; + int rawLength, i, bits, index; + unsigned int n; int lineLength = 61; const unsigned char SingleNewline[] = { UCHAR('\n') }; const unsigned char *wrapchar = SingleNewline; |