From 60d0ed0069fe3451d720658c997edf94b10961a0 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Mon, 30 Mar 2020 15:27:43 +0000 Subject: Initialize Tcl_UniChar's, in case we are handling surrogates (however unlikely). --- generic/tclBinary.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/generic/tclBinary.c b/generic/tclBinary.c index e83689f..923b536 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -2949,7 +2949,7 @@ BinaryDecodeUu( unsigned char *begin, *cursor; int i, index, size, pure = 1, count = 0, strict = 0, lineLen; unsigned char c; - Tcl_UniChar ch; + Tcl_UniChar ch = 0; enum { OPT_STRICT }; static const char *const optStrings[] = { "-strict", NULL }; @@ -3123,7 +3123,7 @@ BinaryDecode64( unsigned char *cursor = NULL; int pure = 1, strict = 0; int i, index, size, cut = 0, count = 0; - Tcl_UniChar ch; + Tcl_UniChar ch = 0; enum { OPT_STRICT }; static const char *const optStrings[] = { "-strict", NULL }; -- cgit v0.12