summaryrefslogtreecommitdiffstats
path: root/generic/tclLoad.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-08-18 21:39:16 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-08-18 21:39:16 (GMT)
commit29be40bf89eb25e8771613681e8a544fc07296b5 (patch)
tree89be35bb25db2b233d3b2644ab0316f9a107d08c /generic/tclLoad.c
parenta04094e9a5e8e6e49dbfd80dea4d4d1335d51d6a (diff)
parentf94f5914a883f8ba5d019a66b4bed07c43d62811 (diff)
downloadtcl-29be40bf89eb25e8771613681e8a544fc07296b5.zip
tcl-29be40bf89eb25e8771613681e8a544fc07296b5.tar.gz
tcl-29be40bf89eb25e8771613681e8a544fc07296b5.tar.bz2
RFE [http://core.tcl.tk/tk/info/6c0d7aec67|6c0d7aec67]: Better surrogate handling for TCL_UTF_MAX==4. No change when TCL_UTF_MAX==3. (This commit is actually meant for androwish, in order to improve surrogate handling for TCL_UTF_MAX==4)
Diffstat (limited to 'generic/tclLoad.c')
-rw-r--r--generic/tclLoad.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c
index 942e6b4..f1bd248 100644
--- a/generic/tclLoad.c
+++ b/generic/tclLoad.c
@@ -130,7 +130,7 @@ Tcl_LoadObjCmd(
Tcl_PackageInitProc *initProc;
const char *p, *fullFileName, *packageName;
Tcl_LoadHandle loadHandle;
- Tcl_UniChar ch;
+ Tcl_UniChar ch = 0;
unsigned len;
int index, flags = 0;
Tcl_Obj *const *savedobjv = objv;