summaryrefslogtreecommitdiffstats
path: root/generic/tclBinary.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2017-09-01 00:52:27 (GMT)
committerdgp <dgp@users.sourceforge.net>2017-09-01 00:52:27 (GMT)
commitd6ea58f1103b8e3ef6c70d7576d4222be75c72fc (patch)
treed0f7882d38a74051b17dc46c866732bda40901d9 /generic/tclBinary.c
parentc53cfa6c6a701b037b6a49949ec657e8ddcd3f94 (diff)
parent105a61c09b0ac586054fe67876d8456edfcd228b (diff)
downloadtcl-d6ea58f1103b8e3ef6c70d7576d4222be75c72fc.zip
tcl-d6ea58f1103b8e3ef6c70d7576d4222be75c72fc.tar.gz
tcl-d6ea58f1103b8e3ef6c70d7576d4222be75c72fc.tar.bz2
merge trunk
Diffstat (limited to 'generic/tclBinary.c')
-rw-r--r--generic/tclBinary.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c
index acadc89..936a3ac 100644
--- a/generic/tclBinary.c
+++ b/generic/tclBinary.c
@@ -575,7 +575,7 @@ SetByteArrayFromAny(
byteArrayPtr = ckalloc(BYTEARRAY_SIZE(length));
for (dst = byteArrayPtr->bytes; src < srcEnd; ) {
- Tcl_UniChar ch;
+ Tcl_UniChar ch = 0;
src += TclUtfToUniChar(src, &ch);
improper = improper || (ch > 255);
*dst++ = UCHAR(ch);
@@ -1353,7 +1353,7 @@ BinaryFormatCmd(
badField:
{
- Tcl_UniChar ch;
+ Tcl_UniChar ch = 0;
char buf[TCL_UTF_MAX + 1];
TclUtfToUniChar(errorString, &ch);
@@ -1723,7 +1723,7 @@ BinaryScanCmd(
badField:
{
- Tcl_UniChar ch;
+ Tcl_UniChar ch = 0;
char buf[TCL_UTF_MAX + 1];
TclUtfToUniChar(errorString, &ch);