From 025b74f7c7add01c5ca6654b03c29241c0845def Mon Sep 17 00:00:00 2001 From: apnadkarni Date: Mon, 24 Apr 2023 17:46:14 +0000 Subject: Fix [2e3fed53ba] - binary encode uuencode --- generic/tclBinary.c | 6 +++--- tests/bigdata.test | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/generic/tclBinary.c b/generic/tclBinary.c index 6f4fb06..f8f006d 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -2764,12 +2764,12 @@ BinaryEncodeUu( { Tcl_Obj *resultObj; unsigned char *data, *start, *cursor; - int rawLength, i, bits, index; + int i, bits, index; unsigned int n; int lineLength = 61; const unsigned char SingleNewline[] = { UCHAR('\n') }; const unsigned char *wrapchar = SingleNewline; - Tcl_Size j, offset, count = 0, wrapcharlen = sizeof(SingleNewline); + Tcl_Size j, rawLength, offset, count = 0, wrapcharlen = sizeof(SingleNewline); enum { OPT_MAXLEN, OPT_WRAPCHAR }; static const char *const optStrings[] = { "-maxlen", "-wrapchar", NULL }; @@ -2859,7 +2859,7 @@ BinaryEncodeUu( */ while (offset < count) { - int lineLen = count - offset; + Tcl_Size lineLen = count - offset; if (lineLen > rawLength) { lineLen = rawLength; diff --git a/tests/bigdata.test b/tests/bigdata.test index 8b0c349..c02d8e3 100644 --- a/tests/bigdata.test +++ b/tests/bigdata.test @@ -766,7 +766,7 @@ bigtestRO binary-encode/decode-uuencode-bigdata-1 "binary encode/decode uuencode set bin [bigBinary 4294967296] } -cleanup { bigClean -} -constraints bug-2e3fed53ba +} ################################################################ # List commands -- cgit v0.12